CommonEvent 3028
Name = "クィーンハーピー"

  999([3028])
  ConditionalBranch([0, 25, 1])
    JumpToLabel(["反省会"])
    Empty([])

  BranchEnd([])
  ShowPicture([5, "80_queenhapy_st02", 0, 0, 0, 0, 100, 100, 0, 0])
  MovePicture([5, nil, 0, 0, 0, 0, 100, 100, 255, 0, 30, true])
  PlayBGM(["RPG::BGM(@name=\"ero1\", @volume=100, @pitch=100)"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["Auuuu..."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["<Queen Harpy>"])
  ShowText(["Hehe, looks like you've learned your lesson..."])
  ShowText(["To point a sword at the queen means to oppose the entire clan."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["<Queen Harpy>"])
  ShowText(["Then, shall you receive your punishment?"])
  ShowText(["Now everyone, let us begin the joyful feast...!"])
  ShowPicture([5, "ev_queenhapy_hb1", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["With the queen harpy's signal, the harpy group rushes in all at once."])
  ShowText(["I was held down from all sides--"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Having exhausted my strength, I was helplessly restrained."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["And the one who mounted me was the queen harpy."])
  ShowText(["Just the sensation of her soft feathers made me feel completely relaxed."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["<Queen Harpy>"])
  ShowText(["Now, representing the clan, I shall be the first to engage."])
  ShowText(["Now, please enjoy yourselves to the fullest..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["With a lewd smile, the queen harpy slowly lowered herself down."])
  ShowText(["My length was swallowed by the queen's enchanting flesh--"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["S-stop..."])
  ShowText(["Aaaaaah...!"])
  PlayBGS(["RPG::BGS(@name=\"mon_hsean04_innerworks_a4\", @volume=80, @pitch=100)"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["In an instant, my length was submerged deep into the exquisite chamber."])
  ShowText(["The wonderful sensation made me involuntarily let out a high-pitched moan."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Inside was hot and slimy, like it was melting."])
  ShowText(["The vaginal walls were soft but tightly gripped with plenty of elasticity."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Moreover, deep inside, there were fine soft protrusions densely packed together."])
  ShowText(["My glans was enveloped at the very back, experiencing a unique sense of tightness from all sides--"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["A-ahhh...!"])
  ShowTextAttributes(["hapy_a_fc1", 1, 0, 2])
  ShowText(["<Harpy>"])
  ShowText(["Ahaha, does it feel good to be violated by the queen?"])
  ShowText(["You're making a melting face...♪"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["While gazing at my melting face, one of the harpies chuckled."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["They wore faint smiles and expressions of curiosity,"])
  ShowText(["fixated on my face and the point of connection."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Exposed to such countless gazes, I was violated by the queen--"])
  ShowText(["That situation was both immoral and even more humiliating."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Moreover, the queen harpy hardly moved her hips."])
  ShowText(["Yet, just from the sensation of that exquisite flesh, I was pushed to the brink of ejaculation."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["<Queen Harpy>"])
  ShowText(["Hehe, you're about to reach your limit, aren't you?"])
  ShowText(["Let everyone see your disgraceful face when you release your seed..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["A, aaaaaaa...!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The flesh tightly constricted, obeying the Queen's will."])
  ShowText(["Deliberately moving within, trying to force me to climax in one go."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["And on my sensitive glans, countless soft protrusions pressed tightly from all sides."])
  ShowText(["The sweet sensation enveloped my penis, making it feel like I couldn't hold back the release..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["I'm going to cum... ahhh..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I finally succumbed to the Queen's exquisite flesh, surrendering myself to sweet pleasure..."])
  CallCommonEvent([104])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["Faaah..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["My semen was released in a throbbing flow into the Queen Harpy's womb."])
  ShowText(["Accompanied by that pulsation, a melting sensation of release shook my entire body."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The pleasure of releasing while being enveloped by the Queen's exquisite flesh..."])
  ShowText(["It felt as if my very soul was being taken away."])
  FadeoutBGS([1])
  ShowTextAttributes(["hapy_a_fc1", 1, 0, 2])
  ShowText(["<Harpy>"])
  ShowText(["Waa, I've already leaked...♪"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["And the Harpies were watching that scene closely."])
  ShowText(["They gazed at my melted face with expressions of curiosity and excitement."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The entire process of releasing semen..."])
  ShowText(["I was seen by the surrounding Harpies during the most disgraceful moment of a man."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["A, aaaaaaa..."])
  ShowText(["This is so embarrassing..."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["<Queen Harpy>"])
  ShowText(["Oh dear, you've leaked quite a bit, haven't you?"])
  ShowText(["Next, shall we let everyone see the released semen...?"])
  PlayBGS(["RPG::BGS(@name=\"mon_hsean07_innerworks_a7\", @volume=80, @pitch=100)"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The Queen Harpy, who had not moved until now, began to slowly sway her hips."])
  ShowText(["Gently and in slow motion, she started to bounce her hips up and down and side to side."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["That movement provided a tantalizing stimulation to the penis she was enveloping..."])
  ShowText(["It was pleasure so overwhelming that it felt like my mind would go blank."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["Ah...! Faaaaah...!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The slick walls of her vagina sloppily rubbed against the glans."])
  ShowText(["The soft protrusions in the back tickle the entire glans, slithering around the underside――"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Pathetically, I can't seem to endure even a minute."])
  ShowText(["The queen's movements made me submit in no time."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["No, no... I'm about to cum..."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["<Queen Harpy>"])
  ShowText(["Hehe, you're really quite simple, aren't you?"])
  ShowText(["Now, let's make sure the semen is clearly visible..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The Queen Harpy slowly lifted her hips,"])
  ShowText(["Pulling the penis slickly out from the vagina."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["As she did, the glans rubbed against the slick walls."])
  ShowText(["That pulling motion became the final blow――"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["Ah, ahhhh...!"])
  CallCommonEvent([104])
  ShowPicture([5, "ev_queenhapy_hb2", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Most of the shaft was pulled out from the vagina, with only the underside of the glans pressed against the vaginal opening."])
  ShowText(["In that state, I released with all my might."])
  ShowPicture([5, "ev_queenhapy_hb3", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The cloudy fluid was scattered across my body, humiliatingly dirtying myself――"])
  FadeoutBGS([1])
  ShowTextAttributes(["hapy_a_fc1", 1, 0, 2])
  ShowText(["<Harpy>"])
  ShowText(["Wow, that's a lot...!"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The harpies surrounding us instantly lit up with excitement."])
  ShowText(["Some even scooped up the splattered semen with their wings and licked it off."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["<Queen Harpy>"])
  ShowText(["Oh dear, I thought it would only dribble onto your belly..."])
  ShowText(["To scatter so much, what a naughty child you are."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Looking down at my face, the Queen Harpy chuckled."])
  ShowText(["Around me, semen was splattered everywhere in a miserable way――"])
  ShowTextAttributes(["hapy_a_fc1", 1, 0, 2])
  ShowText(["<Harpy>"])
  ShowText(["Your Majesty... I want more semen..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Still not satisfied, one of the harpies licking the semen begged the queen."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["<Queen Harpy>"])
  ShowText(["I see... then let me serve you more."])
  PlayBGS(["RPG::BGS(@name=\"mon_hsean17_sigoki\", @volume=80, @pitch=100)"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The queen, keeping my shaft between her thighs, started moving her hips back and forth in a dry humping position."])
  ShowText(["With a rhythmic motion, she relentlessly attacked me."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The feathers brushed against my thighs and penis, tickling and feeling good."])
  ShowText(["The slick vaginal opening squished my penis, with the mucus slithering against the underside――"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["Ahhh...!"])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["<Queen Harpy>"])
  ShowText(["With this kind of movement, it won't last long, will it?"])
  ShowText(["Now, let everyone see your ejaculating penis..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["No... I'm going to cum again..."])
  ShowText(["Ahhh...!"])
  CallCommonEvent([104])
  ShowPicture([5, "ev_queenhapy_hb4", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Subdued by the queen's sex, I was helplessly brought to climax."])
  ShowPicture([5, "ev_queenhapy_hb5", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The released semen splattered around, dirtying the bodies of the harpies."])
  FadeoutBGS([1])
  ShowTextAttributes(["hapy_a_fc1", 1, 0, 2])
  ShowText(["<Harpy>"])
  ShowText(["Wow, there's so much...♪"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The harpies licked up the semen, narrowing their eyes in enjoyment."])
  ShowText(["The queen looked down at me, satisfied with the scene."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["And then she dropped her gaze to my face, showing a gentle smile――"])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["<Queen Harpy>"])
  ShowText(["Hehe... you are the sex slave of the harpy tribe."])
  ShowText(["You will be gang-raped like this and end your life."])
  ShowTextAttributes(["queenhapy_fc1", 1, 0, 2])
  ShowText(["<Queen Harpy>"])
  ShowText(["That is the price for pointing your sword at the queen of the harpies..."])
  ShowText(["Oh, but perhaps it was a reward for you."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["<Luka>"])
  ShowText(["Auu..."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["It seems I can no longer escape from the tower."])
  ShowText(["This lewd banquet showed no signs of ending."])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I was endlessly gang-raped by the harpies――"])
  ShowText(["And I continued to offer my seed until my lifespan was exhausted."])
  FadeoutScreen([])
  ErasePicture([5])
  Label(["反省会"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["・・・・・・・・"])
  FadeoutScreen([])
  FadeoutBGM([1])
  Wait([120])
  Script(["memory_interruption"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["I hear the voice of Goddess Ilias..."])
  ShowText(["Shall we attend the reflection meeting?"])
  ShowChoices([["Receive evaluation", "Change difficulty", "Reincarnate"], 3])
  When([0, "反省会に出る"])
    PlayBGM(["RPG::BGM(@name=\"irias\", @volume=90, @pitch=105)"])
    ShowPicture([1, "bg001", 0, 0, 0, 0, 100, 100, 255, 0])
    FadeinScreen([])
    ShowPicture([5, "80_iriasu_st04", 0, 0, 0, 0, 100, 100, 0, 0])
    MovePicture([5, nil, 0, 0, 0, 0, 100, 100, 255, 0, 30, true])
    ShowTextAttributes(["iriasu_fc1", 3, 0, 2])
    ShowText(["<Ilias>"])
    ShowText(["Was your union with the queen of the harpies the best?"])
    ShowText(["To drown in carnal desires and forget your mission is the height of disgrace."])
    ShowPicture([5, "80_iriasu_st01", 0, 0, 0, 0, 100, 100, 255, 0])
    ShowTextAttributes(["iriasu_fc1", 0, 0, 2])
    ShowText(["<Ilias>"])
    ShowText(["Queen Harpy is, as her name suggests, the queen of the harpies."])
    ShowText(["Her behavior patterns don't change much, but her power is on a different level."])
    ShowTextAttributes(["iriasu_fc1", 0, 0, 2])
    ShowText(["<Ilias>"])
    ShowText(["The most painful attack is, after all, the wing flap attack."])
    ShowText(["It might be tough without preparing wind attribute armor to mitigate it."])
    ShowTextAttributes(["iriasu_fc1", 0, 0, 2])
    ShowText(["<Ilias>"])
    ShowText(["Also, pleasure attacks tend to concentrate on Luka, so prioritize healing."])
    ShowText(["It's not a bad idea for Luka to strengthen his defense as well."])
    ShowTextAttributes(["iriasu_fc1", 0, 0, 2])
    ShowText(["<Ilias>"])
    ShowText(["The enemy sometimes takes a break from attacking, so let's heal during that time."])
    ShowText(["If possible, I would like to utilize support magic as well."])
    ShowTextAttributes(["iriasu_fc1", 0, 0, 2])
    ShowText(["<Ilias>"])
    ShowText(["It seems that there are surprisingly many status ailments that work."])
    ShowText(["If darkness and such are effective, combat will become significantly easier."])
    ShowTextAttributes(["iriasu_fc1", 0, 0, 2])
    ShowText(["<Ilias>"])
    ShowText(["Surprisingly, it seems that poison works, albeit at a low probability."])
    ShowText(["Since it is expected to deal great damage, it might be good to aim for it."])
    ShowTextAttributes(["iriasu_fc1", 0, 0, 2])
    ShowText(["<Ilias>"])
    ShowText(["The evasion rate is not particularly high."])
    ShowText(["Physical attacks will also hit without issue, so you can rest easy on that front."])
    ShowPicture([5, "80_iriasu_st02", 0, 0, 0, 0, 100, 100, 255, 0])
    ShowTextAttributes(["iriasu_fc1", 1, 0, 2])
    ShowText(["<Ilias>"])
    ShowText(["Now go, Hero Luka."])
    ShowText(["Defeat the leader of the harpies and demonstrate the power of justice."])
    FadeoutBGM([1])
    FadeoutScreen([])
    ErasePicture([5])
    ErasePicture([1])
    Wait([60])
    Empty([])

  When([1, "難易度を変更する"])
    ShowTextAttributes(["", 0, 0, 2])
    ShowText(["Please select the difficulty level."])
    CallCommonEvent([110])
    Empty([])

  When([2, "輪廻に戻る"])
    Empty([])

  ChoicesEnd([])
  CallCommonEvent([3000])
  Empty([])
