CommonEvent 4043
Name = "Promestein 3"

  999([4043])
  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(["\\n<Promestein>Excuse me, would you help me collect semen?\nI only need a little..."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>U-Uh... Okay..."])
  ShowText([""])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>Then, please follow me..."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I follow her to a private room..."])
  FadeoutScreen([])
  ShowPicture([1, "bg195", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowPicture([5, "ev_stein_hsd1", 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(["\\n<Promestein>Now then, let's get this done quickly.\nThis time, I'll use a custom made extraction machine."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["As soon as I enter the room, she removes my pants and underwear."])
  ShowText(["She quickly wraps my exposed penis in a strange machine."])
  PlayBGS(["RPG::BGS(@name=\"mon_hsean25_machine2\", @volume=80, @pitch=100)"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Promestein turns it on right away."])
  ShowText(["A strange noise fills the room as the pump-like movements start."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The internal pressure slowly builds..."])
  ShowText(["And all the while, a gentle vibration massages my penis."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Nnngh... W-Why something like this...?"])
  ShowText([""])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>Even if I use the onahole, my hand gets tired...\nSo I made a machine to quickly milk semen."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The inner walls of the machine start to swell."])
  ShowText(["They feel almost wavy in texture..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["And all the way in the back, I can feel a slight warmth against my glans."])
  ShowText(["It seems to be designed to attack all of a man's weakest points."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Ah... Aaah...\nTh-That feels good..."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>Won't you ejaculate quickly?\nI want to collect your semen quickly so I can start my experiment..."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Promestein looks up at me with a troubled face."])
  ShowText(["Her machine quickly puts me into a corner."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Sometimes the inner walls contract and tighten..."])
  ShowText(["While inside, the whole thing is moving up and down."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The vibration stimulus is focused against my back muscle."])
  ShowText(["The various stimulations all combine to bring any man to climax."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Nnngh... Aaah..."])
  ShowText([""])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>Stop your pathetic moans, and just ejaculate already.\nHere, I'll increase the stimulus."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Promestein triggers the machine to increase the stimulation."])
  ShowText(["As the inner walls suddenly move faster, my waist unconsciously pushes up into it."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>A...hauuu...!"])
  ShowText([""])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>You'll ejaculate with this, won't you?\nOkay, go ahead."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["With an expressionless face, Promestein switches it to the maximum setting."])
  ShowText(["The sudden intense feeling pushes me instantly over the edge."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Ah... I'm coming...!"])
  ShowText([""])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>......"])
  ShowText([""])
  CallCommonEvent([104])
  ShowPicture([5, "ev_stein_hsd2", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I quickly come into the machine."])
  ShowText(["She looks at it without changing her expression at all."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>............"])
  ShowText([""])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>As expected, once isn't enough.\nI can't do the experiment without 50cc..."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Even after I come, she doesn't switch it off."])
  ShowText(["Stimulated by the machine, I can't do anything but tremble as the pleasure overwhelms me."])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>I'll have you come multiple times.\nSheesh, this is really troublesome..."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>D-don't... Aaaah..."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["A low buzz comes out of the machine as the ruthless pleasure continues."])
  ShowText(["Even though I just came, the mechanical device doesn't slow down at all..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["It squeezes down even tighter, pressing extra hard on my glans."])
  ShowText(["It's just an action to extract semen from me..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>D-don't... Ahhhhh..."])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The milking machine leaves me at the edge again in no time."])
  ShowText(["My penis trembles inside as I'm brought to another climax."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Ah... I'm coming again...!"])
  ShowText([""])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>Ok, just come then.\nI need to collect it afterwards, so try not to get it everywhere."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Aah...aah!"])
  ShowText([""])
  CallCommonEvent([104])
  ShowPicture([5, "ev_stein_hsd3", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I'm forced to a second ejaculation in the machine."])
  ShowText(["With my semen shooting out, it overflows from the top."])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>You're still a little short.\nI'll have you ejaculate again..."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>Th...that... Impossible...\nAaaah...!"])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>I'll get it out, even if you think you can't.\nYou should be able to do it once more..."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Promestein looks on, expression unchanged, as the machine keeps milking me."])
  ShowText(["Her merciless, clerical extraction..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>I can't come anymore... I can't come, so..."])
  ShowText([""])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>......"])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["She ignores me begging her to stop."])
  ShowText(["Instead, the machine keeps rubbing and vibrating..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["N-no...Aaaah..."])
  FadeoutBGS([1])
  CallCommonEvent([104])
  ShowPicture([5, "ev_stein_hsd4", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["My waist trembles as I'm forced to a third orgasm."])
  ShowText(["My body twitches as more semen flows out."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>a... ah..."])
  ShowText([""])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>...It took three times to get the necessary amount.\nShall we stop here for today?"])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>With that, we're done here.\nThanks for your hard work."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>............"])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The milking machine forced me to come three times in a row..."])
  ShowText(["Mentally and physically exhausted, I just collapse backwards."])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>I'll call you if I need to collect more semen from now on.\nPlease come back again."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["stein_fc2", 0, 0, 2])
  ShowText(["\\n<Promestein>This is only a prototype, but it was still troublesome to operate.\nFurther automation... No, perhaps I should move to organic..."])
  ShowText([""])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>............"])
  ShowText([""])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Just what is she going to try next time...?"])
  ShowText(["Weak on my legs, I stumble out of the room..."])
  FadeoutScreen([])
  ErasePicture([5])
  ErasePicture([6])
  FadeoutBGS([2])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["・・・・・・・・"])
  CallCommonEvent([4000])
  Empty([])
