CommonEvent 2701
Name = "誘惑：薔薇貴族"

  999([2151])
  Script(["$game_troop.lose_event_id = 3701"])
  ControlVariables([26, 26, 0, 3, 3, 1, 4])
  ControlVariables([26, 26, 4, 0, 10])
  ShowTextAttributes(["barakizoku_fc1", 2, 0, 2])
  ShowText(["\\n<Rose Aristocrat>"])
  ShowText(["You're quite strong, aren't you?"])
  ShowText(["Then, let's target a man's weaknesses..."])
  Script(["battler_graphic_hide"])
  ShowPicture([5, "ev_barakizoku_ha1", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The Rose Aristocrat's vines wrap around your body, restraining your movements!"])
  ShowText(["The vines also entwine around the penis, becoming covered in sap!"])
  ShowTextAttributes(["barakizoku_fc1", 1, 0, 2])
  ShowText(["\\n<Rose Aristocrat>"])
  ShowText(["For now, I'll play with your genitals using the vines."])
  ShowText(["You'll soon be scattering your seeds..."])
  ControlSwitches([98, 98, 0])
  ControlSwitches([96, 96, 0])
  ShowChoices([["Struggle", "Submit"], 1])
  When([0, "もがく"])
    ShowTextAttributes(["", 0, 0, 2])
    ShowText(["However, Luka shook off the temptation and escaped from the restraints!"])
    CallCommonEvent([1999])
    ExitEventProcessing([])
    Empty([])

  When([1, "なすがまま"])
    Empty([])

  ChoicesEnd([])
  ShowTextAttributes(["barakizoku_fc1", 1, 0, 2])
  ShowText(["\\n<Rose Aristocrat>"])
  ShowText(["Then, let me tease you with the vines... Ufufu."])
  ControlVariables([26, 26, 3, 0, 4])
  PlaySE(["RPG::SE(@name=\"mon_ero_koki1\", @pitch=100, @volume=100)"])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The Rose Aristocrat's vines slither around the penis!"])
  ShowText(["While overflowing with sap, they crawl all over the shaft!\\D"])
  ShowText(["Luka took \\V[26] damage!"])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  ConditionalBranch([1, 27, 0, 0, 0])
    JumpToLabel(["射精1"])
    Empty([])

  BranchEnd([])
  ShowTextAttributes(["barakizoku_fc1", 1, 0, 2])
  ShowText(["\\n<Rose Aristocrat>"])
  ShowText(["Hehe, it feels good, doesn't it?"])
  ShowText(["The sensitive tip is being thoroughly stimulated..."])
  ControlVariables([26, 26, 3, 0, 4])
  PlaySE(["RPG::SE(@name=\"mon_ero_koki1\", @pitch=100, @volume=100)"])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The sap-covered vines slither and stimulate the glans!"])
  ShowText(["They wrap around the tip, smoothly moving up and down!\\D"])
  ShowText(["Luka took \\V[26] damage!"])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  ConditionalBranch([1, 27, 0, 0, 0])
    JumpToLabel(["射精1"])
    Empty([])

  BranchEnd([])
  ShowTextAttributes(["barakizoku_fc1", 1, 0, 2])
  ShowText(["\\n<Rose Aristocrat>"])
  ShowText(["It seems like a caterpillar is wriggling..."])
  ShowText(["Shall we finish you off like this?"])
  ControlVariables([26, 26, 3, 0, 4])
  PlaySE(["RPG::SE(@name=\"mon_ero_koki1\", @pitch=100, @volume=100)"])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["The vines wrapping around the penis are tightening gradually!"])
  ShowText(["They continue to stroke up and down, giving a squeezing sensation!\\D"])
  ShowText(["Luka took \\V[26] damage!"])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  ConditionalBranch([1, 27, 0, 0, 0])
    JumpToLabel(["射精1"])
    Empty([])

  BranchEnd([])
  Label(["射精1"])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["\\n<Luka>"])
  ShowText(["Ah...! I'm going to...!"])
  CallCommonEvent([104])
  ShowPicture([5, "ev_barakizoku_ha2", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Being toyed with by the vines of the rose aristocrat, I came helplessly."])
  ShowText(["As if being squeezed out by the vines, the semen gushed forth-"])
  ShowTextAttributes(["barakizoku_fc1", 1, 0, 2])
  ShowText(["\\n<Rose Aristocrat>"])
  ShowText(["Ufufu, it felt good, didn't it...?"])
  ShowText(["I'll squeeze out even more for you."])
  CallCommonEvent([2000])
  ExitEventProcessing([])
  Empty([])
