bcdice 3.15.0 → 3.17.0

data/lib/bcdice/game_system/MarvelHeroicRoleplaying.rb

@@ -0,0 +1,144 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class MarvelHeroicRoleplaying < Base
+      # ゲームシステムの識別子
+      ID = 'MarvelHeroicRoleplaying'
+
+      # ゲームシステム名
+      NAME = 'MarvelヒロイックRPG'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'まあへるひろいつくRPG'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~INFO_MESSAGETEXT
+        ■判定　MHRnDx[+nDx]        n: ダイス数 x:ダイスの面数
+
+        例)MHR3D10+2D8+1D6: 10面ダイスを3個・8面ダイスを2個・6面ダイスを1個振って、その結果を表示(合計値,効果ダイス,チャンス)
+           合計値を優先した場合と効果ダイスを優先した場合で結果が変わるケースでは双方を表示。
+
+      INFO_MESSAGETEXT
+
+      register_prefix('MHR')
+
+      def initialize(command)
+        super(command)
+
+        @sort_barabara_dice = true # バラバラロール（Bコマンド）でソート有
+      end
+
+      def eval_game_system_specific_command(command)
+        resolute_action(command)
+      end
+
+      private
+
+      DiceBlock = Struct.new(:counts, :sides)
+      DiceStats = Struct.new(:value, :sides, :used)
+
+      # 判定
+      # @param [String] command
+      # @return [Result]
+      def resolute_action(command)
+        m = /MHR((\d+D\d+)(\+\d+D\d+)*)/.match(command)
+        return nil unless m
+
+        dice_str = m[1]
+        dice_cmd_arr = dice_str.split("+")
+        dice_block_arr = []
+
+        dice_cmd_arr.each do |d|
+          n = /(\d+)D(\d+)/.match(d)
+          dice_block_arr.push(DiceBlock.new(n[1].to_i, n[2].to_i))
+        end
+        dice_block_arr = dice_block_arr.group_by(&:sides)
+                                       .map { |sides, group| DiceBlock.new(group.sum(&:counts), sides) }
+                                       .sort_by { |item| -item.sides }
+
+        output = ""
+        result_dice_stats_arr = []
+        dice_block_arr.each do |db|
+          dices = @randomizer.roll_barabara(db.counts, db.sides).sort.reverse
+          dices.each do |n|
+            result_dice_stats_arr.push(DiceStats.new(n, db.sides, false))
+          end
+          dice_text = dices.join(",")
+          output += ",D#{db.sides}[#{dice_text}]"
+        end
+        output = output.delete_prefix(",")
+        result_dice_stats_arr = result_dice_stats_arr.sort_by { |item| [-item.value, item.sides] }
+
+        chance = result_dice_stats_arr.count { |item| item.value == 1 }
+        result_dice_stats_arr.each { |item| item.used = true if item.value == 1 }
+
+        add_dice, effect_die = result_prioritize_the_sum(result_dice_stats_arr)
+        return nil if add_dice <= 0
+
+        output_prioritize_the_sum = "合計値#{add_dice},効果ダイスD#{effect_die}"
+        add_dice, effect_die = result_prioritize_effect_dice(result_dice_stats_arr)
+        output_prioritize_effect_dice = "合計値#{add_dice},効果ダイスD#{effect_die}"
+        if add_dice == 0 || output_prioritize_the_sum == output_prioritize_effect_dice
+          output += " ＞ #{output_prioritize_the_sum}"
+        else
+          output += " ＞ #{output_prioritize_the_sum} or #{output_prioritize_effect_dice}"
+        end
+
+        if chance > 0
+          output += " ＞ チャンス#{chance}"
+          return Result.failure(output)
+        else
+          return Result.success(output)
+        end
+      end
+
+      # 合計値優先
+      def result_prioritize_the_sum(dice_stats_arr)
+        result_dice_stats_arr = dice_stats_arr.map { |item| DiceStats.new(*item.to_h.values) }
+
+        if result_dice_stats_arr.length >= 2
+          add_dice = result_dice_stats_arr[0].value + result_dice_stats_arr[1].value
+          result_dice_stats_arr[0].used = true
+          result_dice_stats_arr[1].used = true
+        else
+          return 0, 4
+        end
+
+        max_item = result_dice_stats_arr.reject(&:used)
+                                        .max_by(&:sides)
+        if max_item
+          effect_die = max_item.sides
+        else
+          effect_die = 4
+        end
+        return add_dice, effect_die
+      end
+
+      # 効果ダイス優先
+      def result_prioritize_effect_dice(dice_stats_arr)
+        result_dice_stats_arr = dice_stats_arr.map { |item| DiceStats.new(*item.to_h.values) }
+
+        max_item = result_dice_stats_arr.reject(&:used)
+                                        .min_by { |item| [-item.sides, item.value] }
+        if max_item
+          max_item.used = true
+          effect_die = max_item.sides
+        else
+          effect_die = 4
+        end
+
+        result_dice_stats_arr2 = result_dice_stats_arr.reject(&:used)
+        if result_dice_stats_arr2.length >= 2
+          result_dice_stats_arr = result_dice_stats_arr2.sort_by { |item| [-item.value, item.sides] }
+          add_dice = result_dice_stats_arr[0].value + result_dice_stats_arr[1].value
+        else
+          effect_die = 4
+          add_dice = 0
+        end
+
+        return add_dice, effect_die
+      end
+    end
+  end
+end

data/lib/bcdice/game_system/MeikyuKingdomBasic.rb

@@ -23,6 +23,7 @@ module BCDice
           ・各種表
           　・休憩表：才覚 TBT／魅力 CBT／探索 SBT／武勇 VBT
                      お祭り FBT／空振り EBT／全体 WBT／カップル LBT
+                     お食事 FDBT
           　・ハプニング表：才覚 THT／魅力 CHT／探索 SHT／武勇 VHT
           　・視察表 RT／情報収集表 IG／ランダムマップ選択表 RMS
           　・痛打表 CAT／致命傷表 FWT／戦闘ファンブル表 CFT
@@ -31,9 +32,11 @@ module BCDice
           　・お宝表１／２／３／４／５ T1T／T2T／T3T／T4T／T5T
           　・特殊遭遇表 SE
           　　　上級：人工 ARN／水域 WEN／自然 NEN／洞窟 CEN／天空 SEN／異界 OEN
+          　・他国との関係表 ORT
           ・潜在能力：スキル決定表 SDT
           　　基本：肉弾 BUS／射撃 SHS／星術 ASS／召喚 SUS／科学 SCS
           　　　　　迷宮 LAS／交渉 NES／便利 COS／芸能 ENS／道具 TOS
+          　　　　　一般 GES
           　　上級：肉弾 ABUS／射撃 ASHS／星術 AASS／召喚 ASUS／科学 ASCS
           　　　　　迷宮 ALAS／交渉 ANES／便利 ACOS／芸能 AENS／道具 ATOS
           ・アイテム関連（上級不使用の場合、カッコ書きのものを使用して下さい）
@@ -53,6 +56,60 @@ module BCDice
           　・生まれ決定表 BDT／生まれ表：才覚 TBO／魅力 CBO／探索 SBO／武勇 VBO
           　・初期装備表 IEQ
         　・地名決定表　PNTx (xは個数)／迷宮風景表 MLTx (xは個数)
+          ・百万世界AtoZ関連
+          　・ご祝儀表 GIFT
+          　・ニュース表 NWST
+          　・王国ハプニング表 KDHT
+          　・王国試練表 KDTT
+          　・騎士道表 CHVT
+          　・儀式表 RITT
+          　・限定表 LIMT
+          　・固有の文化表 UNCT
+          　・後世の評価表 POET
+          　・高レベル特殊遭遇表 KSET
+          　・死霊の日々表 DODT
+          　・事件名表1／2 INT1／INT2
+          　・守護星座表 GUCT
+          　・需要表 DEMTx (x:名物レベル)
+          　・小鬼と一緒表 WLDT
+          　・侵略ハプニング表 INHT
+          　・新・情報収集表 NIGT
+          　・人種特徴表／人種名文字表 RACT／RNCTx (x:文字数)
+          　・迷宮化現象表／人体迷宮化表 HBLT／LAPT
+          　・勢力表 POWT
+          　・中立特殊遭遇表 NSET
+          　・超協調行動表 ECBT
+          　・通貨外見表／通貨材質表／通貨名称表 CUAT／CUMT／CUNT
+          　・天候表 WEAT
+          　・毒の追加効果表 PAET
+          　・媒体表 MEDT
+          　・反応表／民の反応表 REAT／PRET
+          　・遍歴表 HIST
+          　・由来表 ORIT
+          　・誘致表 ATRT
+          　・妖精の悪戯表 FAMT
+          ・R&R236関連
+          　・四字熟語系二つ名表／代入命名表／組み合わせ系二つ名表／名文句系二つ名表 FCNT／ASNT／CMNT／FPNT
+          　・形容表／用語表／行動表／呼び名表／称号表 DEST／TRMT／BEHT／NAMT／TTLT
+          ・旅する王国と無名階域関連
+          　・サブキャラクター反応表 CSRT
+          　・スキルグループ表 KSGT
+          　・ダイナマイト帝国:休憩表／特殊遭遇表／二つ名表／名前表 DRET／DSET／DNNT／DNAT
+          　・ハグルマ資本主義神聖共和国:休憩表／特殊遭遇表／二つ名表／名前表 HRET／HSET／HNNT／HNAT
+          　・メトロ汗国:休憩表／特殊遭遇表／二つ名表／名前表 MRET／MSET／MNNT／MNAT
+          　・千年王朝:休憩表／特殊遭遇表／二つ名表／名前表 TRET／TSET／TNNT／TNAT
+          　・遠征王国変動表／遠征道中表 EKCT／EXITx (x:修正)
+          　・候補生背景表／職長背景表 CABT／FOBT
+          　・上級ジョブ表・甲／乙 AJTA／AJTB
+          　・深階休憩表／特殊遭遇表 KART／KAET
+          　・天階休憩表／特殊遭遇表 TERT／TEET
+          　・星の階休憩表 HKRT
+          　・装備決定表 EQDT
+          　・大冒険時代表 GART
+          　・燃料表 FUET
+          　・反乱表 RBLT
+          　・旅する王国環境表／王国名決定表1／王国名決定表2／王国名決定表3 TKET／TKNT1／TKNT2／TKNT3
+          　・列強経歴表 GPHT
          ・D66ダイスあり
       INFO_MESSAGE_TEXT
 
@@ -73,7 +130,17 @@ module BCDice
         'ABUS', 'ASHS', 'AASS', 'ASUS', 'ASCS', 'ALAS', 'ANES', 'ACOS', 'AENS', 'ATOS',
         'SE', 'ARN', 'WEN', 'NEN', 'CEN', 'SEN', 'OEN',
         'DFT',
-        'PNT', 'MLT'
+        'PNT', 'MLT',
+        'FDBT', 'GIFT', 'NWST', 'EKCT', 'KDHT', 'KDTT', 'CHVT', 'RITT', 'LIMT', 'UNCT', 'POET',
+        'KSET', 'DODT', 'INT1', 'INT2', 'GUCT', 'DEMT', 'WLDT', 'INHT', 'NIGT', 'RACT', 'RNCT',
+        'HBLT', 'POWT', 'NSET', 'ECBT', 'CUAT', 'CUMT', 'CUNT', 'WEAT', 'PAET', 'MEDT', 'REAT',
+        'HIST', 'PRET', 'LAPT', 'ORIT', 'ATRT', 'FAMT',
+        'FCNT', 'ASNT', 'TRMT', 'BEHT', 'DEST', 'NAMT', 'TTLT',
+        'CMNT', 'FPNT', 'CSRT', 'KSGT', 'DRET', 'DSET', 'DNNT', 'DNAT', 'HRET', 'HSET', 'HNNT',
+        'HNAT', 'MRET', 'MSET', 'MNNT', 'MNAT', 'EXIT', 'TRET', 'TSET', 'TNNT', 'TNAT', 'CABT',
+        'AJTA', 'AJTB', 'FOBT', 'KAET', 'KART', 'TEET', 'TERT', 'HKRT', 'EQDT', 'GART', 'FUET',
+        'RBLT', 'TKET', 'GPHT',
+        'TKNT1', 'TKNT2', 'TKNT3', 'GES', 'ORT'
       )
 
       def initialize(command)
@@ -81,6 +148,7 @@ module BCDice
 
         @sort_add_dice = true
         @d66_sort_type = D66SortType::ASC
+        @round_type = RoundType::CEIL
       end
 
       def kiryoku_result(_total_n, dice_list, _diff)
@@ -100,6 +168,12 @@ module BCDice
 
         if (output = roll_tables(command, TABLES))
           return output
+        elsif (output = roll_tables(command, A2Z_TABLES))
+          return output
+        elsif (output = roll_tables(command, RR236_TABLES))
+          return output
+        elsif (output = roll_tables(command, TK_TABLES))
+          return output
         else
 
           case command
@@ -248,6 +322,50 @@ module BCDice
           when /^ATOS/i
             type = '上級道具スキル'
             output, total_n = mk_advanced_tool_skill_table
+          when /^GUCT/i
+            type = '守護星座'
+            total_n = @randomizer.roll_once(6) * 100 + @randomizer.roll_once(6) * 10 + @randomizer.roll_once(6)
+            output = mk_guardian_constellation_table(total_n)
+          when /^DEMT(\d+)/i
+            type = '需要'
+            count = getCount(Regexp.last_match(1))
+            output, total_n = get_demand_table(count)
+          when /^RNCT(\d*)/i
+            type = '人種名文字'
+            count = getCount(Regexp.last_match(1))
+            output, total_n = get_race_name_character_table(count)
+          when /^CUMT/i
+            type = '通貨材質'
+            @total = [@randomizer.roll_barabara(2, 6).sum(), @randomizer.roll_once(6)]
+            total_n = @total.join(',')
+            output = get_currency_material_table(*@total)
+          when /^CMNT/i
+            type = '組み合わせ系二つ名'
+            output, total_n = mk_combination_nickname_table
+          when /^DEST/i
+            type = '形容'
+            total_n = @randomizer.roll_d66(D66SortType::ASC)
+            output = mk_descriptive_table(total_n)
+          when /^TRMT/i
+            type = '用語'
+            total_n = @randomizer.roll_d66(D66SortType::ASC)
+            output = mk_terminology_table(total_n)
+          when /^BEHT/i
+            type = '行動'
+            total_n = @randomizer.roll_d66(D66SortType::ASC)
+            output = mk_behavior_table(total_n)
+          when /^NAMT/i
+            type = '呼び名'
+            total_n = @randomizer.roll_d66(D66SortType::ASC)
+            output = mk_rr236_name_table(total_n)
+          when /^TTLT/i
+            type = '称号'
+            total_n = @randomizer.roll_d66(D66SortType::ASC)
+            output = mk_title_table(total_n)
+          when /^EXIT([-+]?\d*)/i
+            type = '遠征道中'
+            modify = get_modify(Regexp.last_match(1))
+            output, total_n = get_expedition_itinerary_table(modify)
           end
 
           if !output.nil?
@@ -261,9 +379,11 @@ module BCDice
     end
   end
 end
-
 require "bcdice/game_system/meikyu_kingdom_basic/item_table"
 require "bcdice/game_system/meikyu_kingdom_basic/kingdom_table"
 require "bcdice/game_system/meikyu_kingdom_basic/name_table"
 require "bcdice/game_system/meikyu_kingdom_basic/word_table"
 require "bcdice/game_system/meikyu_kingdom_basic/table"
+require "bcdice/game_system/meikyu_kingdom_basic/atoz_table"
+require "bcdice/game_system/meikyu_kingdom_basic/randr236_table"
+require "bcdice/game_system/meikyu_kingdom_basic/tk_table"

data/lib/bcdice/game_system/MetallicGuardian_Korean.rb

@@ -0,0 +1,28 @@
+# frozen_string_literal: true
+
+require 'bcdice/game_system/MetallicGuardian'
+
+module BCDice
+  module GameSystem
+    class MetallicGuardian_Korean < MetallicGuardian
+      # ゲームシステムの識別子
+      ID = 'MetallicGuardian:Korean'
+
+      # ゲームシステム名
+      NAME = '메탈릭 가디언 RPG'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = '国際化:Korean:메탈릭 가디언 RPG'
+
+      set_aliases_for_srs_roll('MG')
+
+      register_prefix_from_super_class()
+
+      def initialize(command)
+        super(command)
+
+        @locale = :ko_kr
+      end
+    end
+  end
+end

data/lib/bcdice/game_system/MorkBorg.rb

@@ -0,0 +1,170 @@
+# frozen_string_literal: true
+
+require 'bcdice/dice_table/table'
+
+module BCDice
+  module GameSystem
+    class MorkBorg < Base
+      # ゲームシステムの識別子
+      ID = 'MorkBorg'
+
+      # ゲームシステム名
+      NAME = 'MÖRK BORG'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'むるくほりい'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~INFO_MESSAGETEXT
+        ■判定　sDRt        s: 能力値(省略時:0) t:目標値
+
+        例)+3DR12: 能力値+3、DR12で1d20を振って、その結果を表示(クリティカル・ファンブルも表示)
+
+        ■イニシアティヴ　sINS s: 能力値(省略時:0. 個別のイニシアティブを使う場合)
+
+        例)INS: 1d6を振って、イニシアティヴの結果を表示(PC先行を成功として表示)
+
+        ■モラル　sMORt s: 能力値(省略時:0) t:相手クリーチャーのモラル値
+
+        例)MOR8: 2d6を振って、モラル判定の結果を表示(モラル崩壊を成功として表示)
+
+
+        ■各種表
+
+        ・遭遇反応表 Reaction (ERT)
+        ・破損 Broken (BRO)
+
+      INFO_MESSAGETEXT
+
+      def initialize(command)
+        super(command)
+
+        @sort_add_dice = true
+        @d66_sort_type = D66SortType::NO_SORT
+      end
+
+      def eval_game_system_specific_command(command)
+        resolute_action(command) || resolute_initiative(command) || resolute_morale(command) || roll_tables(command, self.class::TABLES)
+      end
+
+      private
+
+      def result_dr(total, dice_total, target)
+        if dice_total <= 1
+          Result.fumble(translate('MorkBorg.fumble'))
+        elsif dice_total >= 20
+          Result.critical(translate('MorkBorg.critical'))
+        elsif total >= target
+          Result.success(translate('MorkBorg.success'))
+        else
+          Result.failure(translate('MorkBorg.failure'))
+        end
+      end
+
+      # DR判定
+      # @param [String] command
+      # @return [Result]
+      def resolute_action(command)
+        m = /^([+-]?\d+)?DR(\d+)$/.match(command)
+        return nil unless m
+
+        num_status = m[1].to_i
+        num_target = m[2].to_i
+
+        total = @randomizer.roll_once(20)
+        total_status = total.to_s + with_symbol(num_status)
+        result = result_dr(total + num_status, total, num_target)
+
+        sequence = [
+          "(#{command})",
+          total_status,
+          total + num_status,
+          result.text,
+        ]
+
+        result.text = sequence.join(" ＞ ")
+        return result
+      end
+
+      def with_symbol(number)
+        if number == 0
+          return "+0"
+        elsif number > 0
+          return "+#{number}"
+        else
+          return number.to_s
+        end
+      end
+
+      # イニシアティヴ判定
+      # @param [String] command
+      # @return [Result]
+      def resolute_initiative(command)
+        m = /^([+-]?\d+)?INS$/.match(command)
+        return nil unless m
+
+        num_status = m[1].to_i
+
+        die = @randomizer.roll_once(6)
+        total = die + num_status
+        result =
+          if total >= 4
+            Result.success(translate('MorkBorg.pcs_go_first'))
+          else
+            Result.failure(translate('MorkBorg.enemies_go_first'))
+          end
+
+        result.text = "(#{command}) ＞ #{die}#{with_symbol(num_status)} ＞ #{total} ＞ #{result.text}"
+        return result
+      end
+
+      # モラル判定
+      # @param [String] command
+      # @return [Result]
+      def resolute_morale(command)
+        m = /^([+-]?\d+)?MOR(\d+)$/.match(command)
+        return nil unless m
+
+        num_status = m[1].to_i
+        num_target = m[2].to_i
+
+        dice_list = @randomizer.roll_barabara(2, 6)
+        dice_total = dice_list.sum()
+        total = dice_total + num_status
+
+        die = ""
+        result =
+          if total <= num_target
+            Result.failure(translate('MorkBorg.maintain'))
+          else
+            die = @randomizer.roll_once(6)
+            if die >= 4
+              Result.success(translate('MorkBorg.surrender'))
+            else
+              Result.success(translate('MorkBorg.flee'))
+            end
+          end
+        result.text = "(#{command}) ＞ #{dice_total}#{with_symbol(num_status)} ＞ #{total} ＞ #{die}#{result.text}"
+
+        return result
+      end
+
+      # 各種表
+
+      class << self
+        private
+
+        def translate_tables(locale)
+          {
+            'ERT' => DiceTable::Table.from_i18n('MorkBorg.ERT', locale),
+            'BRO' => DiceTable::Table.from_i18n('MorkBorg.BRO', locale),
+          }
+        end
+      end
+
+      TABLES = translate_tables(:ja_jp).freeze
+
+      register_prefix('([+-]?\d+)?DR[\d]+', '([+-]?\d+)?INS', '([+-]?\d+)?MOR', TABLES.keys)
+    end
+  end
+end

data/lib/bcdice/game_system/MorkBorg_Korean.rb

@@ -0,0 +1,49 @@
+# frozen_string_literal: true
+
+require 'bcdice/game_system/MorkBorg'
+
+module BCDice
+  module GameSystem
+    class MorkBorg_Korean < MorkBorg
+      # ゲームシステムの識別子
+      ID = 'MorkBorg:Korean'
+
+      # ゲームシステム名
+      NAME = '모크 보그(MÖRK BORG)'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = '国際化:Korean:모크 보그(MÖRK BORG)'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~INFO_MESSAGETEXT
+        ■판정　sDRt        s: 능력치(생략 시:0) t:목표값
+
+        예)+3DR12: 능력치+3, DR12로 1d20을 굴려서 결과 표시(크리티컬·펌블도 표시)
+
+        ■이니셔티브　sINS s: 능력치(생략 시:0. 개별 이니셔티브를 사용하는 경우)
+
+        예)INS: 1d6을 굴려서 이니셔티브 결과 표시(PC 선공을 성공으로 표시)
+
+        ■모럴　sMORt s: 능력치(생략 시:0) t:상대 크리처의 모럴 값
+
+        예)MOR8: 2d6을 굴려서 모럴 판정 결과 표시(모럴 붕괴를 성공으로 표시)
+
+
+        ■각종 표
+
+        ・조우 반응표 Reaction (ERT)
+        ・파손(빈사표) Broken (BRO)
+
+      INFO_MESSAGETEXT
+
+      def initialize(command)
+        super(command)
+        @locale = :ko_kr
+      end
+
+      TABLES = translate_tables(:ko_kr).freeze
+
+      register_prefix_from_super_class()
+    end
+  end
+end

data/lib/bcdice/game_system/NanimonaiMura.rb

@@ -0,0 +1,112 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class NanimonaiMura < Base
+      # ゲームシステムの識別子
+      ID = "NanimonaiMura"
+
+      # ゲームシステム名
+      NAME = "なにもない村"
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = "なにもないむら"
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~INFO_MESSAGE_TEXT
+        ・行為判定 xNMy
+        　x個のD10を振り、2つの出目から達成値を作成して判定します。
+        　達成値は成功度が最も高くなる組み合わせを自動選択し、同値なら低い値を優先します。
+        　x: ダイス数（1以上）
+        　y: 判定値（0以上）
+        　例）4NM55 6NM199 2NM35
+      INFO_MESSAGE_TEXT
+
+      register_prefix('\d+NM\d+')
+
+      ResultData = Struct.new(:score, :success, :critical, :result_text, :success_level)
+
+      STAGE_NAMES = ['ノーマル', 'エピック', 'レジェンダリ', 'ミシック'].freeze
+      BASE_SUCCESS_LEVELS = [1, 11, 21, 31].freeze
+
+      def eval_game_system_specific_command(command)
+        roll_action(command)
+      end
+
+      private
+
+      def roll_action(command)
+        m = /\A(\d+)NM(\d+)\z/.match(command)
+        return nil unless m
+
+        dice_count = m[1].to_i
+        target = m[2].to_i
+        return nil if dice_count < 1
+
+        dice_list = @randomizer.roll_barabara(dice_count, 10).map { |value| normalize_d10(value) }
+        result = select_best_result(dice_list, target)
+
+        Result.new.tap do |r|
+          r.text = "#{command} (#{dice_count}D10) ＞ [#{dice_list.join(',')}] ＞ #{result.score} ＞ #{result.result_text} ＞ 成功度#{result.success_level}"
+          r.condition = result.success
+          r.critical = result.critical
+        end
+      end
+
+      def normalize_d10(value)
+        value == 10 ? 0 : value
+      end
+
+      def select_best_result(dice_list, target)
+        candidates =
+          if dice_list.size == 1
+            [build_result(dice_list.first * 10, target)]
+          else
+            [].tap do |results|
+              dice_list.each_index do |i|
+                dice_list.each_index do |j|
+                  next if i == j
+
+                  results << build_result(dice_list[i] * 10 + dice_list[j], target)
+                end
+              end
+            end
+          end
+
+        best_result = candidates.first
+
+        candidates.drop(1).each do |candidate|
+          next if candidate.success_level < best_result.success_level
+          next if candidate.success_level == best_result.success_level && candidate.score > best_result.score
+
+          best_result = candidate
+        end
+
+        best_result
+      end
+
+      def build_result(score, target)
+        if score > target
+          return ResultData.new(score, false, false, "失敗", 0)
+        end
+
+        diff = target - score
+        stage_index = [diff.div(100), STAGE_NAMES.size - 1].min
+        critical_bonus = zoro_bonus(score)
+        critical = !critical_bonus.nil?
+        success_level = BASE_SUCCESS_LEVELS[stage_index] + (critical_bonus || 0)
+        result_text = "#{STAGE_NAMES[stage_index]}#{critical ? '大成功' : '成功'}"
+
+        ResultData.new(score, true, critical, result_text, success_level)
+      end
+
+      def zoro_bonus(score)
+        tens = score.div(10)
+        ones = score % 10
+        return nil unless tens == ones
+
+        ones
+      end
+    end
+  end
+end