bcdice 3.1.0 → 3.3.0

data/lib/bcdice/game_system/AngelGear.rb

@@ -14,7 +14,7 @@ module BCDice
       NAME = 'エンゼルギア 天使大戦TRPG The 2nd Editon'
 
       # ゲームシステム名の読みがな
-      SORT_KEY = 'エンセルキア2'
+      SORT_KEY = 'えんせるきあ2'
 
       # ダイスボットの使い方
       HELP_MESSAGE = <<~MESSAGETEXT
@@ -117,7 +117,7 @@ module BCDice
         )
       }.freeze
 
-      register_prefix('(\d+)AG(\d+)?(([\+\-]\d+)*)', TABLES.keys)
+      register_prefix('\d+AG', TABLES.keys)
     end
   end
 end

data/lib/bcdice/game_system/AnimaAnimus.rb

@@ -2,7 +2,7 @@
 
 require 'bcdice/dice_table/table'
 require 'bcdice/dice_table/range_table'
-require 'bcdice/arithmetic_evaluator'
+require 'bcdice/arithmetic'
 
 module BCDice
   module GameSystem
@@ -32,17 +32,19 @@ module BCDice
       MESSAGETEXT
 
       def eval_game_system_specific_command(command)
-        case command
-        when /(\d+)AN<=(\d+([+\-]\d+)*)/i
-          return check_action(Regexp.last_match)
-        else
+        m = /(\d+)AN<=(\d+([+\-]\d+)*)/i.match(command)
+        if TABLES.key?(command)
           return roll_tables(command, TABLES)
+        elsif m
+          return check_action(m)
+        else
+          return nil
         end
       end
 
       def check_action(match_data)
-        dice_cnt = ArithmeticEvaluator.eval(match_data[1])
-        target = ArithmeticEvaluator.eval(match_data[2])
+        dice_cnt = Arithmetic.eval(match_data[1], RoundType::FLOOR)
+        target = Arithmetic.eval(match_data[2], RoundType::FLOOR)
         debug("dice_cnt", dice_cnt)
         debug("target", target)
 
@@ -52,7 +54,12 @@ module BCDice
         has_critical = dice_arr.include?(1)
         result = has_critical ? suc_cnt + 2 : suc_cnt
 
-        return "(#{dice_cnt}B10<=#{target}) ＞ #{dice_str} ＞ #{result > 0 ? '成功' : '失敗'}(達成値:#{result})#{has_critical ? ' (クリティカル発生)' : ''}"
+        Result.new.tap do |r|
+          r.text = "(#{dice_cnt}B10<=#{target}) ＞ #{dice_str} ＞ #{result > 0 ? '成功' : '失敗'}(達成値:#{result})#{has_critical ? ' (クリティカル発生)' : ''}"
+          r.critical = has_critical
+          r.success = result > 0
+          r.failure = !r.success?
+        end
       end
 
       TABLES = {
@@ -86,7 +93,7 @@ module BCDice
       }.freeze
 
       # ダイスボットで使用するコマンドを配列で列挙する
-      register_prefix('\d+AN<=\d([\+\-]\d+)*', TABLES.keys)
+      register_prefix('\d+AN<=', TABLES.keys)
     end
   end
 end

data/lib/bcdice/game_system/Arianrhod.rb

@@ -25,25 +25,23 @@ module BCDice
         @d66_sort_type = D66SortType::NO_SORT
       end
 
-      def check_nD6(total, _dice_total, dice_list, cmp_op, target)
+      def result_nd6(total, _dice_total, dice_list, cmp_op, target)
         n_max = dice_list.count(6)
 
         if dice_list.count(1) == dice_list.size
           # 全部１の目ならファンブル
-          " ＞ ファンブル"
+          Result.fumble("ファンブル")
         elsif n_max >= 2
           # ２個以上６の目があったらクリティカル
-          " ＞ クリティカル(+#{n_max}D6)" if n_max >= 2
+          Result.critical("クリティカル(+#{n_max}D6)")
         elsif cmp_op != :>= || target == '?'
-          ''
+          nil
         elsif total >= target
-          " ＞ 成功"
+          Result.success("成功")
         else
-          " ＞ 失敗"
+          Result.failure("失敗")
         end
       end
-
-      alias check_2D6 check_nD6
     end
   end
 end

data/lib/bcdice/game_system/Avandner.rb

@@ -34,7 +34,7 @@ module BCDice
         ・8av4*7+10 → 8d10で目標値4、攻撃力7、クリティカルトリガー10の命中判定。
       MESSAGETEXT
 
-      register_prefix('\d+AV\d+((x|\*)\d+(\+\d+)?)?(c\d+)?')
+      register_prefix('\d+AV')
 
       def initialize(command)
         super(command)

data/lib/bcdice/game_system/BarnaKronika.rb

@@ -26,7 +26,7 @@ module BCDice
         　セット数が1以上の時はセット数も表示し、攻撃判定の場合は命中部位も表示します。
       INFO_MESSAGE_TEXT
 
-      register_prefix('\d+BK', '\d+BA', '\d+BKC\d+', '\d+BAC\d+', '\d+R6')
+      register_prefix('\d+BK', '\d+BA', '\d+BKC', '\d+BAC', '\d+R6')
 
       def initialize(command)
         super(command)

data/lib/bcdice/game_system/BattleTech.rb

@@ -1,5 +1,7 @@
 # frozen_string_literal: true
 
+require 'bcdice/format'
+require 'bcdice/command/parser'
 require 'bcdice/dice_table/table'
 require 'bcdice/dice_table/range_table'
 
@@ -26,24 +28,45 @@ module BCDice
         　　正面からダメージ3の攻撃を技能ベース2目標値4で1回判定
         　例）2BT3RL+5>=8
         　　右下半身にダメージ3の攻撃を技能ベース5目標値8で2回判定
-        　ミサイルによるダメージは BT(ダメージ)の変わりに SRM2/4/6, LRM5/10/15/20を指定
+        　ミサイルによるダメージは BT(ダメージ) の代わりに SRM2/4/6, LRM5/10/15/20 を指定
         　例）3SRM6LU+5>=8
         　　左上半身にSRM6連を技能ベース5目標値8で3回判定
+          BT(ダメージ) の代わりに PPC を指定するとダメージ10で判定
+          例）2PPCR+3>=10
+          　右側からPPC（ダメージ10）による攻撃を技能ベース3目標値10で2回判定
         ・CT：致命的命中表
         ・DW：転倒後の向き表
-        ・CDx：メック戦士意識維持表。ダメージ値xで判定　例）CD3
+        ・CDx：メック戦士意識維持ロール。ダメージ値x（1〜6）で判定　例）CD3
       MESSAGETEXT
 
-      register_prefix('\d*SRM\d+.+', '\d*LRM\d+.+', '\d*BT.+', 'PPC', 'CT', 'DW', 'CD\d+')
+      register_prefix('\d*SRM', '\d*LRM', '\d*BT', '\d*PPC', 'CT', 'DW', 'CD')
 
       # 致命的命中が発生しない上限値
       NO_CRITICAL_HIT_LIMIT = 7
 
+      # @return [Command::Parser] PPCコマンドの構文解析器
+      def self.ppc_parser
+        return @ppc_parser if @ppc_parser
+
+        @ppc_parser = Command::Parser.new(/PPC(?:[LCR][LU]?)?/, round_type: RoundType::FLOOR)
+        @ppc_parser.enable_prefix_number
+        @ppc_parser.restrict_cmp_op_to(:>=)
+
+        @ppc_parser
+      end
+
+      # @return [Command::Parser] PPCコマンドの構文解析器
+      def ppc_parser
+        self.class.ppc_parser
+      end
+
       def eval_game_system_specific_command(command)
         result = roll_tables(command, TABLES)
         return result if result
 
-        command = command.gsub("PPC", "BT10")
+        if (ppc_parse_result = ppc_parser.parse(command))
+          return execute_ppc(ppc_parse_result)
+        end
 
         count = 1
         if command =~ /^(\d+)(.+)/
@@ -55,9 +78,9 @@ module BCDice
         debug('executeCommandCatched command', command)
 
         case command
-        when /^CD(\d+)$/
+        when /\ACD([1-6])\z/
           damage = Regexp.last_match(1).to_i
-          return getCheckDieResult(damage)
+          return consciousness_roll(damage)
         when /^((S|L)RM\d+)(.+)/
           tail = Regexp.last_match(3)
           type = Regexp.last_match(1)
@@ -94,7 +117,7 @@ module BCDice
       LRM_LIMIT = 5
 
       def getHitResult(count, damageFunc, tail)
-        m = /([LCR][LU]?)?(\+\d+)?>=(\d+)/.match(tail)
+        m = /\A([LCR][LU]?)?(\+\d+)?>=(\d+)/.match(tail)
         return nil unless m
 
         side = m[1] || 'C'
@@ -105,7 +128,7 @@ module BCDice
 
         partTable = HitPart::TABLES[side]
 
-        resultTexts = []
+        resultLines = []
         damages = {}
         hitCount = 0
 
@@ -117,15 +140,24 @@ module BCDice
             damages, damageText = getDamages(damageFunc, partTable, damages)
             hitResult += damageText
           end
-          resultTexts << hitResult
+          resultLines << hitResult
         end
 
-        resultTexts.push(" ＞ #{hitCount}回命中")
+        # 命中したか？
+        hit = hitCount > 0
 
-        totalResultText = resultTexts.join("\n")
-        totalResultText += " 命中箇所：" + getTotalDamage(damages) if hitCount > 0
+        hitCountText = " ＞ #{hitCount}回命中"
+        hitDetails =
+          if hit
+            "#{hitCountText} 命中箇所：#{getTotalDamage(damages)}"
+          else
+            hitCountText
+          end
+        resultLines.push(hitDetails)
 
-        return totalResultText
+        resultText = resultLines.join("\n")
+
+        return hit ? Result.success(resultText) : Result.failure(resultText)
       end
 
       def getBaseValue(baseString)
@@ -272,26 +304,75 @@ module BCDice
         return result_parts.join(' ＞ '), hit_part.name, criticalText
       end
 
-      def getCheckDieResult(damage)
-        if damage >= 6
-          return "死亡"
+      # メック戦士意識維持ロールを行う
+      #
+      # damageが6の場合は死亡。
+      # damageが5以下の場合は、2d6の結果が意識維持表の値以上かの成功判定。
+      #
+      # @param damage [Integer] メック戦士へのダメージ（1〜6）
+      # @return [Result]
+      # @see 「BattleTech: A Game of Armored Combat」ルールブックp. 44
+      def consciousness_roll(damage)
+        unless (1..6).include?(damage)
+          return nil
+        end
+
+        command = "CD#{damage}"
+
+        if damage == 6
+          return Result.fumble("#{command} ＞ 死亡")
         end
 
-        table = [[1,  3],
-                 [2,  5],
-                 [3,  7],
-                 [4,  10],
-                 [5,  11]]
+        consciousness_table = {
+          1 => 3,
+          2 => 5,
+          3 => 7,
+          4 => 10,
+          5 => 11,
+        }
+
+        target = consciousness_table[damage]
+        expr = "(2D6>=#{target})"
+
+        values = @randomizer.roll_barabara(2, 6)
+        sum = values.sum
+        values_str = values.join(",")
+        sum_and_values = "#{sum}[#{values_str}]"
+
+        success = sum >= target
+        result = success ? "成功" : "失敗"
+
+        parts = [
+          command,
+          expr,
+          sum_and_values,
+          sum,
+          result,
+        ]
+        text = parts.join(" ＞ ")
 
-        target = get_table_by_number(damage, table, nil)
+        return success ? Result.success(text) : Result.failure(text)
+      end
 
-        dice1 = @randomizer.roll_once(6)
-        dice2 = @randomizer.roll_once(6)
-        total = dice1 + dice2
-        result = total >= target ? "成功" : "失敗"
-        text = "#{total}[#{dice1},#{dice2}]>=#{target} ＞ #{result}"
+      # PPCコマンドを実行する
+      # @param parse_result [Command::Parsed] PPCコマンドの構文解析結果
+      # @return [Result, nil]
+      def execute_ppc(parse_result)
+        count = parse_result.prefix_number || 1
+
+        # getHitResult() の引数tailの形に合わせる
+        # TODO: 攻撃を表すクラスに変える
+
+        # "PPC" 以降の部位指定
+        side = parse_result.command[3..-1]
+
+        modifier = Format.modifier(parse_result.modify_number)
+        target = parse_result.target_number
+
+        tail = "#{side}#{modifier}>=#{target}"
 
-        return text
+        # ダメージ10固定で命中判定を行う
+        return getHitResult(count, lambda { 10 }, tail)
       end
 
       # 表の集合

data/lib/bcdice/game_system/BeastBindTrinity.rb

@@ -82,16 +82,34 @@ module BCDice
 
           dice_list_org_str = "[#{dice_list_org.join(',')}]" if dice_list_filtered != dice_list_org
 
+          result = result_compare(total)
+          result.critical = critical?
+          result.fumble = fumble?
+
+          dice_status =
+            if result.fumble?
+              "ファンブル"
+            elsif result.critical?
+              "クリティカル"
+            end
+          result_str =
+            if result.success?
+              "成功"
+            elsif result.failure?
+              "失敗"
+            end
+
           sequence = [
             command_expr(),
             dice_list_org_str,
             interim_expr(dice_list_filtered),
-            dice_status(),
+            dice_status,
             total.to_s,
-            result_compare(total)
+            result_str
           ].compact
+          result.text = sequence.join(" ＞ ")
 
-          return sequence.join(" ＞ ")
+          return result
         end
 
         private
@@ -187,14 +205,6 @@ module BCDice
           return expr
         end
 
-        def dice_status
-          if fumble?
-            "ファンブル"
-          elsif critical?
-            "クリティカル"
-          end
-        end
-
         def fumble?
           @dice_total <= @fumble
         end
@@ -220,7 +230,13 @@ module BCDice
 
         def result_compare(total)
           if @cmp_op
-            total.send(@cmp_op, @target_number) ? "成功" : "失敗"
+            if total.send(@cmp_op, @target_number)
+              Result.success(nil)
+            else
+              Result.failure(nil)
+            end
+          else
+            Result.new
           end
         end
       end

data/lib/bcdice/game_system/BeginningIdol.rb

@@ -55,13 +55,13 @@ module BCDice
       INFO_MESSAGE_TEXT
 
       register_prefix(
-        '[1-7]*PD\d+(?:[\+\-]\d+)?',
+        '[1-7]*PD',
         'HW',
         'BWT',
         'LWT',
         'TWT',
         'CWT',
-        'LO\d{0,2}',
+        'LO',
         'SU',
         'WI',
         'NA',
@@ -88,7 +88,7 @@ module BCDice
         'NUR',
         'GUR',
         'BUR',
-        'BT\d*',
+        'BT',
         'SGT',
         'RS',
         'SH',
@@ -110,7 +110,7 @@ module BCDice
         'NCH',
         'GCH',
         'PCH',
-        'IT\d*',
+        'IT',
         'ACT',
         'ACB',
         'ACE',
@@ -124,7 +124,7 @@ module BCDice
         'RU',
         '\d{2}C',
         'BU',
-        '\d+S?A[1-6]*(?:[\+\-]\d+)?',
+        '\d+S?A',
         'SIP',
         'BVT',
         'LVT',

data/lib/bcdice/game_system/BeginningIdol_Korean.rb

@@ -53,13 +53,13 @@ module BCDice
       INFO_MESSAGE_TEXT
 
       register_prefix(
-        '[1-7]*PD\d+(?:[\+\-]\d+)?',
+        '[1-7]*PD',
         'HW',
         'BWT',
         'LWT',
         'TWT',
         'CWT',
-        'LO\d{0,2}',
+        'LO',
         'SU',
         'WI',
         'NA',
@@ -85,7 +85,7 @@ module BCDice
         'NUR',
         'GUR',
         'BUR',
-        'BT\d*',
+        'BT',
         'SGT',
         'RS',
         'SH',
@@ -105,7 +105,7 @@ module BCDice
         'SCH',
         'WCH',
         'NCH',
-        'IT\d*',
+        'IT',
         'ACT',
         'ACB',
         'ACE',
@@ -119,7 +119,7 @@ module BCDice
         'RU',
         '\d{2}C',
         'BU',
-        '\d+S?A[1-6]*(?:[\+\-]\d+)?',
+        '\d+S?A',
         'SIP',
         'BVT',
         'LVT',