bcdice 3.1.3 → 3.5.0

data/lib/bcdice/game_system/ColossalHunter.rb

@@ -1,5 +1,7 @@
 # frozen_string_literal: true
 
+require "bcdice/format"
+
 module BCDice
   module GameSystem
     class ColossalHunter < Base
@@ -14,10 +16,12 @@ module BCDice
 
       # ダイスボットの使い方
       HELP_MESSAGE = <<~MESSAGETEXT
-        ・判定（CH±x>=y)
-        　3D6の判定。クリティカル、ファンブルの自動判定を行います。
-        　x：修正値。省略可能。y：目標値。省略可能。
-        　例） CH　CH+1　CH+2>=10
+        ・判定（nCH±x>=y)
+        　nD6の判定。クリティカル、ファンブルの自動判定を行います。
+        　n：ダイス数。省略可能。省略した場合3。
+        　x：修正値。省略可能。
+        　y：目標値。省略可能。
+        　例） CH　CH+1　CH+2>=10　4CH+1
         ・BIG-6表(B6T)
         ・覚醒表(AWT)
         ・現状表(CST)
@@ -45,65 +49,48 @@ module BCDice
       def getCheckRollDiceCommandResult(command)
         debug("getCheckRollDiceCommandResult command", command)
 
-        return nil unless command =~ /(\d+)?CH([+\-\d]*)(>=([+\-\d]*))?$/i
+        parser = Command::Parser.new(/\d*CH/, round_type: round_type)
+                                .restrict_cmp_op_to(nil, :>=)
 
-        diceCount = (Regexp.last_match(1) || 3).to_i
-        modifyText = (Regexp.last_match(2) || '')
-        difficultyText = Regexp.last_match(4)
+        parsed = parser.parse(command)
+        unless parsed
+          return nil
+        end
 
-        # 修正値の計算
-        modify = getValue(modifyText, 0)
+        parsed.command = "3CH" unless parsed.command.start_with?(/\d/)
 
-        # 目標値の計算
-        difficulty = getValue(difficultyText, nil)
+        dice_count = parsed.command.to_i
+        modify = parsed.modify_number
 
         # ダイスロール
-        dice_list = @randomizer.roll_barabara(diceCount, 6)
+        dice_list = @randomizer.roll_barabara(dice_count, 6)
         dice = dice_list.sum()
         dice_str = dice_list.join(",")
 
         total = dice + modify
 
-        # 出力用ダイスコマンドを生成
-        command =  "#{diceCount}CH#{modifyText}"
-        command += ">=#{difficulty}" unless difficulty.nil?
-
         # 出力文の生成
-        result = "(#{command}) ＞ #{dice}[#{dice_str}]#{modifyText} ＞ #{total}"
+        text = "(#{parsed}) ＞ #{dice}[#{dice_str}]#{Format.modifier(modify)} ＞ #{total}"
 
-        # クリティカル・ファンブルチェック
-        if isFamble(dice)
-          result += " ＞ ファンブル"
-        elsif isCritical(total)
-          result += " ＞ クリティカル"
-        else
-          result += getJudgeResultString(difficulty, total)
-        end
+        result = get_judge_result(dice, total, parsed)
 
+        result.text = text + result.text
         return result
       end
 
       # 成否判定
-      def getJudgeResultString(difficulty, total)
-        return '' if difficulty.nil?
-
-        return " ＞ 成功" if total >= difficulty
-
-        return " ＞ 失敗"
-      end
-
-      def getValue(text, defaultValue)
-        return defaultValue if text.nil? || text.empty?
-
-        ArithmeticEvaluator.eval(text)
-      end
-
-      def isCritical(total)
-        (total >= 16)
-      end
-
-      def isFamble(total)
-        (total <= 5)
+      def get_judge_result(dice, total, parsed)
+        if dice <= 5
+          Result.fumble(" ＞ ファンブル")
+        elsif total >= 16
+          Result.critical(" ＞ クリティカル")
+        elsif parsed.cmp_op.nil?
+          Result.new("")
+        elsif total >= parsed.target_number
+          Result.success(" ＞ 成功")
+        else
+          Result.failure(" ＞ 失敗")
+        end
       end
 
       def getSourceSceneDiceCommandResult(command)
@@ -562,7 +549,7 @@ module BCDice
 
         }.freeze
 
-      register_prefix("CH.*", "B6T", "CNP", TABLES.keys)
+      register_prefix('\d*CH', "B6T", "CNP", TABLES.keys)
     end
   end
 end

data/lib/bcdice/game_system/CrashWorld.rb

@@ -19,7 +19,7 @@ module BCDice
         例・CW8
       INFO_MESSAGE_TEXT
 
-      register_prefix('CW\d+')
+      register_prefix('CW')
 
       def eval_game_system_specific_command(command)
         result = nil

data/lib/bcdice/game_system/Cthulhu.rb

@@ -48,7 +48,7 @@ module BCDice
 
       INFO_MESSAGE_TEXT
 
-      register_prefix('CC(B)?\(\d+\)', 'CC(B)?', 'RES(B)?', 'CBR(B)?\(\d+,\d+\)')
+      register_prefix('CCB?', 'RESB?', 'CBRB?')
 
       def initialize(command)
         super(command)
@@ -193,12 +193,12 @@ module BCDice
       end
 
       def getRegistResult(command)
-        m = /^RES(B)?([-\d]+)$/i.match(command)
+        m = /^RESB?(-?\d+)$/i.match(command)
         unless m
           return nil
         end
 
-        value = m[2].to_i
+        value = m[1].to_i
         target = value * 5 + 50
 
         if target < 5

data/lib/bcdice/game_system/Cthulhu7th.rb

@@ -17,13 +17,19 @@ module BCDice
 
       # ダイスボットの使い方
       HELP_MESSAGE = <<~INFO_MESSAGE_TEXT
-        ※コマンドは入力内容の前方一致で検出しています。
         ・判定　CC(x)<=（目標値）
-        　x：ボーナス・ペナルティダイス (2～－2)。省略可。
+        　x：ボーナス・ペナルティダイス。省略可。
         　目標値が無くても1D100は表示される。
         　ファンブル／失敗／　レギュラー成功／ハード成功／
         　イクストリーム成功／クリティカル を自動判定。
-        例）CC<=30　CC(2)<=50 CC(+2)<=50 CC(-1)<=75 CC-1<=50 CC1<=65 CC+1<=65 CC
+        　例）CC<=30　CC(2)<=50 CC(+2)<=50 CC(-1)<=75 CC-1<=50 CC1<=65 CC+1<=65 CC
+
+        ・技能ロールの難易度指定　CC(x)<=(目標値)(難易度)
+        　目標値の後に難易度を指定することで
+        　成功／失敗／クリティカル／ファンブル を自動判定する。
+        　難易度の指定：
+        　　r:レギュラー　h:ハード　e:イクストリーム　c:クリティカル
+        　例）CC<=70r CC1<=60h CC-2<=50e CC2<=99c
 
         ・組み合わせ判定　(CBR(x,y))
         　目標値 x と y で％ロールを行い、成否を判定。
@@ -48,7 +54,7 @@ module BCDice
         　　強力でない呪文の場合　FCL／強力な呪文の場合　FCM
       INFO_MESSAGE_TEXT
 
-      register_prefix('CC', 'CBR\(\d+,\d+\)', 'FAR', 'BMR', 'BMS', 'FCL', 'FCM', 'PH', 'MA')
+      register_prefix('CC', 'CBR', 'FAR', 'BMR', 'BMS', 'FCL', 'FCM', 'PH', 'MA')
 
       def eval_game_system_specific_command(command)
         case command
@@ -58,17 +64,17 @@ module BCDice
           combine_roll(command)
         when /^FAR/i
           getFullAutoResult(command)
-        when /^BMR/i # 狂気の発作（リアルタイム）
+        when "BMR" # 狂気の発作（リアルタイム）
           roll_bmr_table()
-        when /^BMS/i # 狂気の発作（サマリー）
+        when "BMS" # 狂気の発作（サマリー）
           roll_bms_table()
-        when /^FCL/i # キャスティング・ロールのプッシュに失敗した場合（小）
+        when "FCL" # キャスティング・ロールのプッシュに失敗した場合（小）
           roll_1d8_table("キャスティング・ロール失敗(小)表", FAILED_CASTING_L_TABLE)
-        when /^FCM/i # キャスティング・ロールのプッシュに失敗した場合（大）
+        when "FCM" # キャスティング・ロールのプッシュに失敗した場合（大）
           roll_1d8_table("キャスティング・ロール失敗(大)表", FAILED_CASTING_M_TABLE)
-        when /^PH/i # 恐怖症表
+        when "PH" # 恐怖症表
           roll_1d100_table("恐怖症表", PHOBIAS_TABLE)
-        when /^MA/i # マニア表
+        when "MA" # マニア表
           roll_1d100_table("マニア表", MANIAS_TABLE)
         end
       end
@@ -77,6 +83,7 @@ module BCDice
         LEVEL = [
           :fumble,
           :failure,
+          :success,
           :regular_success,
           :hard_success,
           :extreme_success,
@@ -88,23 +95,38 @@ module BCDice
           extreme_success: "イクストリーム成功",
           hard_success: "ハード成功",
           regular_success: "レギュラー成功",
+          success: "成功",
           fumble: "ファンブル",
           failure: "失敗",
         }.freeze
 
+        def self.with_difficulty_level(total, difficulty)
+          fumble = difficulty < 50 ? 96 : 100
+
+          if total == 1
+            ResultLevel.new(:critical)
+          elsif total >= fumble
+            ResultLevel.new(:fumble)
+          elsif total <= difficulty
+            ResultLevel.new(:success)
+          else
+            ResultLevel.new(:failure)
+          end
+        end
+
         def self.from_values(total, difficulty, fumbleable = false)
           fumble = difficulty < 50 || fumbleable ? 96 : 100
 
           if total == 1
             ResultLevel.new(:critical)
+          elsif total >= fumble
+            ResultLevel.new(:fumble)
           elsif total <= (difficulty / 5)
             ResultLevel.new(:extreme_success)
           elsif total <= (difficulty / 2)
             ResultLevel.new(:hard_success)
           elsif total <= difficulty
             ResultLevel.new(:regular_success)
-          elsif total >= fumble
-            ResultLevel.new(:fumble)
           else
             ResultLevel.new(:failure)
           end
@@ -117,7 +139,7 @@ module BCDice
         end
 
         def success?
-          @level_index >= LEVEL.index(:regular_success)
+          @level_index >= LEVEL.index(:success)
         end
 
         def failure?
@@ -160,15 +182,26 @@ module BCDice
       end
 
       def skill_roll(command)
-        m = /^CC([-+]?\d+)?(?:<=(\d+))?$/.match(command)
+        m = /^CC([-+]?\d+)?(?:<=(\d+)([RHEC])?)?$/.match(command)
         unless m
           return nil
         end
 
         bonus_dice = m[1].to_i
-        difficulty = m[2].to_i
+        difficulty = m[2]&.to_i
+        difficulty_level = m[3]
+
+        if difficulty == 0
+          difficulty = nil
+        elsif difficulty_level == "H"
+          difficulty /= 2
+        elsif difficulty_level == "E"
+          difficulty /= 5
+        elsif difficulty_level == "C"
+          difficulty = 0
+        end
 
-        if bonus_dice == 0 && difficulty == 0
+        if bonus_dice == 0 && difficulty.nil?
           dice = @randomizer.roll_once(100)
           return "1D100 ＞ #{dice}"
         end
@@ -179,8 +212,13 @@ module BCDice
 
         total, total_list = roll_with_bonus(bonus_dice)
 
-        expr = difficulty.zero? ? "1D100" : "1D100<=#{difficulty}"
-        result = ResultLevel.from_values(total, difficulty) unless difficulty.zero?
+        expr = difficulty.nil? ? "1D100" : "1D100<=#{difficulty}"
+        result =
+          if difficulty_level
+            ResultLevel.with_difficulty_level(total, difficulty)
+          elsif difficulty
+            ResultLevel.from_values(total, difficulty)
+          end
 
         sequence = [
           "(#{expr}) ボーナス・ペナルティダイス[#{bonus_dice}]",

data/lib/bcdice/game_system/Cthulhu7th_ChineseTraditional.rb

@@ -35,7 +35,7 @@ module BCDice
         ・實時型　Short／總結型　Longer
       INFO_MESSAGE_TEXT
 
-      register_prefix('CC\(\d+\)', 'CC', 'CBR\(\d+,\d+\)', 'FAR\(\d+\)', 'FAR')
+      register_prefix('CC', 'CBR', 'FAR')
 
       def initialize(command)
         super(command)

data/lib/bcdice/game_system/Cthulhu7th_Korean.rb

@@ -32,7 +32,7 @@ module BCDice
         예）FAR(25,70,98)　FAR(50,80,98,-1)
       INFO_MESSAGE_TEXT
 
-      register_prefix('CC\(\d+\)', 'CC', 'CBR\(\d+,\d+\)', 'FAR\(\d+\)', 'FAR')
+      register_prefix('CC', 'CBR', 'FAR')
 
       def initialize(command)
         super(command)

data/lib/bcdice/game_system/Cthulhu_SimplifiedChinese.rb

@@ -0,0 +1,60 @@
+# frozen_string_literal: true
+
+require "bcdice/game_system/Cthulhu"
+
+module BCDice
+  module GameSystem
+    class Cthulhu_SimplifiedChinese < Cthulhu
+      # ゲームシステムの識別子
+      ID = 'Cthulhu:SimplifiedChinese'
+
+      # ゲームシステム名
+      NAME = '克苏鲁的呼唤 第六版'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = '国際化:Simplified Chinese:克苏鲁的呼唤 第六版'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~INFO_MESSAGE_TEXT
+        c=大成功值 ／ f=大失败值 ／ s=极难成功
+
+        1d100<=n    c・f・s全部关闭（只进行数值比较判定）
+
+        ・带cfs判定的判定指令
+
+        CC	 掷1d100骰 c=1、f=100
+        CCB  同上，c=5、f=96
+
+        例：CC<=80  （以80技能値进行行为判定。并以1%的标准使用cf的值）
+        例：CCB<=55 （以55技能値进行行为判定。并以5%的标准使用cf的值）
+
+        ・关于组合骰
+
+        CBR(x,y)	c=1、f=100
+        CBRB(x,y)	c=5、f=96
+
+        ・关于对抗骰
+        RES(x-y)	c=1、f=100
+        RESB(x-y)	c=5、f=96
+
+        ※故障值判定
+
+        ・CC(x) c=1、f=100
+        x=故障值。骰点在x以上并且发生大失败时，会和大失败一起显示（文本为「大失败＆故障」）
+        没有发生大失败时，与成功或失败无关，文斗都会显示为「故障」（不显示成功或失败的情况下进行覆盖显示）
+
+        ・CCB(x) c=5、f=96
+        同上
+
+      INFO_MESSAGE_TEXT
+
+      register_prefix_from_super_class()
+
+      def initialize(command)
+        super(command)
+
+        @locale = :zh_hans
+      end
+    end
+  end
+end

data/lib/bcdice/game_system/DarkBlaze.rb

@@ -43,17 +43,6 @@ module BCDice
         return string
       end
 
-      # ゲーム別成功度判定(nD6)
-      def check_nD6(total, _dice_total, _dice_list, cmp_op, target)
-        if cmp_op != :>= || target == "?"
-          ''
-        elsif total >= target
-          " ＞ 成功"
-        else
-          " ＞ 失敗"
-        end
-      end
-
       def check_roll(string)
         string = replace_text(string)
         return nil unless (m = /(^|\s)S?(3[rR]6([+\-\d]+)?(\[(\d+),(\d+)\])(([>=]+)(\d+))?)(\s|$)/i.match(string))

data/lib/bcdice/game_system/DarkDaysDrive.rb

@@ -51,18 +51,19 @@ module BCDice
       end
 
       # ゲーム別成功度判定(2D6)
-      def check_2D6(total, dice_total, _dice_list, cmp_op, target)
-        return '' if target == '?'
-        return '' unless cmp_op == :>=
+      def result_2d6(total, dice_total, _dice_list, cmp_op, target)
+        return nil unless cmp_op == :>=
 
         if dice_total <= 2
-          " ＞ ファンブル(判定失敗。失敗表(FT)を追加で１回振る)"
+          Result.fumble("ファンブル(判定失敗。失敗表(FT)を追加で１回振る)")
         elsif dice_total >= 12
-          " ＞ スペシャル(判定成功。大成功表(GJT)を１回使用可能)"
+          Result.critical("スペシャル(判定成功。大成功表(GJT)を１回使用可能)")
+        elsif target == "?"
+          Result.nothing
         elsif total >= target
-          " ＞ 成功"
+          Result.success("成功")
         else
-          " ＞ 失敗"
+          Result.failure("失敗")
         end
       end
 

data/lib/bcdice/game_system/DeadlineHeroes.rb

@@ -33,8 +33,8 @@ module BCDice
       INFO_MESSAGE_TEXT
 
       register_prefix(
-        'DLH\\d+([\\+\\-]\\d+)*',
-        'DC(L|S|C)\d+',
+        'DLH',
+        'DC[LSC]',
         'RNC[JO]',
         'HNC'
       )
@@ -71,10 +71,11 @@ module BCDice
           "行為判定(成功率:#{success_rate}％)",
           "1D100[#{dice10},#{dice01}]=#{roll_result_text}",
           roll_result_text.to_s,
-          result
+          result.text
         ]
 
-        return sequence.join(" ＞ ")
+        result.text = sequence.join(" ＞ ")
+        result
       end
 
       SUCCESS_STR = "成功"
@@ -84,19 +85,19 @@ module BCDice
 
       def action_result(total, tens, ones, success_rate)
         if total == 100 || success_rate <= 0
-          FUMBLE_STR
+          Result.fumble(FUMBLE_STR)
         elsif total <= success_rate - 100
-          CRITICAL_STR
+          Result.critical(CRITICAL_STR)
         elsif tens == ones
           if total <= success_rate
-            CRITICAL_STR
+            Result.critical(CRITICAL_STR)
           else
-            FUMBLE_STR
+            Result.fumble(FUMBLE_STR)
           end
         elsif total <= success_rate
-          SUCCESS_STR
+          Result.success(SUCCESS_STR)
         else
-          FAILURE_STR
+          Result.failure(FAILURE_STR)
         end
       end
 

data/lib/bcdice/game_system/DemonParasite.rb

@@ -28,7 +28,7 @@ module BCDice
         ・D66ダイスあり
       INFO_MESSAGE_TEXT
 
-      register_prefix('[NAMUC]?URGE\d+')
+      register_prefix('[NAMUC]?URGE')
 
       def initialize(command)
         super(command)
@@ -38,21 +38,13 @@ module BCDice
       end
 
       # ゲーム別成功度判定(nD6)
-      def check_nD6(total, _dice_total, dice_list, cmp_op, target)
+      def result_nd6(_total, _dice_total, dice_list, _cmp_op, target)
         if dice_list.count(1) >= 2 # １の目が２個以上ならファンブル
-          return " ＞ 致命的失敗"
+          Result.fumble("致命的失敗")
         elsif dice_list.count(6) >= 2 # ６の目が２個以上あったらクリティカル
-          return " ＞ 効果的成功"
+          Result.critical("効果的成功")
         elsif target == "?"
-          return ''
-        end
-
-        if [:>=, :>].include?(cmp_op)
-          if total.send(cmp_op, target)
-            " ＞ 成功"
-          else
-            " ＞ 失敗"
-          end
+          Result.nothing
         end
       end
 

data/lib/bcdice/game_system/DesperateRun.rb

@@ -100,7 +100,7 @@ module BCDice
         )
       }.freeze
 
-      register_prefix('RC\d+', 'DDC', TABLES.keys)
+      register_prefix('RC', 'DDC', TABLES.keys)
 
       def initialize(command)
         super(command)

data/lib/bcdice/game_system/DoubleCross.rb

@@ -30,6 +30,11 @@ module BCDice
         ・D66ダイスあり
       INFO_MESSAGE_TEXT
 
+      def initialize(command)
+        super(command)
+        @sides_implicit_d = 10
+      end
+
       register_prefix('\d+DX', 'ET')
 
       # 成功判定コマンドのノード
@@ -117,6 +122,8 @@ module BCDice
               achieved_value.to_s
             end
 
+          r.critical = value_groups.length > 1
+
           parts = [
             "(#{@expression})",
             "#{value_groups.join('+')}#{@modifier_str}",
@@ -239,7 +246,7 @@ module BCDice
       end
 
       # 疾風怒濤式の成功判定コマンドの正規表現マッチ情報からノードを作る
-      # @param [MatchData] m 正規表現のマッチ情報
+      # @param command [String]
       # @return [DX]
       def parse_dx_shippu_doto(command)
         parser = Command::Parser.new(/\d+DX\d*/, round_type: round_type)

data/lib/bcdice/game_system/Dracurouge.rb

@@ -115,8 +115,9 @@ module BCDice
         dice_count = 4 if dice_count == 0
 
         dice_list = @randomizer.roll_barabara(dice_count, 6).sort
+        total = dice_list.sum()
 
-        return "(#{command}) ＞ #{dice_count}D6 ＞ [ #{dice_list.join(', ')} ]"
+        return "(#{command}) ＞ #{dice_count}D6 ＞ [ #{dice_list.join(', ')} ] ＞ #{total}"
       end
 
       def getReactionDiceCommandResult(command)
@@ -548,7 +549,7 @@ module BCDice
 
       TABLES = translate_tables(:ja_jp)
 
-      register_prefix('DR', 'RT', 'HRT', 'CT\d+', TABLES.keys)
+      register_prefix('DR', 'RT', 'HRT', 'CT', TABLES.keys)
     end
   end
 end

data/lib/bcdice/game_system/EclipsePhase.rb

@@ -16,34 +16,34 @@ module BCDice
       HELP_MESSAGE =
         '1D100<=m 方式の判定で成否、クリティカル・ファンブルを自動判定'
 
-      def check_1D100(total, _dice_total, cmp_op, target)
-        return '' if target == '?'
-        return '' unless cmp_op == :<=
+      def result_1d100(total, _dice_total, cmp_op, target)
+        return nil if target == '?'
+        return nil unless cmp_op == :<=
 
-        diceValue = total % 100 # 出目00は100ではなく00とする
-        dice_ten_place = diceValue / 10
-        dice_one_place = diceValue % 10
+        dice_value = total % 100 # 出目00は100ではなく00とする
+        dice_ten_place = dice_value / 10
+        dice_one_place = dice_value % 10
 
         if dice_ten_place == dice_one_place
-          return ' ＞ 決定的失敗' if diceValue == 99
-          return ' ＞ 00 ＞ 決定的成功' if diceValue == 0
-          return ' ＞ 決定的成功' if total <= target
+          return Result.fumble('決定的失敗') if dice_value == 99
+          return Result.critical('00 ＞ 決定的成功') if dice_value == 0
+          return Result.critical('決定的成功') if total <= target
 
-          return ' ＞ 決定的失敗'
+          return Result.fumble('決定的失敗')
         end
 
         diff_threshold = 30
 
         if total <= target
           if total >= diff_threshold
-            ' ＞ エクセレント'
+            Result.success('エクセレント')
           else
-            ' ＞ 成功'
+            Result.success('成功')
           end
         elsif (total - target) >= diff_threshold
-          ' ＞ シビア'
+          Result.failure('シビア')
         else
-          ' ＞ 失敗'
+          Result.failure('失敗')
         end
       end
     end