bcdice 3.1.3 → 3.5.0

data/lib/bcdice/game_system/Gundog.rb

@@ -24,14 +24,15 @@ module BCDice
       end
 
       # ゲーム別成功度判定(1d100)
-      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 unless cmp_op == :<=
 
         if total >= 100
-          " ＞ ファンブル"
+          Result.fumble("ファンブル")
         elsif total <= 1
-          " ＞ 絶対成功(達成値1+SL)"
+          Result.critical("絶対成功(達成値1+SL)")
+        elsif target == "?"
+          Result.nothing
         elsif total <= target
           dig10 = total / 10
           dig1 = total - dig10 * 10
@@ -39,12 +40,12 @@ module BCDice
           dig1 = 0 if dig1 >= 10 # 条件的にはあり得ない(笑
 
           if dig1 <= 0
-            " ＞ クリティカル(達成値20+SL)"
+            Result.critical("クリティカル(達成値20+SL)")
           else
-            " ＞ 成功(達成値#{dig10 + dig1}+SL)"
+            Result.success("成功(達成値#{dig10 + dig1}+SL)")
           end
         else
-          " ＞ 失敗"
+          Result.failure("失敗")
         end
       end
     end

data/lib/bcdice/game_system/GundogRevised.rb

@@ -26,7 +26,7 @@ module BCDice
         　修正を後ろに書くことも出来ます。
       INFO_MESSAGE_TEXT
 
-      register_prefix('(.DPT|.FT)(\+|\-)?\d*')
+      register_prefix('.DPT', '.FT')
 
       def initialize(command)
         super(command)
@@ -35,14 +35,15 @@ module BCDice
 
       # ---- 以降、Gundog.rbよりほぼコピペ（絶対成功→ベアリーに用語変更対応の為、継承だと不都合）
       # ゲーム別成功度判定(1d100)
-      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 unless cmp_op == :<=
 
         if total >= 100
-          " ＞ ファンブル"
+          Result.fumble("ファンブル")
         elsif total <= 1
-          " ＞ ベアリー(達成値1+SL)"
+          Result.critical("ベアリー(達成値1+SL)")
+        elsif target == "?"
+          Result.nothing
         elsif total <= target
           dig10 = total / 10
           dig1 = total - dig10 * 10
@@ -50,12 +51,12 @@ module BCDice
           dig1 = 0 if dig1 >= 10 # 条件的にはあり得ない(笑
 
           if dig1 <= 0
-            " ＞ クリティカル(達成値20+SL)"
+            Result.critical("クリティカル(達成値20+SL)")
           else
-            " ＞ 成功(達成値#{dig10 + dig1}+SL)"
+            Result.success("成功(達成値#{dig10 + dig1}+SL)")
           end
         else
-          " ＞ 失敗"
+          Result.failure("失敗")
         end
       end
 

data/lib/bcdice/game_system/GundogZero.rb

@@ -26,7 +26,7 @@ module BCDice
         　修正を後ろに書くことも出来ます。
       INFO_MESSAGE_TEXT
 
-      register_prefix('(.DPT|.FT)\d*')
+      register_prefix('.DPT', '.FT')
 
       def eval_game_system_specific_command(command)
         string = command.upcase

data/lib/bcdice/game_system/GurpsFW.rb

@@ -55,18 +55,18 @@ module BCDice
         'FMB',
         'MFMB',
         'HIT',
-        'FEAR((\+)?\d*)',
-        'REACT((\+|\-)?\d*)',
-        'TRAP(E|N|H|L)',
-        'TRS((E|N|H|L)\d+)((\+|\-)?\d*)',
-        'RAND(E|N|H|L)[1-6]?',
-        'RENC(E|N|H|L)[1-6]?',
+        'FEAR',
+        'REACT',
+        'TRAP[ENHL]',
+        'TRS[ENHL]',
+        'RAND[ENHL]',
+        'RENC[ENHL]',
         'AREA',
-        'DROP(N)?((\+)?\d)?',
+        'DROPN?',
         'HST',
         'KHST',
         'RANDOP',
-        'LOT(N|P)'
+        'LOT[NP]'
       )
 
       def initialize(command)
@@ -75,14 +75,14 @@ module BCDice
         @d66_sort_type = D66SortType::NO_SORT
       end
 
-      def check_nD6(total, dice_total, dice_list, cmp_op, target)
-        return '' if target == '?'
-        return "" unless dice_list.size == 3 && cmp_op == :<=
+      def result_nd6(total, dice_total, dice_list, cmp_op, target)
+        return Result.nothing if target == '?'
+        return nil unless dice_list.size == 3 && cmp_op == :<=
 
         success = target - total # 成功度
-        crt_string = " ＞ クリティカル(成功度：#{success})"
-        fmb_string = " ＞ ファンブル(失敗度：#{success})"
-        fail_string = " ＞ 自動失敗(失敗度：#{success})"
+        crt_string = Result.critical("クリティカル(成功度：#{success})")
+        fmb_string = Result.fumble("ファンブル(失敗度：#{success})")
+        fail_string = Result.failure("自動失敗(失敗度：#{success})")
 
         # クリティカル
         if (dice_total <= 6) && (target >= 16)
@@ -105,9 +105,9 @@ module BCDice
         end
 
         if total <= target
-          return " ＞ 成功(成功度：#{success})"
+          return Result.success("成功(成功度：#{success})")
         else
-          return " ＞ 失敗(失敗度：#{success})"
+          return Result.failure("失敗(失敗度：#{success})")
         end
       end
 

data/lib/bcdice/game_system/HarnMaster.rb

@@ -21,32 +21,25 @@ module BCDice
         ・人型用　中段命中部位表 (SLH)／上段命中部位 (SLHU)／上段命中部位 (SLHD)
       MESSAGETEXT
 
-      register_prefix('SHK\d+', 'SLH', 'SLHU', 'SLHD')
-
-      def check_1D100(total, _dice_total, cmp_op, target)
-        return '' if target == '?'
-        return '' unless cmp_op == :<=
-
-        result = getCheckResult(total, target)
-        return " ＞ #{result}"
-      end
-
-      def getCheckResult(total, diff)
-        return getFailResult(total) if total > diff
-
-        return getSuccessResult(total)
-      end
-
-      def getFailResult(total)
-        return "致命的失敗" if (total % 5) == 0
-
-        return "失敗"
-      end
-
-      def getSuccessResult(total)
-        return "決定的成功" if (total % 5) == 0
-
-        return "成功"
+      register_prefix('SHK', 'SLH', 'SLHU', 'SLHD')
+
+      def result_1d100(total, _dice_total, cmp_op, target)
+        return Result.nothing if target == '?'
+        return nil unless cmp_op == :<=
+
+        if total <= target
+          if total % 5 == 0
+            Result.critical("決定的成功")
+          else
+            Result.success("成功")
+          end
+        else
+          if total % 5 == 0
+            Result.fumble("致命的失敗")
+          else
+            Result.failure("失敗")
+          end
+        end
       end
 
       def eval_game_system_specific_command(command)

data/lib/bcdice/game_system/HatsuneMiku.rb

@@ -699,7 +699,7 @@ module BCDice
         ),
       }.freeze
 
-      register_prefix('R([A-DS]|\d+)', TABLES.keys)
+      register_prefix('R[A-DS]?', TABLES.keys)
     end
   end
 end

data/lib/bcdice/game_system/Hieizan.rb

@@ -16,31 +16,22 @@ module BCDice
       HELP_MESSAGE = "大成功、自動成功、失敗、自動失敗、大失敗の自動判定を行います。\n"
 
       # ゲーム別成功度判定(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 == :<=
 
-        if total <= 1
-          # 1は自動成功
-          if total <= (target / 5)
-            " ＞ 大成功"
-          else
-            " ＞ 自動成功"
-          end
-        elsif total >= 100
-          # 00は大失敗(大失敗は自動失敗でもある)
-          " ＞ 大失敗"
+        if total >= 100
+          Result.fumble("大失敗")
         elsif total >= 96
-          # 96-00は自動失敗
-          " ＞ 自動失敗"
+          Result.failure("自動失敗")
+        elsif total <= (target / 5)
+          Result.critical("大成功")
+        elsif total <= 1
+          Result.success("自動成功")
         elsif total <= target
-          if total <= (target / 5)
-            # 目標値の1/5以下は大成功
-            " ＞ 大成功"
-          else
-            " ＞ 成功"
-          end
+          Result.success("成功")
         else
-          " ＞ 失敗"
+          Result.failure("失敗")
         end
       end
     end

data/lib/bcdice/game_system/HouraiGakuen.rb

@@ -31,7 +31,7 @@ module BCDice
           例）Hourai : 仁義八徳は、【義】(奇数、奇数、偶数)
       INFO_MESSAGE_TEXT
 
-      register_prefix('ROL', 'MED\(\d+,\d+\)', 'RES\(\d+,\d+\)', 'INY', 'HTK', 'GOG')
+      register_prefix('ROL', 'MED', 'RES', 'INY', 'HTK', 'GOG')
 
       # ゲームの名前
       # チャット欄表示名

data/lib/bcdice/game_system/HuntersMoon.rb

@@ -47,18 +47,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
-          " ＞ ファンブル(モノビースト追加行動+1)"
+          Result.fumble("ファンブル(モノビースト追加行動+1)")
         elsif dice_total >= 12
-          " ＞ スペシャル(変調1つ回復orダメージ+1D6)"
-        elsif total >= target
-          " ＞ 成功"
-        else
-          " ＞ 失敗"
+          Result.critical("スペシャル(変調1つ回復orダメージ+1D6)")
         end
       end
 
@@ -403,7 +398,7 @@ module BCDice
         ),
       }.freeze
 
-      register_prefix(RTT.prefixes, 'SA2?T\d*', TABLES.keys)
+      register_prefix(RTT.prefixes, 'SA', TABLES.keys)
     end
   end
 end

data/lib/bcdice/game_system/InfiniteFantasia.rb

@@ -13,38 +13,40 @@ module BCDice
       SORT_KEY = 'むけんのふあんたしあ'
 
       # ダイスボットの使い方
-      HELP_MESSAGE = "失敗、成功レベルの自動判定を行います。\n"
+      HELP_MESSAGE = "失敗、成功レベルの自動判定を行います。"
 
       # ゲーム別成功度判定(1d20)
-      def check_1D20(total, _dice_total, cmp_op, target)
-        return '' if target == '?'
+      def result_1d20(total, _dice_total, cmp_op, target)
+        return Result.nothing if target == '?'
+        return nil unless cmp_op == :<=
 
-        if cmp_op != :<=
-          return ''
-        elsif total > target
-          return " ＞ 失敗"
+        if total > target
+          return Result.failure("失敗")
         end
 
         output =
           if total <= (target / 32)
-            " ＞ 32レベル成功(32Lv+)"
+            "32レベル成功(32Lv+)"
           elsif total <= (target / 16)
-            " ＞ 16レベル成功(16LV+)"
+            "16レベル成功(16Lv+)"
           elsif total <= (target / 8)
-            " ＞ 8レベル成功"
+            "8レベル成功"
           elsif total <= (target / 4)
-            " ＞ 4レベル成功"
+            "4レベル成功"
           elsif total <= (target / 2)
-            " ＞ 2レベル成功"
+            "2レベル成功"
           else
-            " ＞ 1レベル成功"
+            "1レベル成功"
           end
 
-        if total <= 1
-          output += "/クリティカル"
+        Result.new.tap do |r|
+          r.text = output
+          r.success = true
+          if total <= 1
+            r.critical = true
+            r.text += "/クリティカル"
+          end
         end
-
-        output
       end
     end
   end

data/lib/bcdice/game_system/Insane.rb

@@ -46,27 +46,20 @@ module BCDice
       end
 
       # ゲーム別成功度判定(2D6)
-      def check_2D6(total, dice_total, _dice_list, cmp_op, target)
-        return '' unless cmp_op == :>=
-
-        result =
-          if dice_total <= 2
-            translate("Insane.fumble")
-          elsif dice_total >= 12
-            translate("Insane.special")
-          elsif target == "?"
-            ""
-          elsif total >= target
-            translate("success")
-          else
-            translate("failure")
-          end
-
-        if result.empty?
-          return ""
+      def result_2d6(total, dice_total, _dice_list, cmp_op, target)
+        return nil unless cmp_op == :>=
+
+        if dice_total <= 2
+          Result.fumble(translate("Insane.fumble"))
+        elsif dice_total >= 12
+          Result.critical(translate("Insane.special"))
+        elsif target == "?"
+          Result.nothing
+        elsif total >= target
+          Result.success(translate("success"))
+        else
+          Result.failure(translate("failure"))
         end
-
-        return " ＞ #{result}"
       end
 
       def eval_game_system_specific_command(command)

data/lib/bcdice/game_system/Irisbane.rb

@@ -0,0 +1,154 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class Irisbane < Base
+      # ゲームシステムの識別子
+      ID = 'Irisbane'
+
+      # ゲームシステム名
+      NAME = '瞳逸らさぬイリスベイン'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'ひとみそらさぬいりすへいん'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~HELP
+        ■攻撃判定（ ATTACKx@y<=z ）
+        x: 攻撃力
+        y: 判定数
+        z: 目標値
+        （※ ATTACK は ATK または AT と簡略化可能）
+        例） ATTACK2@3<=5
+        例） ATK10@2<=4
+        例） AT8@3<=2
+
+        上記 x y z にはそれぞれ四則演算を指定可能。
+        例） ATTACK2+7@3*2<=5-1
+
+        □攻撃判定のダメージ増減（ ATTACKx@y<=z[+a]  ATTACKx@y<=z[-a]）
+        末尾に [+a] または [-a] と指定すると、最終的なダメージを増減できる。
+        a: 増減量
+        例） ATTACK2@3<=5[+10]
+        例） ATK10@2<=4[-8]
+        例） AT8@3<=2[-8+5]
+
+        ■シチュエーション（p115）
+        SceneSituation, SSi
+      HELP
+
+      ATTACK_ROLL_REG = %r{^AT(TACK|K)?([+\-*/()\d]+)@([+\-*/()\d]+)<=([+\-*/()\d]+)(\[([+\-])([+\-*/()\d]+)\])?}i.freeze
+      register_prefix('AT(TACK|K)?')
+
+      def initialize(command)
+        super(command)
+
+        @sort_barabara_dice = true
+        @round_type = RoundType::CEIL
+      end
+
+      def eval_game_system_specific_command(command)
+        command = ALIAS[command] || command
+
+        if (m = ATTACK_ROLL_REG.match(command))
+          roll_attack(m[2], m[3], m[4], m[6], m[7])
+        else
+          roll_tables(command, TABLES)
+        end
+      end
+
+      private
+
+      def roll_attack(power_expression, dice_count_expression, border_expression, modification_operator, modification_expression)
+        power = Arithmetic.eval(power_expression, RoundType::CEIL)
+        dice_count = Arithmetic.eval(dice_count_expression, RoundType::CEIL)
+        border = Arithmetic.eval(border_expression, RoundType::CEIL)
+        modification_value = modification_expression.nil? ? nil : Arithmetic.eval(modification_expression, RoundType::CEIL)
+        return if power.nil? || dice_count.nil? || border.nil?
+        return if modification_operator && modification_value.nil?
+
+        power = 0 if power < 0
+        border = border.clamp(1, 6)
+
+        command = make_command_text(power, dice_count, border, modification_operator, modification_value)
+
+        if dice_count <= 0
+          return "#{command} ＞ 判定数が 0 です"
+        end
+
+        dices = @randomizer.roll_barabara(dice_count, 6).sort
+
+        success_dice_count = dices.count { |dice| dice <= border }
+        damage = success_dice_count * power
+
+        message_elements = []
+        message_elements << command
+        message_elements << dices.join(',')
+        message_elements << "成功ダイス数 #{success_dice_count}"
+        message_elements << "× 攻撃力 #{power}" if success_dice_count > 0
+
+        if success_dice_count > 0
+          if modification_operator && modification_value
+            message_elements << "ダメージ #{damage}#{modification_operator}#{modification_value}"
+            damage = parse_operator(modification_operator).call(damage, modification_value)
+            damage = 0 if damage < 0
+            message_elements << damage.to_s
+          else
+            message_elements << "ダメージ #{damage}"
+          end
+        end
+
+        Result.new(message_elements.join(' ＞ ')).tap do |r|
+          r.condition = success_dice_count > 0
+        end
+      end
+
+      def make_command_text(power, dice_count, border, modification_operator, modification_value)
+        text = "(ATTACK#{power}@#{dice_count}<=#{border}"
+        text += "[#{modification_operator}#{modification_value}]" if modification_operator
+        text += ")"
+        text
+      end
+
+      def parse_operator(operator)
+        case operator
+        when '+'
+          lambda { |x, y| x + y }
+        when '-'
+          lambda { |x, y| x - y }
+        end
+      end
+
+      TABLES = {
+        "SceneSituation" => DiceTable::D66LeftRangeTable.new(
+          "シチュエーション",
+          BCDice::D66SortType::NO_SORT,
+          [
+            [1..3, [
+              "【日常】何一つ変わることの無い日々の一幕。移ろい易い世界では、それはとても大切である。",
+              "【準備】何かを為すための用意をする一幕。情報収集、買物遠征、やるべきことは一杯だ。",
+              "【趣味】自分の時間を、有効活用している一幕。必要に追われていない分、心は軽く晴れやかだ。",
+              "【喫茶】一息入れ、嗜好品を嗜む時の一幕。穏やかな空気は、だが、往々にして変わりやすい。",
+              "【鍛錬】体を鍛え、心を養う修練の一幕。己さえ良ければ、その方法も何だって良い。",
+              "【職務】役割の元、仕事に精を出す時の一幕。目的が何であれ、為すべきことに変わりはない。",
+            ]],
+            [4..6, [
+              "【移動】何処かから何処かへと向かう一幕。進んでいるなら、手段も目的地も関係あるまい。",
+              "【墓前】故人が眠る場所へと赴く一幕。共に眠ることだけは無いように。",
+              "【操作】何かを操り、望みを果たしている一幕。運転にせよ何にせよ、脇見には注意が必要だ。",
+              "【食事】何かを糧とし、己の力を蓄える一幕。行動すれば消耗する。腹が減っては何とやらだ。",
+              "【休息】日々の合間の、憩いの一幕。“何もしない”というのも、立派な行いである。",
+              "【夢幻】現実に存在しない何かへと耽る一幕。時間帯に関わらず、何時かは必ず覚めるだろう。",
+            ]],
+          ]
+        ),
+      }.transform_keys(&:upcase).freeze
+
+      ALIAS = {
+        "SSi" => "SceneSituation",
+      }.transform_keys(&:upcase).transform_values(&:upcase).freeze
+
+      register_prefix(TABLES.keys, ALIAS.keys)
+    end
+  end
+end

data/lib/bcdice/game_system/IthaWenUa.rb

@@ -15,22 +15,15 @@ module BCDice
       # ダイスボットの使い方
       HELP_MESSAGE = "1D100<=m 方式の判定で成否、クリティカル(01)・ファンブル(00)を自動判定します。\n"
 
-      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 unless cmp_op == :<=
 
-        diceValue = total % 100
-        dice0 = diceValue / 10 # 10の位を代入
-        dice1 = diceValue % 10 # 1の位を代入
-
-        if (dice0 == 0) && (dice1 == 1)
-          ' ＞ 01 ＞ クリティカル'
-        elsif (dice0 == 0) && (dice1 == 0)
-          ' ＞ 00 ＞ ファンブル'
-        elsif total <= target
-          ' ＞ 成功'
-        else
-          ' ＞ 失敗'
+        if total % 100 == 1
+          Result.critical("01 ＞ クリティカル")
+        elsif total % 100 == 0
+          Result.fumble("00 ＞ ファンブル")
+        elsif target == "?"
+          Result.nothing
         end
       end
     end

data/lib/bcdice/game_system/JamesBond.rb

@@ -16,28 +16,28 @@ module BCDice
       HELP_MESSAGE = <<~INFO_MESSAGE_TEXT
         ・1D100の目標値判定で、効果レーティングを1～4で自動判定。
         　例）1D100<=50
-        　　　JamesBond : (1D100<=50) → 20 → 効果3（良）
+        　　　JamesBond : (1D100<=50) ＞ 20 ＞ 効果3（良）
       INFO_MESSAGE_TEXT
 
-      def check_1D100(total, _dice_total, cmp_op, target) # ゲーム別成功度判定(1d100)
-        return '' if target == '?'
-        return '' unless cmp_op == :<=
+      def result_1d100(total, _dice_total, cmp_op, target) # ゲーム別成功度判定(1d100)
+        return Result.nothing if target == '?'
+        return nil unless cmp_op == :<=
 
         base = ((target + 9) / 10).floor
 
         if total >= 100
           # 100は常に失敗
-          " ＞ 失敗"
+          Result.failure("失敗")
         elsif total <= base
-          " ＞ 効果1（完璧）"
+          Result.success("効果1（完璧）")
         elsif total <= base * 2
-          " ＞ 効果2（かなり良い）"
+          Result.success("効果2（かなり良い）")
         elsif total <= base * 5
-          " ＞ 効果3（良）"
+          Result.success("効果3（良）")
         elsif total <= target
-          " ＞ 効果4（まあまあ）"
+          Result.success("効果4（まあまあ）")
         else
-          " ＞ 失敗"
+          Result.failure("失敗")
         end
       end
     end

data/lib/bcdice/game_system/JekyllAndHyde.rb

@@ -36,7 +36,7 @@ module BCDice
         )
       }.freeze
 
-      register_prefix('RC\d+', 'DDC', TABLES.keys)
+      register_prefix('RC', 'DDC', TABLES.keys)
     end
   end
 end

data/lib/bcdice/game_system/Kamigakari.rb

@@ -193,7 +193,7 @@ module BCDice
 
       TABLES = translate_tables(:ja_jp)
 
-      register_prefix('MT(\d*)', TABLES.keys)
+      register_prefix('MT', TABLES.keys)
     end
   end
 end