bcdice 3.0.0 → 3.2.0

data/lib/bcdice/game_system/NightWizard.rb

@@ -28,7 +28,7 @@ module BCDice
         　例）12NW-5@7#2$3 1NW 50nw+5@7,10#2,5 50nw-5+10@7,10#2,5+15+25
       INFO_MESSAGE_TEXT
 
-      register_prefix('([-+]?\d+)?NW.*', '2R6.*')
+      register_prefix('([-+]?\d+)?NW', '2R6')
 
       def initialize(command)
         super(command)

data/lib/bcdice/game_system/NightWizard3rd.rb

@@ -14,7 +14,7 @@ module BCDice
       # ゲームシステムの識別子
       ID = 'NightWizard3rd'
 
-      register_prefix('([-+]?\d+)?NW.*', '2R6.*')
+      register_prefix('([-+]?\d+)?NW', '2R6')
 
       def fumble_base_number(parsed)
         parsed.passive_modify_number + parsed.active_modify_number

data/lib/bcdice/game_system/NinjaSlayer.rb

@@ -40,15 +40,6 @@ module BCDice
         　KIDS=K,EASY=E,NORMAL=N,HARD=H,ULTRA HARD=UH 数字にも対応
       MESSAGETEXT
 
-      # ダイスボットで使用するコマンドを配列で列挙する
-      register_prefix(
-        'NJ\d+.*',
-        'EV\d+.*',
-        'AT\d+.*',
-        'EL\d+.*',
-        'SB'
-      )
-
       def initialize(command)
         super(command)
 
@@ -262,10 +253,10 @@ module BCDice
 
       # ダイスボットで使用するコマンドを配列で列挙する
       register_prefix(
-        'NJ\d+.*',
-        'EV\d+.*',
-        'AT\d+.*',
-        'EL\d+.*',
+        'NJ',
+        'EV',
+        'AT',
+        'EL',
         TABLES.keys
       )
     end

data/lib/bcdice/game_system/NjslyrBattle.rb

@@ -21,21 +21,18 @@ module BCDice
       INFO_MESSAGE_TEXT
 
       # ゲーム別成功度判定(2D6)
-      def check_2D6(total, _dice_total, dice_list, cmp_op, target)
-        return '' if target == '?'
-        return '' if cmp_op != :<=
+      def result_2d6(total, _dice_total, dice_list, cmp_op, target)
+        return Result.nothing if target == "?"
+        return nil if cmp_op != :<=
 
-        return success_text(total, target) + juuten(dice_list)
-      end
+        result = (total <= target ? Result.success("成功") : Result.failure("失敗"))
+        result.text += juuten(dice_list)
 
-      def success_text(total, target)
-        if total <= target
-          " ＞ 成功"
-        else
-          " ＞ 失敗"
-        end
+        return result
       end
 
+      private
+
       def juuten(dice_list)
         juuten = dice_list.count(1) + dice_list.count(6)
 

data/lib/bcdice/game_system/OneWayHeroics.rb

@@ -127,7 +127,7 @@ module BCDice
         return "失敗"
       end
 
-      register_prefix('\d*JD.*', 'RETP?\d+', 'DNGNP?\d+', TABLES.keys)
+      register_prefix('\d*JD', 'RETP?', 'DNGNP?', TABLES.keys)
     end
   end
 end

data/lib/bcdice/game_system/OracleEngine.rb

@@ -34,7 +34,7 @@ module BCDice
 MESSAGETEXT
 
       # ダイスボットで使用するコマンドを配列で列挙する
-      register_prefix('\d+CL.*', '\d+R6.*', '\d+D6.*\$[\+\-]?\d+.*')
+      register_prefix('\d+CL', '\d+R6', '\d+D6.*\$[\+\-]?\d+')
 
       def initialize(command)
         super(command)

data/lib/bcdice/game_system/OrgaRain.rb

@@ -31,46 +31,38 @@ module BCDice
       end
 
       register_prefix(
-        '(\d+)?OR([0-9])?([0-9])?([0-9])?([0-9])?([0-9])?([0-9])?'
+        '(\d+)?OR(\d{0,6})?'
       )
 
       def eval_game_system_specific_command(command)
-        if command =~ /(\d+)?OR([0-9])?([0-9])?([0-9])?([0-9])?([0-9])?([0-9])?$/i
-          diceCount = (Regexp.last_match(1) || 1).to_i
-          countNo = [(Regexp.last_match(2) || -1).to_i, (Regexp.last_match(3) || -1).to_i, (Regexp.last_match(4) || -1).to_i, (Regexp.last_match(5) || -1).to_i, (Regexp.last_match(6) || -1).to_i, (Regexp.last_match(7) || -1).to_i]
-          countNo.delete(-1)
-          countNo = countNo.sort
+        m = command.match(/(\d+)?OR(\d{0,6})$/i)
+        return nil unless m
 
-          return checkRoll(diceCount, countNo)
-        end
-
-        return nil
+        dice_count = (m[1] || 1).to_i
+        count_no = (m[2] || "").each_char.map(&:to_i).sort
+        return check_roll(dice_count, count_no)
       end
 
-      def checkRoll(diceCount, countNo)
-        diceArray = @randomizer.roll_barabara(diceCount, 10).sort
-        diceText = diceArray.join(',')
+      def check_roll(dice_count, count_no)
+        dice_array = @randomizer.roll_barabara(dice_count, 10).sort
+        dice_text = dice_array.join(',')
 
-        diceArray.map! { |x| x == 10 ? 0 : x }
-
-        resultArray = []
+        result_array = []
         success = 0
-        diceArray.each do |i|
-          multiple = countNo.count(i)
+        dice_array.map { |x| x == 10 ? 0 : x }.each do |i|
+          multiple = count_no.count(i)
           if multiple > 0
-            resultArray.push("#{i}(x#{multiple})")
+            result_array.push("#{i}(x#{multiple})")
             success += multiple
           else
-            resultArray.push("×")
+            result_array.push("×")
           end
         end
 
-        countText = countNo.join(',')
-        resultText = resultArray.join(',')
-
-        result = "#{diceCount}D10(命数：#{countText}) ＞ #{diceText} ＞ #{resultText} ＞ 成功数：#{success}"
+        count_text = count_no.join(',')
+        result_text = result_array.join(',')
 
-        return result
+        return "#{dice_count}D10(命数：#{count_text}) ＞ #{dice_text} ＞ #{result_text} ＞ 成功数：#{success}"
       end
     end
   end

data/lib/bcdice/game_system/Paradiso.rb

@@ -25,7 +25,7 @@ module BCDice
         　例）DC4:【攻撃力】4でダメージチェック　DC5[20]:【攻撃力】5でダメージチェック、うち1つは20mm機銃　DC5[20,30]:【攻撃力】5でダメージチェック、うち1つは20mm機銃、うち1つは30mmガンポッド
       MESSAGETEXT
 
-      register_prefix('(\d+)*D20<=.*', '(\d+)*CP.*', 'RMT', 'TOT', 'EXT', 'SUT', 'DC(\d+).*')
+      register_prefix('\d*D20<=', '\d*CP', 'RMT', 'TOT', 'EXT', 'SUT', 'DC')
 
       def eval_game_system_specific_command(command) # ダイスロールコマンド
         # 通常判定部分をgetJudgeResultコマンドに切り分け
@@ -53,13 +53,13 @@ module BCDice
       # 通常判定
       def getJudgeResult(command)
         case command
-        when /^(\d+)*D20<=(\d+)?(\[(\d+)(,(\d+))?\])?(@(\d+))?$/i
+        when /^(\d+)?D20<=(\d+)?(\[(\d+)(,(\d+))?\])?(@(\d+))?$/i
           number = (Regexp.last_match(1) || 1).to_i # ダイス数。省略時は1
           target = (Regexp.last_match(2) || 14).to_i # 目標値。省略時は14  if 空白 then 14 else 記載の値
           fumble1 = (Regexp.last_match(4) || 21).to_i # 追加ファンブル値。省略時は21
           fumble2 = (Regexp.last_match(6) || 21).to_i # 追加ファンブル値。省略時は21
           critical = (Regexp.last_match(8) || 21).to_i # 追加クリティカル値。省略時は21
-        when /^(\d+)*CP(\d+)?(\[(\d+)(,(\d+))?\])?(@(\d+))?$/i
+        when /^(\d+)?CP(\d+)?(\[(\d+)(,(\d+))?\])?(@(\d+))?$/i
           number = (Regexp.last_match(1) || 1).to_i
           target = (Regexp.last_match(2) || 14).to_i
           fumble1 = (Regexp.last_match(4) || 21).to_i

data/lib/bcdice/game_system/ParanoiaRebooted.rb

@@ -26,7 +26,7 @@ module BCDice
         例）MP2
       INFO_MESSAGE_TEXT
 
-      register_prefix('ND.*', 'MP.*')
+      register_prefix('ND', 'MP')
 
       def eval_game_system_specific_command(command)
         case command

data/lib/bcdice/game_system/ParasiteBlood.rb

@@ -26,7 +26,7 @@ module BCDice
         ・D66ダイスあり
       INFO_MESSAGE_TEXT
 
-      register_prefix('(N|A|M|U|C|)?URGE\d+')
+      register_prefix('[NAMUC]?URGE')
 
       def get_urge(string) # パラサイトブラッドの衝動表
         unless /(\w*)URGE\s*(\d+)/i =~ string

data/lib/bcdice/game_system/Peekaboo.rb

@@ -45,18 +45,13 @@ 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
-          return " ＞ ファンブル(【眠気】が1d6点上昇)"
+          Result.fumble("ファンブル(【眠気】が1d6点上昇)")
         elsif dice_total >= 12
-          return " ＞ スペシャル(【魔力】あるいは【眠気】が1d6点回復)"
-        elsif total >= target
-          return " ＞ 成功"
-        else
-          return " ＞ 失敗"
+          Result.critical("スペシャル(【魔力】あるいは【眠気】が1d6点回復)")
         end
       end
 

data/lib/bcdice/game_system/Pendragon.rb

@@ -18,20 +18,20 @@ module BCDice
       INFO_MESSAGE_TEXT
 
       # ゲーム別成功度判定(1d20)
-      def check_1D20(total, _dice_total, cmp_op, target)
-        return '' if target == '?'
-        return '' unless cmp_op == :<=
+      def result_1d20(total, _dice_total, cmp_op, target)
+        return Result.nothing if target == '?'
+        return nil unless cmp_op == :<=
 
         if total <= target
           if (total >= (40 - target)) || (total == target)
-            " ＞ クリティカル"
+            Result.critical("クリティカル")
           else
-            " ＞ 成功"
+            Result.success("成功")
           end
         elsif total == 20
-          " ＞ ファンブル"
+          Result.fumble("ファンブル")
         else
-          " ＞ 失敗"
+          Result.failure("失敗")
         end
       end
     end

data/lib/bcdice/game_system/PhantasmAdventure.rb

@@ -18,9 +18,9 @@ module BCDice
       INFO_MESSAGE_TEXT
 
       # ゲーム別成功度判定(1d20)
-      def check_1D20(total, _dice_total, cmp_op, diff)
-        return '' if diff == '?'
-        return '' unless cmp_op == :<=
+      def result_1d20(total, _dice_total, cmp_op, diff)
+        return Result.nothing if diff == '?'
+        return nil unless cmp_op == :<=
 
         # 技能値の修正を計算する
         skill_mod = 0
@@ -46,7 +46,7 @@ module BCDice
           else
             fum_str += "-#{skill_mod}=#{fum_num}"
           end
-          return " ＞ 致命的失敗(#{fum_str})"
+          return Result.fumble("致命的失敗(#{fum_str})")
 
         elsif (total <= critical) || (total <= 1)
           crit_num = dice_now + skill_mod
@@ -54,14 +54,14 @@ module BCDice
           crit_num = 1 if crit_num < 1
 
           if skill_mod < 0
-            return " ＞ 成功"
+            return Result.success("成功")
           end
 
-          return " ＞ 決定的成功(#{dice_now}+#{skill_mod}=#{crit_num})"
+          return Result.critical("決定的成功(#{dice_now}+#{skill_mod}=#{crit_num})")
         elsif total <= diff
-          return " ＞ 成功"
+          return Result.success("成功")
         else
-          return " ＞ 失敗"
+          return Result.failure("失敗")
         end
       end
     end

data/lib/bcdice/game_system/Postman.rb

@@ -38,8 +38,8 @@ module BCDice
       MESSAGETEXT
 
       register_prefix(
-        'WEA\d*',
-        '(\d+)?PO.*',
+        'WEA',
+        '(\d+)?PO',
         'FRE'
       )
 

data/lib/bcdice/game_system/PulpCthulhu.rb

@@ -47,7 +47,7 @@ module BCDice
         　・プッシュ時のキャスティング・ロールの失敗（Failed Casting Effects）表　FCE
       INFO_MESSAGE_TEXT
 
-      register_prefix('CC\(\d+\)', 'CC.*', 'CBR\(\d+,\d+\)', 'FAR.*', 'BMR', 'BMS', 'FCE', 'PH', 'MA', 'IT')
+      register_prefix('CC', 'CBR', 'FAR', 'BMR', 'BMS', 'FCE', 'PH', 'MA', 'IT')
 
       def eval_game_system_specific_command(command)
         case command

data/lib/bcdice/game_system/Raisondetre.rb

@@ -39,8 +39,8 @@ module BCDice
       end
 
       register_prefix(
-        '(-)?(\d+)?RD(\d+)?(@(\d+))?',
-        '(-)?(\d+)?DD([1-9])?([\+\-]\d+)?'
+        '(-)?(\d+)?RD',
+        '(-)?(\d+)?DD'
       )
 
       def eval_game_system_specific_command(command)

data/lib/bcdice/game_system/RecordOfLodossWar.rb

@@ -19,7 +19,7 @@ module BCDice
         　判定と回避判定は、どちらもコマンドだけの場合、出目の表示と自動成功と自動失敗の判定のみを行います。
       INFO_MESSAGE_TEXT
 
-      register_prefix('LW.*')
+      register_prefix('LW')
 
       def eval_game_system_specific_command(command)
         parser = Command::Parser.new("LWD", "LW", round_type: round_type)

data/lib/bcdice/game_system/RecordOfSteam.rb

@@ -21,7 +21,7 @@ module BCDice
         RecordOfSteam : (4S3@2) ＞ 2,1,2,4,4,4,2,3,4,5,6,6 ＞ 4回転 ＞ 成功数5
       MESSAGETEXT
 
-      register_prefix('\d+S\d+.*')
+      register_prefix('\d+S\d+')
 
       # サンプルのダイスコマンドは「nSt@c」で n=ダイス個数, t=目標値, c=クリティカル値。@cのみ省略可
 

data/lib/bcdice/game_system/Revulture.rb

@@ -0,0 +1,123 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class Revulture < Base
+      # ゲームシステムの識別子
+      ID = 'Revulture'
+
+      # ゲームシステム名
+      NAME = '光砕のリヴァルチャー'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'こうさいのりうあるちやあ'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~HELP
+        ■アタック判定（ xAT, xATK, xATTACK ）
+        x: ダイス数（加算 + と除算 / を使用可能）
+        例） 3AT, 4ATK, 5+6ATTACK, 15/2AT
+
+        □アタック判定　目標値つき（ xAT<=y, xATK<=y, xATTACK<=y ）
+        x: ダイス数（加算 + と除算 / を使用可能）
+        y: 目標値（ 1 以上 6 以下。加算 + を使用可能）
+        例） 3AT<=4, 3AT<=2+1
+
+        □アタック判定　目標値＆追加ダメージつき（ xAT<=y[>=a:+b], xATK<=y[>=a:+b], xATTACK<=y[z] ）
+        x: ダイス数（加算 + と除算 / を使用可能）
+        y: 目標値（ 1 以上 6 以下。加算 + を使用可能）
+        z: 追加ダメージの規則（詳細は後述）（※複数同時に指定可能）
+
+        ▽追加ダメージの規則 [a:+b]
+        a: ヒット数が a なら
+        　=a　（ヒット数が a に等しい）
+        　>=a　（ヒット数が a 以上）
+        b: ダメージを b 点追加
+
+        例） 3AT<=4[>=2:+3] #ルールブックp056「グレングラントAR」
+        例） 2AT<=4[=1:+5][>=2:+8] #ルールブックp067「ファーボル・ドラゴンブレス」
+      HELP
+
+      ATTACK_ROLL_REG = %r{^(\d+([+/]\d+)*)?AT(TACK|K)?(<=([1-6](\+\d)*))?((\[>?=\d+:\+\d+\])+)?}i.freeze
+      register_prefix('\d+([+\/]\d+)*AT')
+
+      def eval_game_system_specific_command(command)
+        if (m = ATTACK_ROLL_REG.match(command))
+          roll_attack(m[1], m[5], m[7])
+        end
+      end
+
+      private
+
+      def roll_attack(dice_count_expression, border_expression, additional_damage_rules)
+        dice_count = Arithmetic.eval(dice_count_expression, round_type: RoundType::FLOOR)
+        border = Arithmetic.eval(border_expression, round_type: RoundType::FLOOR).clamp(1, 6) if border_expression
+
+        command = make_command_text(dice_count, border, additional_damage_rules)
+
+        if dice_count <= 0
+          return "#{command} ＞ ダイス数が 0 です"
+        elsif border.nil? && additional_damage_rules
+          return "#{command} ＞ 目標値が指定されていないため、追加ダメージを算出できません"
+        end
+
+        dices = @randomizer.roll_barabara(dice_count, 6).sort
+
+        critical_hit_count = dices.count(1)
+        hit_count = dices.count { |dice| dice <= border } + critical_hit_count if border
+        damage = calc_damage(hit_count, additional_damage_rules)
+
+        message_elements = []
+        message_elements << command
+        message_elements << dices.join(',')
+        message_elements << "クリティカル #{critical_hit_count}" if critical_hit_count > 0
+        message_elements << "ヒット数 #{hit_count}" if hit_count
+        message_elements << "ダメージ #{damage}" if damage
+
+        Result.new(message_elements.join(' ＞ ')).tap do |r|
+          r.condition = hit_count > 0 if hit_count
+          r.critical = critical_hit_count > 0
+        end
+      end
+
+      def make_command_text(dice_count, border, additional_damage_rules)
+        command = "#{dice_count}attack"
+        command += "<=#{border}" if border
+        command += additional_damage_rules if additional_damage_rules
+
+        "(#{command})"
+      end
+
+      def calc_damage(hit_count, additional_damage_rules)
+        return nil unless additional_damage_rules
+
+        damage = hit_count
+        parse_additional_damage_rules(additional_damage_rules).each do |rule|
+          if rule[:condition].call(hit_count)
+            damage += rule[:additinal_damage]
+          end
+        end
+
+        damage
+      end
+
+      def parse_additional_damage_rules(source)
+        source.scan(/\[(>?=)(\d+):\+(\d+)\]/).map do |matched|
+          {
+            condition: make_additional_damage_condition(matched[0], matched[1].to_i),
+            additinal_damage: matched[2].to_i,
+          }
+        end
+      end
+
+      def make_additional_damage_condition(comparer, comparing_target)
+        case comparer
+        when '='
+          lambda { |hit_count| hit_count == comparing_target }
+        when '>='
+          lambda { |hit_count| hit_count >= comparing_target }
+        end
+      end
+    end
+  end
+end