bcdice 3.1.3 → 3.5.0

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/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コマンドに切り分け

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/PersonaO.rb

@@ -0,0 +1,86 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class PersonaO < Base
+      # ゲームシステムのの識別子
+      ID = 'PersonaO'
+
+      # ゲームシステム名
+      NAME = 'ペルソナTRPG-O'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'へるそなTRPGO'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~INFO_MESSAGE_TEXT
+        ・基本判定
+        　PTx@y　x：目標値、y：クリティカル値（省略時は5）
+        　例）PT60　PT90@10
+
+        ・ダメージ計算
+        　nPD+(x+y*2)%(z-a)-b　n：ダイス個数、x：スキル固定値、y：ボーナス、z：バフ倍率、a：耐性、b：敵防御力
+        　nPD+(x+y*2)までがスキルによる素のダメージ、zおよびaは計算式を入れてよい。
+        　
+        　例）ソニックパンチ、力B2点、
+        　　　タルカジャがかかっており、打撃耐性あり、
+        　　　目標の物理防御力は2点
+        　　　
+        　　　2PD+(20+2*2)%(100+50-50)-2
+      INFO_MESSAGE_TEXT
+
+      register_prefix(
+        'PT',
+        '\d+PD'
+      )
+
+      def eval_game_system_specific_command(command)
+        roll_attack(command) || roll_damage(command)
+      end
+
+      private
+
+      def roll_attack(command)
+        m = /^PT(-?\d+)?(@(-?\d+))?$/i.match(command)
+        unless m
+          return nil
+        end
+
+        success_rate = m[1].to_i
+        critical_border = m[3]&.to_i || 5
+
+        dice_value = @randomizer.roll_once(100)
+        result =
+          if dice_value <= critical_border
+            Result.critical("クリティカル")
+          elsif dice_value <= success_rate
+            Result.success("成功")
+          else
+            Result.failure("失敗")
+          end
+
+        result.text = "D100<=#{success_rate}@#{critical_border} ＞ #{dice_value} ＞ #{result.text}"
+        return result
+      end
+
+      def roll_damage(command)
+        m = /^(\d+)PD\+(-?\d+)%(-?\d+)-(\d+)$/i.match(command)
+        unless m
+          return nil
+        end
+
+        dice = m[1].to_i
+        kotei = m[2].to_i
+        hosei = m[3].to_i
+        bougyo = m[4].to_i
+
+        dice_list = @randomizer.roll_barabara(dice, 10)
+        dice_sum = dice_list.sum
+
+        dmg = dice_sum + (hosei * kotei / 100.0).to_i - bougyo
+
+        return "#{dice}D10+#{kotei}＊#{hosei}%-#{bougyo} ＞ [#{dice_list.join(',')}]+#{kotei}＊#{hosei}%-#{bougyo} ＞ #{dmg} ダメージ！"
+      end
+    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,7 +38,7 @@ module BCDice
       MESSAGETEXT
 
       register_prefix(
-        'WEA\d*',
+        '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/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, RoundType::FLOOR)
+        border = Arithmetic.eval(border_expression, 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

data/lib/bcdice/game_system/RuneQuest.rb

@@ -18,8 +18,8 @@ module BCDice
       INFO_MESSAGE_TEXT
 
       # ゲーム別成功度判定(1d100)
-      def check_1D100(total, _dice_total, cmp_op, target)
-        return '' if target == '?'
+      def result_1d100(total, _dice_total, cmp_op, target)
+        return Result.nothing if target == '?'
         return nil unless cmp_op == :<=
 
         # RuneQuest QUICK-START RULESを元に修正
@@ -28,18 +28,18 @@ module BCDice
 
         if (total <= 1) || (total <= critical_value)
           # 1は常に決定的成功
-          " ＞ 決定的成功"
+          Result.critical("決定的成功")
         elsif total >= 100
           # 100は常に致命的失敗
-          " ＞ 致命的失敗"
+          Result.fumble("致命的失敗")
         elsif total <= (target.to_f / 5).round
-          " ＞ 効果的成功"
+          Result.success("効果的成功")
         elsif total <= target
-          " ＞ 成功"
+          Result.success("成功")
         elsif total >= 95 + critical_value
-          " ＞ 致命的失敗"
+          Result.fumble("致命的失敗")
         else
-          " ＞ 失敗"
+          Result.failure("失敗")
         end
       end
     end

data/lib/bcdice/game_system/Ryutama.rb

@@ -21,7 +21,7 @@ module BCDice
         例）R8,6>=13
       INFO_MESSAGE_TEXT
 
-      register_prefix('R\d+')
+      register_prefix('R')
 
       def initialize(command)
         super(command)

data/lib/bcdice/game_system/SRS.rb

@@ -219,7 +219,7 @@ module BCDice
 
       # 固有のダイスロールコマンドを実行する
       # @param [String] command 入力されたコマンド
-      # @return [String, nil] ダイスロールコマンドの実行結果
+      # @return [Result, nil] ダイスロールコマンドの実行結果
       def eval_game_system_specific_command(command)
         alias_replaced_with_2d6 = replace_alias_for_srs_roll_with_2d6(command)
 
@@ -297,7 +297,7 @@ module BCDice
 
       # 成功判定を実行する
       # @param [SRSRollNode] srs_roll 成功判定ノード
-      # @return [String] 成功判定結果
+      # @return [Result] 成功判定結果
       def execute_srs_roll(srs_roll)
         dice_list = @randomizer.roll_barabara(2, 6)
         dice_list.sort! if @sort_add_dice
@@ -307,35 +307,36 @@ module BCDice
 
         modified_sum = sum + srs_roll.modifier
 
+        result = compare_result(srs_roll, sum, modified_sum)
+
         parts = [
           "(#{srs_roll})",
           "#{sum}[#{dice_str}]#{Format.modifier(srs_roll.modifier)}",
           modified_sum,
-          compare_result(srs_roll, sum, modified_sum)
+          result.text
         ]
 
-        return parts.compact.join(' ＞ ')
+        result.text = parts.compact.join(' ＞ ')
+        result
       end
 
       # ダイスロール結果を目標値、クリティカル値、ファンブル値と比較する
       # @param [SRSRollNode] srs_roll 成功判定ノード
       # @param [Integer] sum 出目の合計
       # @param [Integer] modified_sum 修正後の値
-      # @return [String, nil] 比較結果
+      # @return [Result] 比較結果
       def compare_result(srs_roll, sum, modified_sum)
         if sum >= srs_roll.critical_value
-          return '自動成功'
-        end
-
-        if sum <= srs_roll.fumble_value
-          return '自動失敗'
-        end
-
-        if srs_roll.target_value
-          return modified_sum >= srs_roll.target_value ? '成功' : '失敗'
+          Result.critical("自動成功")
+        elsif sum <= srs_roll.fumble_value
+          Result.fumble("自動失敗")
+        elsif srs_roll.target_value.nil?
+          Result.new
+        elsif modified_sum >= srs_roll.target_value
+          Result.success("成功")
+        else
+          Result.failure("失敗")
         end
-
-        return nil
       end
     end
   end

data/lib/bcdice/game_system/SamsaraBallad.rb

@@ -1,5 +1,7 @@
 # frozen_string_literal: true
 
+require 'bcdice/base'
+
 module BCDice
   module GameSystem
     class SamsaraBallad < Base
@@ -59,38 +61,63 @@ module BCDice
           total = 100 if total == 0
         end
 
-        cmp_result = compare(total, cmd)
+        result = compare(total, cmd)
+
+        result_str =
+          if result.failure?
+            "失敗"
+          elsif result.success?
+            "成功"
+          end
+
+        additional_str =
+          if result.fumble?
+            "ファンブル"
+          elsif result.critical?
+            "クリティカル"
+          end
 
         sequence = [
           "(D100#{cmd.cmp_op}#{cmd.target_number})",
           places_text,
           total.to_s,
-          cmp_result,
+          result_str,
+          additional_str,
         ].compact
 
-        return sequence.join(" ＞ ")
+        result.text = sequence.join(" ＞ ")
+
+        return result
       end
 
       private
 
-      # @return [String]
-      # @return [nil]
+      # @return [Result]
       def compare(total, cmd)
         if [:<=, :<].include?(cmd.cmp_op)
           if !total.send(cmd.cmp_op, cmd.target_number)
-            "失敗"
+            Result.failure(nil)
           elsif fumble_?(total, cmd.fumble)
-            "ファンブル"
+            Result.new.tap do |r|
+              r.success = true
+              r.fumble = true
+            end
           elsif critical_?(total, cmd.critical)
-            "クリティカル"
+            Result.critical(nil)
           else
-            "成功"
+            Result.success(nil)
           end
         elsif fumble_?(total, cmd.fumble)
           # ファンブル優先
-          "ファンブル"
+          Result.new.tap do |r|
+            r.fumble = true
+          end
         elsif critical_?(total, cmd.critical)
-          "クリティカル"
+          Result.new.tap do |r|
+            r.critical = true
+          end
+        else
+          Result.new
         end
       end