CommonEvent 1333
Name = "Talk: Queen Vampire"

  999([1333])
  ConditionalBranch([1, 20, 0, 1, 0])
    JumpToLabel(["情報"])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 20, 0, 2, 0])
    JumpToLabel(["質問"])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 20, 0, 3, 0])
    JumpToLabel(["要求"])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 20, 0, 4, 0])
    JumpToLabel(["贈与"])
    Empty([])

  BranchEnd([])
  Label(["情報"])
  ControlVariables([13, 13, 0, 2, 1, 100])
  ConditionalBranch([1, 13, 0, 10, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>Elizabeth collects art for a hobby.\nI planned on becoming a connoisseur myself, but all I could ever get a hold of were forgeries..."])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 20, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>I'm worried about Carmilla's laid-back nature... However, it could be her strong point in some way."])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 30, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>I heard that Queen Harpy is a gentle pacifist.\nBut those who are leaders must have power..."])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 40, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>Queen Elf is fond of the Colosseum.\nIt's strange, elves usually loathe strife."])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 50, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>Queen Fairy is known for being a hard worker.\nIt must be very difficult to manage all of those mischievous people and their demands."])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 60, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>Queen Mermaid bears a deep hatred towards humans.\nI hope she does not get carried away by her resentment and make any mistakes along the way..."])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 70, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>Queen Alraune is a kind-hearted queen.\nBut that doesn't matter when you appear to be tired..."])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 80, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>The Spider Princess is reputed for her power like myself. But her character is cruel and vulgar..."])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 90, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>Sabasa will become my territory.\nI will grant the inhabitants of the land the honor of becoming my subjects!"])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 100, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>Vampires must be strong and beautiful.\nBeing that I am the Queen, I must be even more noble."])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  Label(["質問"])
  ControlVariables([13, 13, 0, 2, 1, 50])
  ConditionalBranch([1, 13, 0, 10, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>My dream... do you know what it is?"])
    ShowChoices([["To rule the world with power", "To become rich", "To rule the world with Vampire Pubs"], 0])
    When([0, "力で世界を支配"])
      ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
      ShowText(["\\n<Queen Vampire>Exactly!\nVampires will rule this world!"])
      Script(["change_friend(10)"])
      Empty([])

    When([1, "大金持ちになる"])
      ShowTextAttributes(["queenvampire_fc1", 2, 0, 2])
      ShowText(["\\n<Queen Vampire>I have no interest in such vulgar matters!"])
      Script(["change_friend(-5)"])
      Empty([])

    When([2, "吸血鬼パブで世界制覇"])
      ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
      ShowText(["\\n<Queen Vampire>How did you know?!"])
      Script(["change_friend(10)"])
      Empty([])

    ChoicesEnd([])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 20, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>I am a noble, thus I am fond of sushi...\nIncidentally, what is your favorite sushi ingredient?"])
    ShowChoices([["Tuna", "Sea urchin", "Egg", "Bat"], 0])
    When([0, "トロ"])
      ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
      ShowText(["\\n<Queen Vampire>It's still a staple...not bad."])
      Script(["change_friend(5)"])
      Empty([])

    When([1, "ウニ"])
      ShowTextAttributes(["queenvampire_fc1", 2, 0, 2])
      ShowText(["\\n<Queen Vampire>You're an indecent fellow..."])
      Script(["change_friend(-5)"])
      Empty([])

    When([2, "タマゴ"])
      ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
      ShowText(["\\n<Queen Vampire>Yes, I also like that!"])
      Script(["change_friend(10)"])
      Empty([])

    When([3, "コウモリ"])
      ShowTextAttributes(["queenvampire_fc1", 2, 0, 2])
      ShowText(["\\n<Queen Vampire>There is no such sushi ingredient!"])
      Script(["change_friend(-5)"])
      Empty([])

    ChoicesEnd([])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 30, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>Let me ask you!\nWho is worthy of ruling this world...?"])
    ShowChoices([["The Monster Lord Alice the 15th", "Goddess Ilias", "Queen Vampire"], 0])
    When([0, "魔王アリス15世"])
      ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
      ShowText(["\\n<Queen Vampire>You really think so...?\nCertainly, it will be the Monster Lord's world for the time being."])
      Script(["change_friend(5)"])
      Empty([])

    When([1, "女神イリアス"])
      ShowTextAttributes(["queenvampire_fc1", 2, 0, 2])
      ShowText(["\\n<Queen Vampire>Ilias...?!\nYou are a pawn of the Goddess!"])
      Script(["change_friend(-5)"])
      Empty([])

    When([2, "クィーンヴァンパイア"])
      ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
      ShowText(["\\n<Queen Vampire>Fufu... An honest fellow.\nI must meet that expectation."])
      Script(["change_friend(10)"])
      Empty([])

    When([3, "僕"])
      Empty([])

    ChoicesEnd([])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 40, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>Become my husband!\nThen I shall grant you eternal pleasure!"])
    ShowChoices([["I refuse!", "I gladly accept!", "I already have a lover"], 0])
    When([0, "断る！"])
      ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
      ShowText(["\\n<Queen Vampire>Kuku, you're persistent...\nThe real pleasure will be forcing you to surrender to me."])
      Script(["change_friend(5)"])
      Empty([])

    When([1, "喜んで！"])
      ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
      ShowText(["\\n<Queen Vampire>Kuku, intriguing.\nThen I shall shower you with Affinity  after this battle..."])
      Script(["change_friend(10)"])
      Empty([])

    When([2, "すでに情夫だ"])
      ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
      ShowText(["\\n<Queen Vampire>What a hasty fellow...\nVery well, I'll let her love you."])
      Script(["change_friend(10)"])
      Empty([])

    ChoicesEnd([])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 50, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>If you were to become a king...\nWhat would you do?"])
    ShowChoices([["Bring world peace", "Eat delicious food", "Make a harem"], 0])
    When([0, "世界を平和に"])
      ShowTextAttributes(["queenvampire_fc1", 2, 0, 2])
      ShowText(["\\n<Queen Vampire>Hmph, what a foolish answer...\nA king who naturally adopts a stance of peace, there is nothing prideful about that reply."])
      Empty([])

    When([1, "美味しいものを食べる"])
      ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
      ShowText(["\\n<Queen Vampire>To satisfy your appetite...\nI see you're very loyal to your instincts."])
      Script(["change_friend(5)"])
      Empty([])

    When([2, "ハーレムを作る"])
      ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
      ShowText(["\\n<Queen Vampire>Fufufu, how lecherous...\nYou're a very amusing fellow."])
      Script(["change_friend(10)"])
      Empty([])

    ChoicesEnd([])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  Label(["要求"])
  ControlVariables([13, 13, 0, 2, 1, 30])
  ConditionalBranch([1, 13, 0, 10, 2])
    ConditionalBranch([8, 313])
      ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
      ShowText(["\\n<Queen Vampire>Offer a tomato to me..."])
      ControlVariables([24, 24, 0, 3, 0, 313, 0])
      ShowTextAttributes(["", 0, 0, 2])
      ShowText(["Do you want to give a \\ii[313]? (Have:\\V[24])"])
      ShowChoices([["Yes", "No"], 2])
      When([0, "はい"])
        ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
        ShowText(["\\n<Queen Vampire>Yes, this satisfies me."])
        ChangeItems([313, 1, 0, 1])
        Script(["change_friend(20)"])
        ExitEventProcessing([])
        Empty([])

      When([1, "いいえ"])
        ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
        ShowText(["\\n<Queen Vampire>Would you rather offer your life instead...?"])
        ExitEventProcessing([])
        Empty([])

      ChoicesEnd([])
      Empty([])

    Else([])
      ControlVariables([13, 13, 0, 0, 20])
      Empty([])

    BranchEnd([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 20, 2])
    ConditionalBranch([8, 368])
      ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
      ShowText(["\\n<Queen Vampire>Offer some sushi to me..."])
      ControlVariables([24, 24, 0, 3, 0, 368, 0])
      ShowTextAttributes(["", 0, 0, 2])
      ShowText(["Do you want to give some \\ii[368]? (Have:\\V[24])"])
      ShowChoices([["Yes", "No"], 2])
      When([0, "はい"])
        ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
        ShowText(["\\n<Queen Vampire>Yes, this satisfies me."])
        ChangeItems([368, 1, 0, 1])
        Script(["change_friend(30)"])
        ExitEventProcessing([])
        Empty([])

      When([1, "いいえ"])
        ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
        ShowText(["\\n<Queen Vampire>Would you rather offer your life instead...?"])
        ExitEventProcessing([])
        Empty([])

      ChoicesEnd([])
      Empty([])

    Else([])
      ControlVariables([13, 13, 0, 0, 30])
      Empty([])

    BranchEnd([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 30, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>Offer your wealth to me..."])
    ConditionalBranch([7, 3300, 0])
      ControlVariables([24, 24, 0, 3, 7, 2, 0])
      ShowTextAttributes(["", 0, 0, 2])
      ShowText(["Do you want to give 3300G? (Remaining:\\V[24])"])
      ShowChoices([["Yes", "No"], 2])
      When([0, "はい"])
        ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
        ShowText(["\\n<Queen Vampire>Yes, this satisfies me."])
        ChangeGold([1, 0, 3300])
        Script(["change_friend(25)"])
        ExitEventProcessing([])
        Empty([])

      When([1, "いいえ"])
        ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
        ShowText(["\\n<Queen Vampire>Would you rather offer your life instead...?"])
        ExitEventProcessing([])
        Empty([])

      ChoicesEnd([])
      Empty([])

    Else([])
      ShowTextAttributes(["queenvampire_fc1", 2, 0, 2])
      ShowText(["\\n<Queen Vampire>...How could you have nothing at all?"])
      ExitEventProcessing([])
      Empty([])

    BranchEnd([])
    Empty([])

  BranchEnd([])
  Label(["贈与"])
  ControlVariables([13, 13, 0, 2, 1, 30])
  ConditionalBranch([1, 25, 0, 1, 0])
    ControlVariables([13, 13, 0, 0, 30])
    ControlVariables([25, 25, 0, 0, 0])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 25, 0, 2, 0])
    ControlVariables([13, 13, 0, 2, 1, 20])
    ControlVariables([25, 25, 0, 0, 0])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 10, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>I will grant you this crystallization of my power..."])
    PlaySE(["RPG::SE(@name=\"Item1\", @pitch=100, @volume=80)"])
    ChangeItems([236, 0, 0, 1])
    ShowTextAttributes(["", 0, 0, 2])
    ShowText(["Queen Vampire gave you a \\ii[236]!"])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 20, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>I will grant you this dark magic stone..."])
    PlaySE(["RPG::SE(@name=\"Item1\", @pitch=100, @volume=80)"])
    ChangeItems([81, 0, 0, 1])
    ShowTextAttributes(["", 0, 0, 2])
    ShowText(["Queen Vampire gave you a \\ii[81]!"])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  ConditionalBranch([1, 13, 0, 30, 2])
    ShowTextAttributes(["queenvampire_fc1", 0, 0, 2])
    ShowText(["\\n<Queen Vampire>I will grant you this money, do not squander it..."])
    PlaySE(["RPG::SE(@name=\"Item1\", @pitch=100, @volume=80)"])
    ChangeGold([0, 0, 5500])
    ShowTextAttributes(["", 0, 0, 2])
    ShowText(["Queen Vampire gave you 5500G!"])
    ExitEventProcessing([])
    Empty([])

  BranchEnd([])
  Empty([])
