bcdice 3.1.2 → 3.4.0

data/lib/bcdice/game_system/NinjaSlayer.rb

@@ -176,8 +176,7 @@ module BCDice
         command = bRollCommand(at.num, at.difficulty)
         roll_result = BCDice::CommonCommand::BarabaraDice.eval(command, self, @randomizer)
 
-        values = roll_result.rands.map { |v, _| v }
-        num_of_max_values = values.count(6)
+        num_of_max_values = roll_result.last_dice_list.count(6)
 
         parts = [roll_result.text]
 
@@ -195,7 +194,7 @@ module BCDice
         command = bRollCommand(el.num, el.difficulty)
         roll_result = BCDice::CommonCommand::BarabaraDice.eval(command, self, @randomizer)
 
-        values = roll_result.rands.map { |v, _| v }
+        values = roll_result.last_dice_list
         num_of_max_values = values.count(6)
         sum_of_true_values = values.count { |v| v >= el.difficulty }
 
@@ -253,10 +252,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/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/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