bcdice 3.0.0.pre.alpha.1

data/lib/bcdice/game_system/Utakaze.rb

@@ -0,0 +1,153 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class Utakaze < Base
+      # ゲームシステムの識別子
+      ID = 'Utakaze'
+
+      # ゲームシステム名
+      NAME = 'ウタカゼ'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'うたかせ'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~MESSAGETEXT
+        ・行為判定ロール（nUK）
+          n個のサイコロで行為判定ロール。ゾロ目の最大個数を成功レベルとして表示。nを省略すると2UK扱い。
+          例）3UK ：サイコロ3個で行為判定
+          例）UK  ：サイコロ2個で行為判定
+          不等号用いた成否判定は現時点では実装してません。
+        ・クリティカルコール付き行為判定ロール（nUK@c or nUKc）
+        　cに「龍のダイス目」を指定した行為判定ロール。
+          ゾロ目ではなく、cと同じ値の出目数x2が成功レベルとなります。
+          例）3UK@5 ：龍のダイス「月」でクリティカルコール宣言したサイコロ3個の行為判定
+      MESSAGETEXT
+
+      register_prefix(['\d*UK[@\d]*.*'])
+
+      def initialize(command)
+        super(command)
+        @arrayDragonDiceName = ['', '風', '雨', '雲', '影', '月', '歌']
+        @enabled_upcase_input = false
+      end
+
+      def eval_game_system_specific_command(command)
+        debug('eval_game_system_specific_command command', command)
+
+        result = ''
+
+        case command
+        when /(\d+)?UK(\@?(\d))?(>=(\d+))?/i
+          base = (Regexp.last_match(1) || 2).to_i
+          crit = Regexp.last_match(3).to_i
+          diff = Regexp.last_match(5).to_i
+          result = checkRoll(base, crit, diff)
+        end
+
+        return nil if result.empty?
+
+        return "#{command} ＞ #{result}"
+      end
+
+      def checkRoll(base, crit, diff = 0)
+        result = ""
+
+        base = getValue(base)
+        crit = getValue(crit)
+
+        return result if base < 1
+
+        crit = 6 if crit > 6
+
+        result += "(#{base}d6)"
+
+        diceList = @randomizer.roll_barabara(base, 6).sort
+
+        result += " ＞ [#{diceList.join(',')}] ＞ "
+        result += getRollResultString(diceList, crit, diff)
+
+        return result
+      end
+
+      def getRollResultString(diceList, crit, diff)
+        success, maxnum, setCount = getSuccessInfo(diceList, crit, diff)
+
+        result = ""
+
+        if isDragonDice(crit)
+          result += "龍のダイス「#{@arrayDragonDiceName[crit]}」(#{crit})を使用 ＞ "
+        end
+
+        if  success
+          result += "成功レベル:#{maxnum} (#{setCount}セット)"
+          if diff != 0
+            diffSuccess = (maxnum >= diff)
+            if diffSuccess
+              result += " ＞ 成功"
+            else
+              result += " ＞ 失敗"
+            end
+          end
+
+        else
+          result += "失敗"
+        end
+
+        return result
+      end
+
+      def getSuccessInfo(diceList, crit, _diff)
+        debug("checkSuccess diceList, crit", diceList, crit)
+
+        diceCountHash = getDiceCountHash(diceList, crit)
+        debug("diceCountHash", diceCountHash)
+
+        maxnum = 0
+        successDiceList = []
+        countThreshold = (isDragonDice(crit) ? 1 : 2)
+
+        diceCountHash.each do |dice, count|
+          maxnum = count if  count > maxnum
+          successDiceList << dice if count >= countThreshold
+        end
+
+        debug("successDiceList", successDiceList)
+
+        if successDiceList.size <= 0
+          # 失敗：ゾロ目無し(全部違う)
+          return false, 0, 0
+        end
+
+        # 竜のダイスの場合
+        maxnum *= 2 if isDragonDice(crit)
+
+        # 成功：ゾロ目あり
+        return true, maxnum, successDiceList.size
+      end
+
+      # 各ダイスの個数を数えてHashにする
+      def getDiceCountHash(dice_list, critical)
+        dice_list
+          .select { |dice| isNomalDice(critical) || dice == critical }
+          .group_by(&:itself)
+          .transform_values(&:size)
+      end
+
+      def isNomalDice(crit)
+        !isDragonDice(crit)
+      end
+
+      def isDragonDice(crit)
+        (crit != 0)
+      end
+
+      def getValue(number)
+        return 0 if number > 100
+
+        return number
+      end
+    end
+  end
+end

data/lib/bcdice/game_system/VampireTheMasquerade5th.rb

@@ -0,0 +1,132 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class VampireTheMasquerade5th < Base
+      # ゲームシステムの識別子
+      ID = 'VampireTheMasquerade5th'
+
+      # ゲームシステム名
+      NAME = 'Vampire: The Masquerade 5th Edition'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'うあんはいあさますかれえと5'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~MESSAGETEXT
+        ・判定コマンド(nVMFx+x)
+          注意：難易度は必要成功数を表す
+
+          難易度指定：判定成功と失敗、Critical判定、
+                     （Hungerダイスがある場合）Messy CriticalとBestial Failureチェックを行う
+          例) (難易度)VMF(ダイスプール)+(Hungerダイス)
+              (難易度)VMF(ダイスプール)
+
+          難易度省略：判定失敗、Critical、（Hungerダイスがある場合）Bestial Failureチェックを行う
+                      判定成功、Messy Criticalのチェックを行わない
+          例) VMF(ダイスプール)+(Hungerダイス)
+              VMF(ダイスプール)
+
+          難易度0指定：全てのチェックを行わない
+          例) 0VMF(ダイスプール)+(Hungerダイス)
+              0VMF(ダイスプール)
+
+      MESSAGETEXT
+
+      DIFFICULTY_INDEX   = 1
+      DICE_POOL_INDEX    = 3
+      HUNGER_DICE_INDEX  = 5
+
+      # 難易度に指定可能な特殊値
+      NOT_CHECK_SUCCESS = -1 # 判定成功にかかわるチェックを行わない(判定失敗に関わるチェックは行う)
+
+      # ダイスボットで使用するコマンドを配列で列挙する
+      register_prefix(['\d*VMF.*'])
+
+      def eval_game_system_specific_command(command)
+        m = /\A(\d+)?(VMF)(\d+)(\+(\d+))?/.match(command)
+        unless m
+          return ''
+        end
+
+        dice_pool = m[DICE_POOL_INDEX].to_i
+        dice_text, success_dice, ten_dice, = make_dice_roll(dice_pool)
+        result_text = "(#{dice_pool}D10"
+
+        hunger_dice_pool = m[HUNGER_DICE_INDEX]&.to_i
+        if hunger_dice_pool
+          hunger_dice_text, hunger_success_dice, hunger_ten_dice, hunger_botch_dice = make_dice_roll(hunger_dice_pool)
+
+          ten_dice += hunger_ten_dice
+          success_dice += hunger_success_dice
+
+          result_text = "#{result_text}+#{hunger_dice_pool}D10) ＞ [#{dice_text}]+[#{hunger_dice_text}] "
+        else
+          hunger_ten_dice = 0
+          hunger_botch_dice = 0
+          result_text = "#{result_text}) ＞ [#{dice_text}] "
+        end
+
+        success_dice += get_critical_success(ten_dice)
+
+        difficulty = m[DIFFICULTY_INDEX] ? m[DIFFICULTY_INDEX].to_i : NOT_CHECK_SUCCESS
+
+        result_text = "#{result_text} 成功数=#{success_dice}"
+
+        if difficulty > 0
+          if success_dice >= difficulty
+            judgment_result = get_success_result(ten_dice >= 2, hunger_ten_dice)
+          else
+            judgment_result = get_fail_result(hunger_botch_dice)
+          end
+          result_text = "#{result_text} 難易度=#{difficulty}#{judgment_result}"
+        elsif difficulty < 0
+          if success_dice == 0
+            judgment_result = get_fail_result(hunger_botch_dice)
+          else
+            judgment_result = ""
+          end
+          result_text = "#{result_text}#{judgment_result}"
+        end
+
+        return result_text
+      end
+
+      def get_critical_success(ten_dice)
+        # 10の目が2個毎に追加2成功
+        return ((ten_dice / 2) * 2)
+      end
+
+      def make_dice_roll(dice_pool)
+        dice_list = @randomizer.roll_barabara(dice_pool, 10)
+
+        dice_text = dice_list.join(',')
+        success_dice = dice_list.count { |x| x >= 6 }
+        ten_dice = dice_list.count(10)
+        botch_dice = dice_list.count(1)
+
+        return dice_text, success_dice, ten_dice, botch_dice
+      end
+
+      def get_success_result(is_critical, hunger_ten_dice)
+        judgment_result = "：判定成功!"
+        if hunger_ten_dice > 0 && is_critical
+          return "#{judgment_result} [Messy Critical]"
+        elsif is_critical
+          return "#{judgment_result} [Critical Win]"
+        end
+
+        return judgment_result
+      end
+
+      def get_fail_result(hunger_botch_dice)
+        judgment_result = "：判定失敗!"
+        if hunger_botch_dice > 0
+          return "#{judgment_result} [Bestial Failure]"
+        end
+
+        return judgment_result
+      end
+    end
+  end
+end

data/lib/bcdice/game_system/Villaciel.rb

@@ -0,0 +1,555 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class Villaciel < Base
+      # ゲームシステムの識別子
+      ID = 'Villaciel'
+
+      # ゲームシステム名
+      NAME = '蒼天のヴィラシエル'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'そうてんのういらしえる'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~MESSAGETEXT
+        ・判定　　　　　　　　nVBS[>=d]
+        　[]内省略時は達成数の計算のみ。トライアンフあり。
+        　n: ダイス数、d: 難易度
+        ・フロンティア判定　　nVF
+        　n: ダイス数
+        　nVBSを行い、うでまえ表を参照した結果を表示します。
+        ・採掘スキル判定　　　nVM
+        　n: ダイス数
+        　判定に成功した場合、自動的に獲得できるアイテム数も表示されます。
+        ・宝石加工スキル判定　nVG
+        　n: ダイス数
+        ・前職表　　　　　　　PJ[x]    x=V,A
+        　[]内は省略可能。
+        　PJ, PJV: 「蒼天のヴィラシエル」掲載の前職表　PJA: 「白雲のアルメサール」掲載の前職表
+        ・ぷちクエスト表　　　PQ[x]    x=V,A
+        　[]内は省略可能。
+        　PQ, PQV: 「蒼天のヴィラシエル」掲載のぷちクエスト表　PQA: 「白雲のアルメサール」掲載のぷちクエスト表
+        ・アクシデント表　　　AC
+        ・もふもふ表　　　　　MMx      x=I,A,V,VV,VA,D
+          MMI: 昆虫　MMA: 動物　MMV, MMVV: ヴィラシエル種（「蒼天のヴィラシエル」掲載）　MMVA: ヴィラシエル種（「白雲のアルメサール」掲載）　MMD: 鋼龍種
+        ・釣り表　　　　　　　Fx       x=L,R,W,G,B,C,S
+        　FL: 湖　FR: 河　FW: 白雲　FG: 灰雲　FB: 黒雲　FC: 共通　FS: 塩湖
+        ・不食植物表　　　　　IP[x]    x=V,A
+        　IP, IPV: 「蒼天のヴィラシエル」掲載の不食植物表　IPA: 「白雲のアルメサール」掲載の不食植物表
+        ・可食植物表　　　　　EP[x][n] x=V,A
+        　[]内は省略可能。
+        　n: 可食植物表番号
+        　EP[n], EPV[n]: 「蒼天のヴィラシエル」掲載の可食植物表。[]内省略時はnを1D6で決定し、EPVnを実行。ただし、1D6の出目が6ならば、「好きな表を選んでおっけー！」と表示。
+        　EPA[n]: 「白雲のアルメサール」掲載の可食植物表。[]内省略時は1D6を振り、出目が偶数ならばEPA1、奇数ならばEPA2を実行。
+        ・変異植物表　　　　　MP
+        ・改良種表　　　　　　IS
+      MESSAGETEXT
+
+      register_prefix(['\\d+VBS(>=\\d+)?', '\\d+VF', '\\d+VM', '\\d+VG', 'PJ[VA]?', 'PQ[VA]?', 'AC', 'MM([IAD]|V[VA]?)', 'F[LRWGBCS]', 'IP[VA]?', 'EP[VA]?\\d?', 'MP', 'IS'])
+
+      def initialize(command)
+        super(command)
+
+        @enabled_d66 = true
+        @d66_sort_type = D66SortType::NO_SORT # D66あり。ただし、現行ルールにある6x6の表については別のコマンドを用意
+        @round_type = RoundType::CEIL # 端数は切り上げ
+      end
+
+      def eval_game_system_specific_command(command)
+        case command
+        when /\d+VBS/
+          resolute_action(command)
+        when /\d+VF/
+          resolute_frontier_action(command)
+        when /\d+VM/
+          resolute_mining_action(command)
+        when /\d+VG/
+          resolute_cutting_gem_action(command)
+        when /PJ[VA]?/
+          use_previous_job_chart(command)
+        when /PQ[VA]?/
+          use_petit_quest_chart(command)
+        when 'AC'
+          use_accident_chart(command)
+        when /MM([IAD]|V[VA]?)/
+          use_mohumohu_chart(command)
+        when /F[LRWGBCS]/
+          use_fishing_chart(command)
+        when /IP[VA]?/
+          use_inedible_plant_chart(command)
+        when /EP[VA]?\d?/
+          use_edible_plant_chart(command)
+        when 'MP'
+          use_mutant_plant_chart(command)
+        when 'IS'
+          use_improved_species_chart(command)
+        end
+      end
+
+      private
+
+      D6 = 6
+      LEAST_SUCCESS_ROLL = 4
+      SUCCESS_STR = ' ＞ 成功'
+      FAILURE_STR = ' ＞ 失敗'
+
+      def derive_achievement(num_dices, command)
+        # 達成数計算の際にはトライアンフ「出目が6だったダイスは達成数2としてカウントする」を考慮する必要があるが、要は「達成数=成功数+出目が最大値だったダイスの数」になる
+        dice_list = @randomizer.roll_barabara(num_dices, D6)
+        dice_str = dice_list.join(",")
+        num_triumph_dices = dice_list.count(6)
+        num_successes = dice_list.count { |dice| dice >= LEAST_SUCCESS_ROLL }
+        achievement = num_successes + num_triumph_dices
+
+        output = "(#{command}) ＞ [#{dice_str}] ＞ 達成数: #{achievement}"
+        return achievement, output
+      end
+
+      def resolute_action(command)
+        match_data = command.match(/(\d+)VBS(>=(\d+))?/)
+
+        num_dices = match_data[1].to_i
+        achievement, output = derive_achievement(num_dices, command)
+        return output unless match_data[2]
+
+        difficulty = match_data[3].to_i
+        output += achievement >= difficulty ? SUCCESS_STR : FAILURE_STR
+
+        return output
+      end
+
+      SKILL_CHART = ['左に3マス、上に3マス動かす', '左に2マス、上に2マス動かす', '右か下に1マス動かしてもよい', '右に1マス、下に1マス動かす', '好きな方向に最大で3マス動かしてもよい（1マスでも良い）', '好きな方向に最大で5マス動かしてもよい（1〜3マスでもよい）'].freeze
+
+      def resolute_frontier_action(command)
+        num_dices = command.match(/(\d+)VF/)[1].to_i
+        achievement, output = derive_achievement(num_dices, command)
+
+        chart_index =
+          case achievement
+          when 0..2
+            achievement
+          when 3, 4
+            3
+          when 5..8
+            4
+          else
+            5
+          end
+
+        skill = SKILL_CHART[chart_index]
+        return "#{output} ＞ #{skill}"
+      end
+
+      def resolute_difficult_action(num_dices, least_success_roll, command)
+        # 1個でもleast_success_roll以上の出目が出たら成功となる判定
+
+        # 出目の最大値がnならば「1個でもn以上の出目が出た」ことになる
+        dice_list = @randomizer.roll_barabara(num_dices, D6)
+        dice_str = dice_list.join(',')
+        largest_roll = dice_list.max()
+        is_successful = largest_roll >= least_success_roll
+
+        output = "(#{command}) ＞ [#{dice_str}]"
+        output += is_successful ? SUCCESS_STR : FAILURE_STR
+
+        return output, is_successful
+      end
+
+      LEAST_MINING_SUCCESS_ROLL = 5
+      LEAST_GEM_SUCCESS_ROLL = 6
+
+      def resolute_mining_action(command)
+        num_dices = command.match(/(\d+)VM/)[1].to_i
+        output, is_successful = resolute_difficult_action(num_dices, LEAST_MINING_SUCCESS_ROLL, command)
+        return output unless is_successful
+
+        roll_result = @randomizer.roll_once(D6)
+        "#{output} ＞ (1D6) ＞ [#{roll_result}] ＞ アイテムを#{roll_result}個獲得"
+      end
+
+      def resolute_cutting_gem_action(command)
+        num_dices = command.match(/(\d+)VG/)[1].to_i
+        resolute_difficult_action(num_dices, LEAST_GEM_SUCCESS_ROLL, command)[0]
+      end
+
+      VILLACIEL_PREVIOUS_JOB_CHART = [['農家: 知力+1 器用さ+1 開拓／1Lv',
+                                       '漁師: 知力+1 ひらめき+1 釣り／1Lv',
+                                       '狩人: 武力+1 ひらめき+1 穴掘り／1Lv',
+                                       '鍛冶職人: 武力+1 器用さ+1 採掘／1Lv',
+                                       '牧場主: 仲良し+2 開拓／1Lv',
+                                       '採掘師: 器用さ+1 ひらめき+1 採掘／1Lv'].freeze,
+                                      ['家事手伝い: 器用さ+1 仲良し+1 調理／1Lv',
+                                       '調理師: 知力+1 ひらめき+1 調理／1Lv',
+                                       '細工師: 器用さ+2 採掘／1Lv',
+                                       '大工: 武力+1 器用さ+1 木こり／1Lv',
+                                       '荒くれ者: 武力+2 穴掘り／1Lv',
+                                       '王国騎士: 武力+1 知力+1 木こり／1Lv'].freeze].freeze
+      ARMESEAR_PREVIOUS_JOB_CHART = [['農家: 知力+1 器用さ+1 開拓／1Lv',
+                                      '漁師: 知力+1 ひらめき+1 釣り／1Lv',
+                                      '狩人: 武力+1 ひらめき+1 穴掘り／1Lv',
+                                      '鍛冶職人: 武力+1 器用さ+1 採掘／1Lv',
+                                      '牧場主: 仲良し+2 開拓／1Lv',
+                                      '採掘師: 器用さ+1 ひらめき+1 採掘／1Lv'].freeze,
+                                     ['羊飼い: 仲良し+2 もふもふ／1Lv',
+                                      '芽拾い: 知力+1 武力+1 採集／1Lv',
+                                      '服屋見習い: 器用さ+2 裁縫／1Lv',
+                                      '革細工見習い: 知力+2 裁縫／1Lv',
+                                      '商人: 知力+1 仲良し+1 基礎になるスキル／1Lv',
+                                      '旅人: 武力+1 知力+1 基礎になるスキル／1Lv'].freeze,
+                                     ['家事手伝い: 器用さ+1 仲良し+1 調理／1Lv',
+                                      '調理師: 知力+1 ひらめき+1 調理／1Lv',
+                                      '細工師: 器用さ+2 採掘／1Lv or 調合・細工／1Lv',
+                                      '大工: 武力+1 器用さ+1 木こり／1Lv',
+                                      '荒くれ者: 武力+2 穴掘り／1Lv',
+                                      '王国騎士: 武力+1 知力+1 木こり／1Lv'].freeze].freeze
+
+      def use_previous_job_chart(command)
+        match_data = command.match(/PJ([VA]?)/)
+        chart_symbol = match_data[1] == '' ? 'V' : match_data[1]
+
+        roll_result1 = @randomizer.roll_once(D6)
+        chart_text, roll_result2 = case chart_symbol
+                                   when 'V' then get_table_by_1d6(VILLACIEL_PREVIOUS_JOB_CHART[(roll_result1 - 1) / 3])
+                                   when 'A' then get_table_by_1d6(ARMESEAR_PREVIOUS_JOB_CHART[(roll_result1 - 1) / 2])
+                                   end
+
+        chart_title = case chart_symbol
+                      when 'V' then '前職表（ヴィラシエル）'
+                      when 'A' then '前職表（アルメサール）'
+                      end
+        "#{chart_title} ＞ [#{roll_result1},#{roll_result2}] ＞ #{chart_text}"
+      end
+
+      VILLACIEL_PETIT_QUEST_CHART = [['家の補強のために: 【目的：木を1個納品】【報酬：各自2プサイ】見えを張っていい木材で家を作ったら木材が枯渇しちまった。頼む、原木を分けてくれないか？',
+                                      '孫のために: 【目的：花を1個納品】【報酬：各自2プサイ】綺麗な花があればいい色に染められるだろうと思うてな。孫のために必要なの。',
+                                      '人間界の草: 【目的：草を2個納品】【報酬：各自3プサイ】魔界にはない草が生えていると噂で聞いたことがある。その草がほしい。',
+                                      '種の生存のために: 【目的：可食植物（改良種を除く）を1個納品】【報酬：各自1プサイ】育ちが悪い同種の植物と掛け合わせてみたいのでサンプルがほしい。',
+                                      'にんげんのたべもの！: 【目的：可食植物（改良種を除く）を1個納品】【報酬：各自2プサイ】ひゅーいあはなにをたべるの！ たべたい！',
+                                      'まかいのたべものって？: 【目的：可食植物の改良種を2個納品】【報酬：各自3プサイ】まぞくさんはなにたべるですか！ おしえてください。'].freeze,
+                                     ['おうちなおしたいの！: 【目的：石材を1個納品】【報酬：各自1プサイ】おうちがぼろぼろだから、ママのかわりになおしたいの。',
+                                      '娘の結婚式に必要なんだ！: 【目的：宝石を2個納品】【報酬：各自3プサイ】ちょっとさきなんですが、娘が結婚するので結婚式用の宝石を集めています。',
+                                      '金属がたりない！: 【目的：金属を1個納品】【報酬：各自2プサイ】いい武器にはいい金属を。今回必要なのは……。',
+                                      '村の聖堂を直したいんだ！: 【目的：石材を1個納品】【報酬：各自2プサイ】聖堂を直していたが石材がたりない！',
+                                      '弟の甲冑に使うんだ！: 【目的：金属を2個納品】【報酬：各自3プサイ】最近、近くの鉱山から「ある金属」が姿を消した。',
+                                      'おねえちゃんのたんじょうびに: 【目的：宝石を1個納品】【報酬：各自2プサイ】たんじょうびぷれぜんとにほうせきあげたらおねえちゃんよろこぶかな？'].freeze,
+                                     ['パパのために: 【目的：木材の家具を1個納品】【報酬：各自2プサイ】はたらいてばっかりのパパにプレゼントしたいの。おねがいします！',
+                                      '癒やされたい……: 【目的：石材の家具を1個納品】【報酬：各自2プサイ】仕事時間は短いとはいえ、激務。めちゃつらい。癒しになる家具がほしい。',
+                                      'いい家具に囲まれてみたい: 【目的：金属の家具を1個納品】【報酬：各自2プサイ】開拓も最高だけど、他の島の人とも交流したい。人を呼べるような家を作るためには最高の家具が必要！',
+                                      '家具の在庫不足: 【目的：木材の装飾品を1個納品】【報酬：各自3プサイ】困ったことに職人に逃げられた！ このままじゃ、お店開けない！！',
+                                      'と、ともだちにあげるの！: 【目的：石材の装飾品を1個納品】【報酬：各自3プサイ】えっと、お、おきにいりのともだちがいるんだ。そ、そのこのたんじょうびだから、プレゼントしたくって。',
+                                      '親の木に飾りを: 【目的：金属の装飾品を1個納品】【報酬：各自3プサイ】元気のない親の木を心配してペッコ達が大騒ぎしているんだ。君はいつまでも美しいよと伝えたくてね。一つ助力をお願いするよ。'].freeze,
+                                     ['そちらの河魚を食してみたい: 【目的：河魚を2個納品】【報酬：各自3プサイ】おいしい河魚がいるときいたことがあるのです。さぁ、はやく、釣ってきてくださいまし。',
+                                      '研究に使用したい: 【目的：湖魚を1個納品】【報酬：各自1プサイ】そちらの世界にある同名の魚が本当にこちらの世界にいるものと一緒か確かめたいのです。',
+                                      'しろいくもにすむおさかながみたい！: 【目的：白雲の雲魚を1個納品】【報酬：各自2プサイ】こっちにはしろいくもってなかなかないの！ しろいくものおさかな、たべてみたいな。',
+                                      '釣り師がいないのでお魚がほしい: 【目的：灰雲の雲魚を2個納品】【報酬：各自3プサイ】野菜や肉もいいが魚も食べたい……。頼む、魚を釣ってきてくれないか？',
+                                      'まっくろなくもにすむおさかな！: 【目的：黒雲の雲魚を1個納品】【報酬：各自2プサイ】まっくろなくもにはどんなさかながすんでるの？ みせて、みせて！',
+                                      '人間界では見られない魚が見たい！: 【目的：共通の雲魚を1個納品】【報酬：各自2プサイ】他の魚の雲を利用して泳ぎ回る魚がいると聞いたよ。ぜひ見せてほしいな。'].freeze].freeze
+      ARMESEAR_PETIT_QUEST_CHART = [['お祭り用の布が足りないの！: 【目的：布を2個納品】【報酬：各自4プサイ】お祭り前なのに、布職人が腰を痛めちゃったの！',
+                                     'お洋服がぼろぼろになっちゃったの: 【目的：布を1個納品】【報酬：各自2プサイ】おばあちゃんに作ってもらった服がボロボロになっちゃったから、なおしたいの。',
+                                     'ぎっくり腰からのヘルプ: 【目的：薪を3個納品】【報酬：各自3プサイ】仕事してたらぎっくり腰になっちゃったのだ。頼むのだ。',
+                                     '不調には栄養たっぷりのミルクを: 【目的：ミルクを1個納品】【報酬：各自3プサイ】体調を崩しちゃったの。栄養満点のミルクを頂戴。',
+                                     '材料がたりない！: 【目的：？？？の粗皮を1個納品】【報酬：各自3プサイ】革細工師を目指してるんだけど、皮が足りないんだ。種類は問わないから、早めに頼むよ。',
+                                     '愛しのガードナーのために: 【目的：？？？の肉を1個納品】【報酬：各自3プサイ】ガードナーの調子が悪いから、栄養をつけさせたいんだ。肉はなんだっていい、とびっきりのを頼むよ。'].freeze,
+                                    ['灯火をひとつ: 【目的：キャンドルを1個納品】【報酬：各自3プサイ】家の裏に知らない建物があるんだ。まっくらだから明かりが必要で……。',
+                                     '布の色を頂戴: 【目的：染料を1個納品】【報酬：各自2プサイ】んー、コンテストのために布を織ったのだけど、色が決められないんだ。お願いするよ。',
+                                     'きれいなのお花を: 【目的：花を1個納品】【報酬：各自2プサイ】パパの誕生日プレゼントを妹と作りたいんだ。お願いできる？',
+                                     '旅立ちのために: 【目的：衣類を1個納品】【報酬：各自15プサイ】旅立つ弟に服をプレゼントしたいんだ。',
+                                     '納品物が足りない！: 【目的：革を1個納品】【報酬：各自4プサイ】どうしても納品する皮がたりない……頼む、なんとか用意できないか？',
+                                     '求）照明: 【目的：照明を1個納品】【報酬：各自10プサイ】引っ越しする最中に照明を壊してしまった！ 明日から明かりがないのはつらい……。作ってくれないか？'].freeze,
+                                    ['装備の修復のため: 【目的：革を2個納品】【報酬：各自5プサイ】大事な装備が壊れちゃったんだ！ 直すのに必要なんだけど、革を持っているかい？',
+                                     '主に祝いの品を: 【目的：敷物を1個納品】【報酬：各自15プサイ】誕生日を迎える主にささやかなながらわたしからも祝いの品を送りたいのです。',
+                                     '手料理を求めて: 【目的：出来栄え5の料理を1個納品】【報酬：各自5プサイ】たまには誰かの料理が食べたいんだ。',
+                                     '釣り竿が折れちゃって……: 【目的：塩魚を2個納品】【報酬：各自3プサイ】釣り竿が折れちゃったから釣りができないんだ。一匹頼める？',
+                                     '蝋がほしいの: 【目的：蝋を1個納品】【報酬：各自2プサイ】お兄ちゃんとパパの誕生日プレゼントを作るの。見つからないからお願いできる？',
+                                     '美しさを求めて: 【目的：アルメサール産の花を1個納品】【報酬：各自3プサイ】美しいお花を摘んで来てくださらない？ 美のために必要でしてよ。'].freeze].freeze
+
+      def use_petit_quest_chart(command)
+        match_data = command.match(/PQ([VA]?)/)
+        chart_symbol = match_data[1] == '' ? 'V' : match_data[1]
+
+        roll_result1 = @randomizer.roll_once(D6)
+        chart_text, roll_result2 = case chart_symbol
+                                   when 'V'
+                                     chart_index = case roll_result1
+                                                   when 1, 2 then 0
+                                                   when 3, 4 then 1
+                                                   when 5 then 2
+                                                   when 6 then 3
+                                                   end
+                                     get_table_by_1d6(VILLACIEL_PETIT_QUEST_CHART[chart_index])
+                                   when 'A' then get_table_by_1d6(ARMESEAR_PETIT_QUEST_CHART[(roll_result1 - 1) / 2])
+                                   end
+
+        chart_title = case chart_symbol
+                      when 'V' then 'ぷちクエスト表（ヴィラシエル）'
+                      when 'A' then 'ぷちクエスト表（アルメサール）'
+                      end
+        "#{chart_title} ＞ [#{roll_result1},#{roll_result2}] ＞ #{chart_text}"
+      end
+
+      ACCIDENT_CHART = ['飛び猪襲来！: 空飛ぶ猪が浮遊島めがけて突撃してきた！ 建物が粉砕される前に迎撃だ！（「蒼天のヴィラシエル」P.46）',
+                        '嵐がくるぞ！: 嵐が来るらしいぞ！ どれだけ対策できるかが鍵だ！（「蒼天のヴィラシエル」P.47）',
+                        '雨が降らないぞ！: おかしいなぁ、雨が降らないぞぉ……？ こうなったら雨乞いの踊りだ！（「蒼天のヴィラシエル」P.48）',
+                        'トビウオ流星群: きらきら光る流れ星……いや待て！ あれはトビウオの群れだー！？（「蒼天のヴィラシエル」P.49）',
+                        'すごい雷雨: すごい。ごろごろばりばり聞こえてくる。これは早々に対策しないと直撃するぞ！（「蒼天のヴィラシエル」P.50）',
+                        '野菜泥棒出現！: 畑の野菜が盗まれているぞ……？ これは犯人を捕まえないと！（「蒼天のヴィラシエル」P.51）'].freeze
+
+      def use_accident_chart(_command)
+        chart_text, roll_result = get_table_by_1d6(ACCIDENT_CHART)
+        "アクシデント表 ＞ [#{roll_result}] ＞ #{chart_text}"
+      end
+
+      def use_6x6_chart(chart, chart_name)
+        # 6x6の表からランダムに参照する
+        # chartは文字列の配列の配列であることを仮定
+        # D66ロールによる表参照と近いが、D66の方は13, 42などの数値に対応した表なのに対し、こちらは「下3マス、右2マス」という風にセルを参照する
+        y_roll = @randomizer.roll_once(D6)
+        cell_text, x_roll = get_table_by_1d6(chart[y_roll - 1])
+        "#{chart_name} ＞ [#{y_roll},#{x_roll}] ＞ 下#{y_roll}マス、右#{x_roll}マス ＞ #{cell_text}"
+      end
+
+      MOHUMOHU_INSECT_CHART = [['小さな虫', '小さな虫', 'カマキリ', 'カマキリ', 'バッタ', 'クワガタ'].freeze,
+                               ['小さな虫', 'カラスアゲハ', 'カマキリ', 'バッタ', 'オオスカシバ', 'カイコ'].freeze,
+                               ['ハンミョウ', 'カラスアゲハ', 'カマキリ', 'バッタ', 'カイコ', 'トンボ'].freeze,
+                               ['ハンミョウ', 'カラスアゲハ', 'カラスアゲハ', 'チッチハチ', 'トンボ', 'トンボ'].freeze,
+                               ['クワガタ', 'カラスアゲハ', 'チッチハチ', 'チッチハチ', 'アリ', 'アリ'].freeze,
+                               ['クワガタ', 'チッチハチ', 'チッチハチ', 'チッチハチ', 'アリ', 'アリ'].freeze].freeze
+
+      MOHUMOHU_ANIMAL_CHART = [['トリサン', 'トリサン', 'ブタ', 'ヒツジ', 'タヌキ', 'タヌキ'].freeze,
+                               ['トリサン', 'ブタ', 'ヒツジ', 'ウッシ', 'キツネ', 'タヌキ'].freeze,
+                               ['ブタ', 'オグマ', 'ヒツジ', 'キツネ', 'キツネ', 'アタウサギ'].freeze,
+                               ['ブタ', 'ヒツジ', 'ヒツジ', 'リス', 'シシ', 'ヴィラシエル種(MMV)'].freeze,
+                               ['ウッシ', 'ウサギ', 'ウサギ', 'シシ', 'アタウサギ', 'オオカミ'].freeze,
+                               ['ウッシ', 'オグマ', 'クーマ', 'シシ', 'オオカミ', 'ヴィラシエル種(MMV)'].freeze].freeze
+
+      MOHUMOHU_VILLACIEL_CHART = [['ウドン', 'ウドン', 'オボン', 'オボン', 'オボン', 'オワン'].freeze,
+                                  ['ウドン', 'ウドン', 'オボン', 'オワン', 'オワン', 'オワン'].freeze].freeze
+
+      MOHUMOHU_VILLACIEL2_CHART = [['すねーくあし', 'すねーくあし', 'すねーくあし', 'ウタヒ', 'オオトリサン', 'オオトリサン'].freeze,
+                                   ['すねーくあし', 'すねーくあし', 'ホネホネ', 'オオトリサン', 'アマアマガニ', 'ホワホワ'].freeze,
+                                   ['すねーくあし', 'ホネホネ', 'オオトリサン', 'ウタヒ', 'アマアマガニ', 'ペロリ'].freeze,
+                                   ['オオトリサン', 'オオトリサン', 'ホネホネ', 'ホネホネ', 'ホワホワ', 'アマアマガニ'].freeze,
+                                   ['ホネホネ', 'ウタヒ', 'アマアマガニ', 'ペロリ', 'ペロリ', 'ペロリ'].freeze,
+                                   ['オオトリサン', 'ホワホワ', 'ホワホワ', 'アマアマガニ', 'ペロリ', 'ペロリ'].freeze].freeze
+
+      MOHUMOHU_DRAGON_CHART = [['モドモドリス', 'テロメ', 'モドモドリス', 'オジサン', 'オジサン', 'グロッチ'].freeze,
+                               ['テロメ', 'モドモドリス', 'オジサン', 'テロメ', 'ニホンツノ', 'グロッチ'].freeze,
+                               ['テロメ', 'グロッチ', 'グロッチ', 'グロッチ', 'オジサン', 'コディ'].freeze,
+                               ['モドモドリス', 'グロッチ', 'ニホンツノ', 'テロメ', 'テーリー', 'ケラプス'].freeze,
+                               ['オジサン', 'テロメ', 'テロメ', 'コディ', 'コディ', 'ケラプス'].freeze,
+                               ['コディ', 'テーリー', 'テーリー', 'コディ', 'ケラプス', 'アサール・ゴッツ'].freeze].freeze
+
+      def use_mohumohu_chart(command)
+        case command
+        when 'MMI' then use_6x6_chart(MOHUMOHU_INSECT_CHART, 'もふもふ表・昆虫')
+        when 'MMA' then use_6x6_chart(MOHUMOHU_ANIMAL_CHART, 'もふもふ表・動物')
+        when /MMV[VA]?/
+          match_data = command.match(/MMV([VA]?)/)
+          chart_symbol = match_data[1] == '' ? 'V' : match_data[1]
+
+          case chart_symbol
+          when 'V'
+            y_roll = @randomizer.roll_once(D6)
+            cell_text, x_roll = get_table_by_1d6(MOHUMOHU_VILLACIEL_CHART[1 - y_roll % 2])
+            "もふもふ表・ヴィラシエル種（ヴィラシエル） ＞ [#{y_roll},#{x_roll}] ＞ 下#{y_roll.even? ? '偶数' : '奇数'}、右#{x_roll}マス ＞ #{cell_text}"
+          when 'A' then use_6x6_chart(MOHUMOHU_VILLACIEL2_CHART, 'もふもふ表・ヴィラシエル種（アルメサール）')
+          end
+        when 'MMD' then use_6x6_chart(MOHUMOHU_DRAGON_CHART, 'もふもふ表・鋼龍種')
+        end
+      end
+
+      FISHING_LAKE_CHART = [['ヤマアイズリ', 'ヤマアイズリ', 'ヤマアイズリ', 'シコウチャ', 'シコウチャ', 'ハナロクショウ'].freeze,
+                            ['ヤマアイズリ', 'ヤマアイズリ', 'ヤマアイズリ', 'シコウチャ', 'ハナロクショウ', 'ハナロクショウ'].freeze,
+                            ['ヤマアイズリ', 'ヤマアイズリ', 'シコウチャ', 'シコウチャ', 'ハナモエギ', 'トノチャ'].freeze,
+                            ['ヤマアイズリ', 'カラスアゲハ', 'シコウチャ', 'ハナロクショウ', 'トノチャ', 'ハナモエギ'].freeze,
+                            ['シコウチャ', 'シコウチャ', 'ハナロクショウ', 'ハナロクショウ', 'トノチャ', 'ハナモエギ'].freeze,
+                            ['シコウチャ', 'ハナロクショウ', 'トノチャ', 'トノチャ', 'ハナモエギ', 'シンペキ'].freeze].freeze
+
+      FISHING_RIVER_CHART = [['ケイカンセキ', 'ケイカンセキ', 'ケイカンセキ', 'ケイカンセキ', 'カナリア', 'イワヌ'].freeze,
+                             ['ケイカンセキ', 'ケイカンセキ', 'カナリア', 'カナリア', 'カナリア', 'イワヌ'].freeze,
+                             ['ケイカンセキ', 'ケイカンセキ', 'カナリア', 'イワヌ', 'イワヌ', 'ヤマブキ'].freeze,
+                             ['ケイカンセキ', 'カナリア', 'イワヌ', 'アメイロ', 'アメイロ', 'ヤマブキ'].freeze,
+                             ['カナリア', 'カナリア', 'イワヌ', 'アメイロ', 'ヤマブキ', 'ヤマブキ'].freeze,
+                             ['カナリア', 'イワヌ', 'アメイロ', 'アメイロ', 'ヤマブキ', 'コハク'].freeze].freeze
+
+      FISHING_WHITE_CHART = [['ウメガサネ', 'ウメガサネ', 'ウメガサネ', 'ウメガサネ', 'ハネズ', 'ユルシ'].freeze,
+                             ['ウメガサネ', 'ウメガサネ', 'ウメガサネ', 'ハネズ', 'ソホ', 'シンク'].freeze,
+                             ['ウメガサネ', 'ウメガサネ', 'ハネズ', 'ソホ', 'ユルシ', 'ユルシ'].freeze,
+                             ['ウメガサネ', 'ハネズ', 'ソホ', 'ユルシ', 'シンク', 'シンク'].freeze,
+                             ['ハネズ', 'ソホ', 'ソホ', 'ユルシ', 'シンク', '共通(FC)'].freeze,
+                             ['ハネズ', 'ソホ', 'ユルシ', 'シンク', '共通(FC)', 'シュアン'].freeze].freeze
+
+      FISHING_GRAY_CHART = [['ウメガサネ', 'ウメガサネ', 'セイラン', 'セイラン', 'ミハナダ', 'ミハナダ'].freeze,
+                            ['ウメガサネ', 'セイラン', 'セイラン', 'ミハナダ', 'ミハナダ', 'ミハナダ'].freeze,
+                            ['ウメガサネ', 'ユルシ', 'ミハナダ', 'ミハナダ', 'ミハナダ', 'リンドウ'].freeze,
+                            ['ユルシ', 'ユルシ', 'セイラン', 'リンドウ', 'リンドウ', 'スミレ'].freeze,
+                            ['ユルシ', 'ユルシ', 'リンドウ', 'スミレ', 'スミレ', '共通(FC)'].freeze,
+                            ['ユルシ', 'リンドウ', 'スミレ', 'スミレ', '共通(FC)', 'シゴク'].freeze].freeze
+
+      FISHING_BLACK_CHART = [['セイラン', 'セイラン', 'テツコン', 'テツコン', 'ウスハナ', 'ウスハナ'].freeze,
+                             ['セイラン', 'セイラン', 'テツコン', 'ウスハナ', 'ウスハナ', 'フカガワネズミ'].freeze,
+                             ['セイラン', 'テツコン', 'ウスハナ', 'ウスハナ', 'ミハナダ', 'フカガワネズミ'].freeze,
+                             ['セイラン', 'テツコン', 'ミハナダ', 'ウスハナ', 'フカガワネズミ', 'フカガワネズミ'].freeze,
+                             ['セイラン', 'ウスハナ', 'ミハナダ', 'ミハナダ', 'ミハナダ', '共通(FC)'].freeze,
+                             ['テツコン', 'ウスハナ', 'ミハナダ', 'フカガワネズミ', '共通(FC)', 'ルリ'].freeze].freeze
+
+      FISHING_COMMON_CHART = [['トビウオ', 'トビウオ', 'トビウオ', 'オオガメ', 'ロブスター', 'オオサンショウウオ'].freeze,
+                              ['トビウオ', 'トビウオ', 'エイ', 'オオガメ', 'クジラ', 'ロブスター'].freeze,
+                              ['トビウオ', 'エイ', 'マグロ', 'マグロ', 'カジキ', 'イタチザメ'].freeze,
+                              ['トビウオ', 'ミズダコ', 'クラゲ', 'マグロ', 'オオクラゲ', 'ハンマーヘッド・シャーク'].freeze,
+                              ['トビウオ', 'エイ', 'オオガメ', 'オオガメ', 'イタチザメ', 'ミズダコ'].freeze,
+                              ['トビウオ', 'クラゲ', 'ロブスター', 'ハンマーヘッド・シャーク', 'ミズダコ', 'ダイオウイカ'].freeze].freeze
+
+      FISHING_SALT_LAKE_CHART = [['シラユリ', 'シラユリ', 'シラユリ', 'ゲッパク', 'ゲッパク', 'ゲッパク'].freeze,
+                                 ['シラユリ', 'シラユリ', 'シラユリ', 'ゲッパク', 'スズ', 'ナマリ'].freeze,
+                                 ['シラユリ', 'ゲッパク', 'ゲッパク', 'スズ', 'ナマリ', 'ナマリ'].freeze,
+                                 ['シラユリ', 'シラユリ', 'ナマリ', 'ナマリ', 'ナマリ', 'ナマリ'].freeze,
+                                 ['ゲッパク', 'ゲッパク', 'スズ', 'スズ', 'ロイロ', 'ロイロ'].freeze,
+                                 ['ナマリ', 'スズ', 'スズ', 'スズ', 'ロイロ', 'クロツルバミ'].freeze].freeze
+
+      def use_fishing_chart(command)
+        case command
+        when 'FL' then use_6x6_chart(FISHING_LAKE_CHART, '釣り・湖表')
+        when 'FR' then use_6x6_chart(FISHING_RIVER_CHART, '釣り・河表')
+        when 'FW' then use_6x6_chart(FISHING_WHITE_CHART, '釣り・白雲表')
+        when 'FG' then use_6x6_chart(FISHING_GRAY_CHART, '釣り・灰雲表')
+        when 'FB' then use_6x6_chart(FISHING_BLACK_CHART, '釣り・黒雲表')
+        when 'FC' then use_6x6_chart(FISHING_COMMON_CHART, '釣り・共通表')
+        when 'FS' then use_6x6_chart(FISHING_SALT_LAKE_CHART, '釣り・塩湖表')
+        end
+      end
+
+      INEDIBLE_PLANT_CHART = [['シュイの花', 'ダデオの花', 'ロキの花', 'シェラの花', 'トトイト', 'ポロネイマ'].freeze,
+                              ['シュイの花', 'ロキの花', 'アウディの花', 'イディウの花', 'トトイト', 'ポロネイマ'].freeze,
+                              ['ダデオの花', 'アウディの花', 'イディウの花', 'マトイト', 'ポポトマ', 'ルタタ'].freeze,
+                              ['シュイの花', 'ミカギの花', 'ロトイト', 'ロトイト', 'ツルイド', 'ルタタ'].freeze,
+                              ['ミカギの花', 'ロトイト', 'ロトイト', 'ツルイド', 'ルタタ', '変異植物(MP)'].freeze,
+                              ['トトイト', 'マトイト', 'ポポトマ', 'ツルイド', '変異植物(MP)', 'サボサボ'].freeze].freeze
+
+      INEDIBLE_PLANT2_CHART = [['マトラの花', 'マトラの花', '蜜蝋', 'ポルラの花', 'ウェスドの花', 'ポルラの花'].freeze,
+                               ['マトラの花', 'ホイの花', 'マトラの花', 'ウェスドの花', '蜜蝋', 'ロロの花'].freeze,
+                               ['ホイの花', 'ポルラの花', 'ウェスドの花', 'ホイの花', 'ポルラの花', 'ポルラの花'].freeze,
+                               ['ポルラの花', 'ホイの花', 'ロロの花', 'ウェスドの花', 'ポルラの花', 'ドダの実'].freeze,
+                               ['ポルラの花', 'ウェスドの花', 'ロロの花', 'ロロの花', 'ロロの花', 'ロロの花'].freeze,
+                               ['ウェスドの花', 'ロロの花', 'ポルラの花', 'ロロの花', 'ドダの実', 'ロロの花'].freeze].freeze
+
+      def use_inedible_plant_chart(command)
+        match_data = command.match(/IP([VA]?)/)
+        chart_symbol = match_data[1] == '' ? 'V' : match_data[1]
+
+        case chart_symbol
+        when 'V' then use_6x6_chart(INEDIBLE_PLANT_CHART, '不食植物表（ヴィラシエル）')
+        when 'A' then use_6x6_chart(INEDIBLE_PLANT2_CHART, '不食植物表（アルメサール）')
+        end
+      end
+
+      EDIBLE_PLANT_CHARTS = [[['小麦', '小麦', 'さつまいも', 'ねぎ', '白菜', 'きゅうり'].freeze,
+                              ['小麦', 'さつまいも', 'さといも', '白菜', '白菜', 'とうもろこし'].freeze,
+                              ['さといも', 'さといも', 'ねぎ', '白菜', 'とうもろこし', '枝豆'].freeze,
+                              ['シソ', 'ひらたけ', 'エリンギ', '枝豆', '枝豆', 'ラズベリー'].freeze,
+                              ['シソ', 'ひらたけ', 'ひらたけ', 'エリンギ', 'ラズベリー', 'さといも'].freeze,
+                              ['ナシ', 'ナシ', 'ナシ', 'ラズベリー', 'ラズベリー', 'さといも'].freeze].freeze,
+                             [['米', '米', 'にんじん', 'じゃがいも', 'ふき', 'まいたけ'].freeze,
+                              ['米', 'じゃがいも', 'じゃがいも', 'にら', 'ふき', 'きくらげ'].freeze,
+                              ['冬瓜', 'しょうが', '冬瓜', 'ふき', 'ふき', 'きくらげ'].freeze,
+                              ['しょうが', '冬瓜', 'ビワ', 'にら', 'まいたけ', 'まいたけ'].freeze,
+                              ['ビワ', 'ビワ', 'もも', 'かぼちゃ', 'グリーンピース', 'まいたけ'].freeze,
+                              ['ビワ', 'もも', 'もも', 'かぼちゃ', 'かぼちゃ', 'かぼちゃ'].freeze].freeze,
+                             [['もち米', 'トマト', 'オクラ', 'とうがらし', '大根', 'グミ'].freeze,
+                              ['もち米', 'オクラ', 'オクラ', '大根', '大根', 'とうがらし'].freeze,
+                              ['しいたけ', 'マッシュルーム', 'オクラ', 'グミ', '玉ねぎ', '小松菜'].freeze,
+                              ['ブロッコリー', 'しいたけ', 'トマト', '玉ねぎ', 'さやえんどう', '玉ねぎ'].freeze,
+                              ['しいたけ', 'マッシュルーム', 'ブロッコリー', '小松菜', 'さやえんどう', '改良種(IS)'].freeze,
+                              ['マッシュルーム', 'ブロッコリー', 'マッシュルーム', '小松菜', '改良種(IS)', 'グミ'].freeze].freeze,
+                             [['大豆', '大豆', 'にんにく', 'そらまめ', 'しめじ', 'みかん'].freeze,
+                              ['かぶ', '大豆', 'かぶ', 'キャベツ', 'そらまめ', 'みかん'].freeze,
+                              ['にんにく', 'かぶ', 'にんにく', 'しめじ', 'クランベリー', 'ピーマン'].freeze,
+                              ['キャベツ', 'キャベツ', 'ほうれん草', 'しめじ', 'レタス', 'ピーマン'].freeze,
+                              ['ほうれん草', 'ほうれん草', 'クランベリー', 'レタス', 'ピーマン', '改良種(IS)'].freeze,
+                              ['松茸', 'ほうれん草', '松茸', 'レタス', 'クランベリー', '改良種(IS)'].freeze].freeze,
+                             [['小豆', 'れんこん', 'みつば', 'やまのいも', 'デコポン', 'イチゴ'].freeze,
+                              ['れんこん', 'れんこん', '小豆', 'なめこ', 'かいわれ大根', 'なめこ'].freeze,
+                              ['やまのいも', 'アスパラガス', 'なす', 'なめこ', 'やまのいも', 'デコポン'].freeze,
+                              ['なす', 'やまのいも', 'みつば', 'えのきたけ', 'かいわれ大根', 'デコポン'].freeze,
+                              ['アスパラガス', 'アスパラガス', 'やまのいも', 'みつば', 'なめこ', '改良種(IS)'].freeze,
+                              ['なす', 'もやし', 'えのきたけ', 'えのきたけ', '改良種(IS)', 'イチゴ'].freeze].freeze].freeze
+
+      EDIBLE_PLANT2_CHARTS = [[['テンサイ', 'バノ', 'テンサイ', 'サトウモロ', 'サトウモロ', 'パンノミ'].freeze,
+                               ['テンサイ', 'バノ', 'サトウモロ', 'バノ', 'ミソレグア', 'パンノミ'].freeze,
+                               ['テンサイ', 'サトウモロ', 'バノ', 'ニクニク', 'パンノミ', 'メーズム'].freeze,
+                               ['バノ', 'バノ', 'バノ', 'パンノミ', 'ミソレグア', 'メーズム'].freeze,
+                               ['テンサイ', 'パンノミ', 'ニクニク', 'ニクニク', 'メーズム', 'ミソレグア'].freeze,
+                               ['サトウモロ', 'ニクニク', 'メーズム', 'ミソレグア', 'メーズム', 'メーズム'].freeze].freeze,
+                              [['アロアベリー', 'パンノミ', 'ミソレグア', 'サイングア', 'パンノミ', 'アロアベリー'].freeze,
+                               ['パンノミ', 'サイングア', 'パンノミ', 'ミソレグア', 'アロアベリー', 'ミソレグア'].freeze,
+                               ['パンノミ', 'アロアベリー', 'サイングア', 'パンノミ', 'パンノミ', 'トロアベリア'].freeze,
+                               ['パンノミ', 'アロアベリー', 'パンノミ', 'ミソレグア', 'ミソレグア', 'トロアベリア'].freeze,
+                               ['サイングア', 'パンノミ', 'トロアベリア', 'ミソレグア', 'アロアベリー', 'サイングア'].freeze,
+                               ['ミソレグア', 'トロアベリア', 'サイングア', 'アロアベリー', 'トロアベリア', 'トロアベリア'].freeze].freeze].freeze
+
+      def use_villaciel_edible_plant_chart(chart_id, output)
+        output + use_6x6_chart(EDIBLE_PLANT_CHARTS[chart_id - 1], "可食植物表#{chart_id}（ヴィラシエル）")
+      end
+
+      def use_armesear_edible_plant_chart(chart_id, output)
+        output + use_6x6_chart(EDIBLE_PLANT2_CHARTS[chart_id - 1], "可食植物表#{chart_id}（アルメサール）")
+      end
+
+      def use_edible_plant_chart(command)
+        match_data = command.match(/EP([VA]?)(\d?)/)
+        chart_symbol = match_data[1] == '' ? 'V' : match_data[1]
+
+        case chart_symbol
+        when 'V'
+          case match_data[2]
+          when ''
+            roll_result = @randomizer.roll_once(D6)
+            return '(1D6) ＞ [6] ＞ 好きな表を選んでおっけー！' if roll_result == D6
+
+            use_villaciel_edible_plant_chart(roll_result, "(1D6) ＞ [#{roll_result}] ＞ ")
+          else
+            chart_id = match_data[2].to_i
+            return '' unless chart_id >= 1 && chart_id <= 5
+
+            use_villaciel_edible_plant_chart(chart_id, '')
+          end
+        when 'A'
+          case match_data[2]
+          when ''
+            roll_result = @randomizer.roll_once(D6)
+            use_armesear_edible_plant_chart(roll_result.even? ? 1 : 2, "(1D6) ＞ [#{roll_result}] ＞ ")
+          else
+            chart_id = match_data[2].to_i
+            return '' unless [1, 2].include?(chart_id)
+
+            use_armesear_edible_plant_chart(chart_id, '')
+          end
+        end
+      end
+
+      MUTANT_PLANT_CHART = [['ガドゴン', 'ガドゴン', 'レディダン', 'ボディア', 'ブタマル', 'ブタマル'].freeze,
+                            ['レディダン', 'レディダン', 'ボディア', 'トロコッコ', 'ブタマル', 'ツァイド'].freeze,
+                            ['ボディア', 'ボディア', 'マメノキ', 'ナッキュ', 'ツァイド', 'ボディア'].freeze,
+                            ['ナッキュ', 'マメノキ', 'ナッキュ', 'ガドゴン', 'レディダン', 'レディダン'].freeze,
+                            ['ポメラマ', 'ポメラマ', 'ナッキュ', 'ツァイド', 'ガドゴン', 'ボディア'].freeze,
+                            ['ナッキュ', 'ツァイド', 'ツァイド', 'ツァイド', 'ボディア', 'グラディエゴ'].freeze].freeze
+
+      def use_mutant_plant_chart(_command)
+        use_6x6_chart(MUTANT_PLANT_CHART, '変異植物表')
+      end
+
+      IMPROVED_SPECIES_CHART = [['ワワ', 'ワワ', 'ブラックカロット', 'ビーズ', 'レモン', 'ブラッドオレンジ'].freeze,
+                                ['ポポ', 'ポポ', 'グランツェ', 'オオカサゲ', 'ブラッドオレンジ', 'レモン'].freeze,
+                                ['ヒットト', 'グランツェ', 'ブラックベリー', 'ピマット', 'ブラッドオレンジ', 'レモン'].freeze,
+                                ['ブルーベリー', 'ヒットト', 'グランツェ', 'ブラッドオレンジ', 'ユズ', 'ブラックベリー'].freeze,
+                                ['ビーズ', 'ピマット', 'オオカサゲ', 'ライム', 'ブルーベリー', 'ユズ'].freeze,
+                                ['ビーズ', 'レッドキャベツ', 'ライム', 'オオカサゲ', 'ライム', 'リンゴ'].freeze].freeze
+
+      def use_improved_species_chart(_command)
+        use_6x6_chart(IMPROVED_SPECIES_CHART, '改良種表')
+      end
+    end
+  end
+end