CommonEvent 2543
Name = "誘惑：アスタロト"

  999([2151])
  Script(["$game_troop.lose_event_id = 3543"])
  ControlVariables([26, 26, 0, 3, 3, 1, 4])
  ControlVariables([26, 26, 4, 0, 10])
  ShowTextAttributes(["astaroth_fc1", 0, 0, 2])
  ShowText(["\\n<Astaroth>Fufu, look at the backbone on this kid.\nYou're still inexperienced, but you've got a good fighting spirit."])
  ShowText([""])
  ShowText([""])
  Script(["battler_graphic_hide"])
  ShowPicture([5, "ev_astaroth_ha1", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Astaroth knocks Luka down, and pushes her back toward him!"])
  ShowTextAttributes(["astaroth_fc1", 0, 0, 2])
  ShowText(["\\n<Astaroth>So... Let me give you a nice finish.\nI'll suck you with my tail..."])
  ShowText([""])
  ShowText([""])
  ShowPicture([5, "ev_astaroth_ha2", 0, 0, 0, 0, 100, 100, 255, 0])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Astaroth's tail opens a mouth!"])
  ShowText(["It's clearly something for insertion..."])
  ShowTextAttributes(["astaroth_fc1", 1, 0, 2])
  ShowText(["\\n<Astaroth>Do you want me to suck you with my tail, and show you a piece of heaven?\nLet me give you the finest of pleasures..."])
  ShowText([""])
  ShowText([""])
  ControlSwitches([98, 98, 0])
  ControlSwitches([96, 96, 0])
  ShowChoices([["Ignore her", "Give in to temptation"], 1])
  When([0, "無視する"])
    ShowTextAttributes(["", 0, 0, 2])
    ShowText(["Luka resists her temptation!"])
    CallCommonEvent([1999])
    ExitEventProcessing([])
    Empty([])

  When([1, "誘惑に乗る"])
    Empty([])

  ChoicesEnd([])
  ShowTextAttributes(["astaroth_fc1", 1, 0, 2])
  ShowText(["\\n<Astaroth>Fufu, you fell for it...\nWell then... I'll take your energy."])
  ShowText([""])
  ShowText([""])
  ControlVariables([26, 26, 3, 0, 4])
  PlaySE(["RPG::SE(@name=\"mon_ero_chupa6\", @pitch=100, @volume=100)"])
  ShowPicture([5, "ev_astaroth_ha3", 0, 0, 0, 0, 100, 100, 255, 0])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Astaroth's tail sucks in Luka's penis!"])
  ShowText(["It starts to suck on him!\\D"])
  ShowText(["Luka takes \\V[26] damage!"])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  ConditionalBranch([1, 27, 0, 0, 0])
    JumpToLabel(["射精1"])
    Empty([])

  BranchEnd([])
  ShowTextAttributes(["astaroth_fc1", 1, 0, 2])
  ShowText(["\\n<Astaroth>A paradise of pleasure...\nImmerse yourself in it."])
  ShowText([""])
  ShowText([""])
  PlaySE(["RPG::SE(@name=\"mon_ero_chupa6\", @pitch=100, @volume=100)"])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Astaroth's tail sucks on Luka's penis!"])
  ShowText(["The sweet suction sensation runs through him!\\D"])
  ShowText(["Luka takes \\V[26] damage!"])
  ControlVariables([27, 27, 0, 3, 3, 1, 2])
  ConditionalBranch([1, 27, 0, 0, 0])
    JumpToLabel(["射精1"])
    Empty([])

  BranchEnd([])
  ShowTextAttributes(["astaroth_fc1", 1, 0, 2])
  ShowText(["\\n<Astaroth>You're going to come soon, I see.\nGive me all of your semen..."])
  ShowText([""])
  ShowText([""])
  PlaySE(["RPG::SE(@name=\"mon_ero_chupa6\", @pitch=100, @volume=100)"])
  ChangeHP([0, 1, 1, 1, 26, true])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["Astaroth's tail sweetly sucks Luka's penis!"])
  ShowText(["The vacuum-like stimulus forces him to come!\\D"])
  ShowText(["Luka takes \\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(["No, I'm going to come... Aaaah..."])
  CallCommonEvent([104])
  ShowPicture([5, "ev_astaroth_ha4", 0, 0, 0, 0, 100, 100, 255, 0])
  CallCommonEvent([105])
  ShowTextAttributes(["", 0, 0, 2])
  ShowText(["My semen pours into Astaroth's tail."])
  ShowText(["Sucking on me so hard, there's no way I couldn't give in..."])
  ShowTextAttributes(["astaroth_fc1", 1, 0, 2])
  ShowText(["\\n<Astaroth>Fufu, I'll squeeze you dry like this.\nAllow me to show you heaven until your final moments..."])
  ShowText([""])
  ShowText([""])
  CallCommonEvent([2000])
  ExitEventProcessing([])
  Empty([])
