bcdice 3.9.0 → 3.11.0

data/lib/bcdice/game_system/KemonoNoMori.rb

@@ -25,7 +25,7 @@ module BCDice
              例2）KC6 → 目標値6の継続判定
         ・罠動作チェック+獲物表(P163): CTR
            罠ごとに1D12を振り、12が出た場合には生き物が罠を動作させ、その影響を受けている。
-        ・各種表
+        ・各種表（基本ルールブック）
           ・大失敗表(P120): FT
           ・能力値ランダム決定表(P121): RST
           ・ランダム所要時間表(P122): RTT
@@ -38,6 +38,16 @@ module BCDice
           ・食材採集表(P157): GFT
           ・水採集表(P157): GWT
           ・白の魔石効果表(P186): WST
+        ・部位ダメージ関連の表（参照先ページはリプレイ&データブック「嚙神ノ宴」のもの）
+          ・人間部位表(P216): HPT
+          ・部位ダメージ段階表(P217): PDT
+          ・四足動物部位表(P225): QPT
+          ・無足動物部位表(P225): APT
+          ・二足動物部位表(P226): TPT
+          ・鳥部位表(P226): BPT
+          ・頭足動物部位表(P227): CPT
+          ・昆虫部位表(P227): IPT
+          ・蜘蛛部位表(P228): SPT
       MESSAGETEXT
 
       def eval_game_system_specific_command(command)
@@ -237,6 +247,128 @@ module BCDice
             '大型動物を召喚する',
           ]
         ),
+        'HPT' => DiceTable::RangeTable.new(
+          '人間部位表',
+          '1D12',
+          [
+            [1..2,  '右腕部'],
+            [3..4,  '左腕部'],
+            [5..6,  '右脚部'],
+            [7..8,  '左脚部'],
+            [9..11, '胴部'],
+            [12,    '頭部'],
+          ]
+        ),
+        'PDT' => DiceTable::RangeTable.new(
+          '部位ダメージ段階表',
+          '1D12',
+          [
+            [1..6,  '軽傷'],
+            [7..10, '重傷'],
+            [11,    '破壊'],
+            [12,    '喪失'],
+          ]
+        ),
+        'QPT' => DiceTable::RangeTable.new(
+          '四足動物部位表',
+          '1D12',
+          [
+            [1..2,    '異形'],
+            [3,       '武器'],
+            [4,       '右前脚部'],
+            [5,       '左前脚部'],
+            [6,       '右後脚部'],
+            [7,       '左後脚部'],
+            [8..10,   '胴部'],
+            [11..12,  '頭部'],
+          ]
+        ),
+        'APT' => DiceTable::RangeTable.new(
+          '無足動物部位表',
+          '1D12',
+          [
+            [1..3,    '異形'],
+            [4..6,    '武器'],
+            [7..10,   '胴部'],
+            [11..12,  '頭部'],
+          ]
+        ),
+        'TPT' => DiceTable::RangeTable.new(
+          '二足動物部位表',
+          '1D12',
+          [
+            [1,     '異形'],
+            [2,     '武器'],
+            [3,     '右腕部'],
+            [4,     '左腕部'],
+            [5..6,  '右脚部'],
+            [7..8,  '左脚部'],
+            [9..11, '胴部'],
+            [12,    '頭部'],
+          ]
+        ),
+        'BPT' => DiceTable::RangeTable.new(
+          '鳥部位表',
+          '1D12',
+          [
+            [1,     '異形'],
+            [2,     '武器'],
+            [3..4,  '右翼(右腕部)'],
+            [5..6,  '左翼(左腕部)'],
+            [7,     '右脚部'],
+            [8,     '左脚部'],
+            [9..11, '胴部'],
+            [12,    '頭部'],
+          ]
+        ),
+        'CPT' => DiceTable::RangeTable.new(
+          '頭足動物部位表',
+          '1D12',
+          [
+            [1,     '異形'],
+            [2,     '武器'],
+            [3,     '右腕部'],
+            [4,     '左腕部'],
+            [5..7,  '右脚部'],
+            [8..10, '左脚部'],
+            [11,    '胴部'],
+            [12,    '頭部'],
+          ]
+        ),
+        'IPT' => DiceTable::RangeTable.new(
+          '昆虫部位表',
+          '1D12',
+          [
+            [1..2,    '異形'],
+            [3,       '武器'],
+            [4,       '右前脚部'],
+            [5,       '左前脚部'],
+            [6,       '右中脚部'],
+            [7,       '左中脚部'],
+            [8,       '右後脚部'],
+            [9,       '左後脚部'],
+            [10..11,  '胴部'],
+            [12,      '頭部'],
+          ]
+        ),
+        'SPT' => DiceTable::RangeTable.new(
+          '蜘蛛部位表',
+          '1D12',
+          [
+            [1,   '異形'],
+            [2,   '武器'],
+            [3,   '右第一脚部'],
+            [4,   '左第一脚部'],
+            [5,   '右第二脚部'],
+            [6,   '左第二脚部'],
+            [7,   '右第三脚部'],
+            [8,   '左第三脚部'],
+            [9,   '右第四脚部'],
+            [10,  '左第四脚部'],
+            [11,  '胴部'],
+            [12,  '頭部'],
+          ]
+        ),
       }.freeze
 
       register_prefix('K[AC]', 'CTR', TABLES.keys)

data/lib/bcdice/game_system/MamonoScramble.rb

@@ -0,0 +1,98 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class MamonoScramble < Base
+      # ゲームシステムの識別子
+      ID = 'MamonoScramble'
+
+      # ゲームシステム名
+      NAME = 'マモノスクランブル'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'まものすくらんふる'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~INFO_MESSAGE_TEXT
+        ・判定 xMS<=t
+        　[判定]を行う。成否と[マリョク]の上昇量を表示する。
+        　x: ダイス数
+        　t: 能力値（目標値）
+
+        ・アクシデント表 ACC
+      INFO_MESSAGE_TEXT
+
+      def initialize(command)
+        super(command)
+
+        @sides_implicit_d = 12
+        @round_type = RoundType::CEIL
+      end
+
+      def eval_game_system_specific_command(command)
+        roll_ability(command) || roll_tables(command, TABLES)
+      end
+
+      private
+
+      def roll_ability(command)
+        parser = Command::Parser.new("MS", round_type: @round_type)
+                                .has_prefix_number
+                                .disable_modifier
+                                .restrict_cmp_op_to(:<=)
+        parsed = parser.parse(command)
+        unless parsed
+          return nil
+        end
+
+        dice_list = @randomizer.roll_barabara(parsed.prefix_number, 12).sort
+        count_success = dice_list.count { |value| value <= parsed.target_number }
+        count_one = dice_list.count(1)
+        is_critical = count_one > 0
+        has_twelve = dice_list.include?(12)
+
+        maryoku =
+          if has_twelve && !is_critical
+            0
+          else
+            count_success + count_one
+          end
+
+        sequence = [
+          "(#{parsed})",
+          "[#{dice_list.join(',')}]",
+          count_success > 0 ? "成功, [マリョク]が#{maryoku}上がる" : "失敗"
+        ]
+
+        return Result.new.tap do |r|
+          r.text = sequence.join(" ＞ ")
+          r.condition = count_success > 0
+          r.critical = r.success? && is_critical
+        end
+      end
+
+      TABLES = {
+        "ACC" => DiceTable::Table.new(
+          "アクシデント表",
+          "1D12",
+          [
+            "思わぬ対立：[判定]で10〜12の出目を1個でも出した場合、【耐久値】を2点減らす。",
+            "都市の迷宮化：[判定]に【社会】を使用できない。",
+            "不穏な天気：特別な効果は発生しない。",
+            "突然の雷雨：エリアの[特性]に[雨]や[水たまり]などを足してもいい。",
+            "関係ない危機：[判定]に失敗したPCの【耐久値】を2点減らす。",
+            "からりと晴天：エリアの[特性]に[強い日光]や[日だまり]などを足してもいい。",
+            "謎のお祭り：[判定]で1〜3の出目を1個でも出した場合、【耐久値】を2点回復する。",
+            "すごい人ごみ：エリアの[特性]に[野次馬]や[観光客]などを足してもいい。",
+            "マリョク乱気流：[判定]に【異質】を使用できない。",
+            "魔術テロ事件：GMが1Dをロールする。出目が1〜3なら【身体】、出目が4〜6なら【異質】、出目が7〜9なら【社会】が[判定]で使えない。10〜12は何も起きない。",
+            "マリョク低気圧：[判定]に【身体】を使用できない。",
+            "平穏な時間：特別な効果は発生しない。",
+          ]
+        )
+      }.freeze
+
+      register_prefix('\d+MS', TABLES.keys)
+    end
+  end
+end

data/lib/bcdice/game_system/MonotoneMuseum.rb

@@ -59,7 +59,7 @@ module BCDice
       private
 
       def check_roll(command)
-        m = /^(\d+)D6([+\-\d]*)>=(\d+)(\[(\d+)?(,(\d+))?\])?$/i.match(command)
+        m = /^(\d+)D6([+\-\d]*)>=(\?|\d+)(\[(\d+)?(,(\d+))?\])?$/i.match(command)
         unless m
           return nil
         end
@@ -80,6 +80,8 @@ module BCDice
             Result.fumble(translate("MonotoneMuseum.automatic_failure"))
           elsif dice_value >= critical
             Result.critical(translate("MonotoneMuseum.automatic_success"))
+          elsif target == 0
+            Result.success(nil)
           elsif total >= target
             Result.success(translate("success"))
           else
@@ -91,7 +93,7 @@ module BCDice
           "#{dice_value}[#{dice_str}]#{Format.modifier(modify_number)}",
           total.to_s,
           result.text,
-        ]
+        ].compact
 
         result.text = sequence.join(" ＞ ")
 

data/lib/bcdice/game_system/NSSQ.rb

@@ -8,24 +8,26 @@ module BCDice
       SORT_KEY = "えすああるえすしやないせかいしゆのめいきゆうTRPG"
 
       HELP_MESSAGE = <<~MESSAGETEXT
-        ■ 判定 (xSQ±y)
-          xD6の判定。3つ以上振ったとき、出目の高い2つを表示します。クリティカル、ファンブルも計算します。
+        ■ 判定 (xSQ±y>=z)
+          xD6の判定。3つ以上振ったとき、出目の高い2つを表示します。絶対成功、絶対失敗も計算します。
+          2つのサイコロを使用して出目に1があった場合は、FPの獲得も表示します。3つ以上使用した場合は表示しません。
           ±y: yに修正値を入力。±の計算に対応。省略可能。
+          z: 目標値。省略可能。
 
         ■ ダメージロール (xDR(C)(+)y)
-          xD6のダメージロール。クリティカルの自動判定を行います。Cを付けるとクリティカルアップ状態で計算できます。+を付けるとクリティカル時のダイスが8個になります。
+          xD6のダメージロール。クリティカルヒットの自動判定を行います。Cを付けるとクリティカルアップ状態で計算できます。+を付けるとクリティカルヒット時のダイスが8個になります。
           x: xに振るダイス数を入力。
           y: yに耐性を入力。
           例) 5DR3 5DRC4 5DRC+4
 
         ■ 回復ロール (xHRy)
-          xD6の回復ロール。クリティカルが発生しません。
+          xD6の回復ロール。クリティカルヒットが発生しません。
           x: xに振るダイス数を入力。
           y: yに耐性を入力。省略した場合3。
           例) 2HR 10HR2
 
-        ■ 採取ロール (TC±z,SC±z,GC±z)
-          ちょっと(T)、そこそこ(S)、がっつり(G)採取採掘伐採を行う。
+        ■ 採集ロール (TC±z,SC±z,GC±z)
+          少しだけ(T)、そこそこ(S)、ガッツリ(G)採取採掘伐採を行います。
           z: zに追加でロールする回数を入力。省略可能。
           例) TC SC+1 GC-1
       MESSAGETEXT
@@ -40,27 +42,38 @@ module BCDice
 
       # 判定
       def roll_sq(command)
-        m = /(\d+)SQ([+\-\d]+)?/i.match(command)
+        m = /(\d+)SQ([+\-\d]+)?(([>=]+)(\d+))?/i.match(command)
         return nil unless m
 
         dice_count = m[1].to_i
         modifier = ArithmeticEvaluator.eval(m[2])
+        target = m[5].nil? ? nil : m[5].to_i
 
         dice_list = @randomizer.roll_barabara(dice_count, 6)
         largest_two = dice_list.sort.reverse.take(2)
         total = largest_two.sum + modifier
+        num_1 = dice_list.count(1)
 
         additional_result =
           if largest_two == [6, 6]
-            " クリティカル！"
+            Result.critical(" ＞ 絶対成功！")
           elsif largest_two == [1, 1]
-            " ファンブル！"
+            Result.fumble(" ＞ 絶対失敗！")
+          elsif target && total >= target
+            Result.success(" ＞ 成功")
+          elsif target && total < target
+            Result.failure(" ＞ 失敗")
+          else
+            Result.new
           end
 
+        # ダイス数が2個の場合は1の出目の数だけ【FP】を獲得できる
+        fp_result = dice_count == 2 && num_1 >= 1 ? " (【FP】#{num_1}獲得)" : ""
+
         sequence = [
           "(#{command})",
           "[#{dice_list.join(',')}]#{Format.modifier(modifier)}",
-          "#{total}[#{largest_two.join(',')}]#{additional_result}",
+          "#{total}[#{largest_two.join(',')}]#{additional_result.text}#{fp_result}",
         ]
 
         return sequence.join(" ＞ ")
@@ -83,7 +96,7 @@ module BCDice
         critical_target = critical_up ? 1 : 2
 
         if dice_list.count(6) - dice_list.count(1) >= critical_target
-          result += " クリティカル！\n"
+          result += " クリティカルヒット！\n"
           result += additional_damage_roll(increase_critical_dice, resist)
         end
 

data/lib/bcdice/game_system/RuneQuestRoleplayingInGlorantha.rb

@@ -0,0 +1,167 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class RuneQuestRoleplayingInGlorantha < Base
+      # ゲームシステムの識別子
+      ID = 'RuneQuestRoleplayingInGlorantha'
+
+      # ゲームシステム名
+      NAME = 'RuneQuest：Roleplaying in Glorantha'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'るうんくえすと4'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~MESSAGETEXT
+        ・判定コマンド クリティカル、スペシャル、ファンブルを含めた判定を行う。
+        RQG<=成功率
+
+        例1：RQG<=80 （技能値80で判定）
+        例2：RQG<=80+20 （技能値100で判定）
+
+        ・抵抗判定コマンド（能動-受動） クリティカル、スペシャル、ファンブルを含めた判定を行う。
+        RES(能動能力-受動能力)m増強値
+        増強値は省略可能。
+
+        例1：RES(9-11)    (能動能力9 vs 受動能力11で判定)
+        例2：RES(9-11)m20 (能動能力9 vs 受動能力11、+20%の増強が能動側に入る判定)
+        例3：RES(9)m50    (能動能力と受動能力の差が9で、+50%の増強が能動側に入る判定)
+
+        ・抵抗判定コマンド(能動側のみ) クリティカル、スペシャル、ファンブルは含めず判定を行う。
+        RSA(能動能力)m増強値
+        増強値は省略可能。
+
+        例1：RSA(9)       (能動能力9で判定)
+        例2：RSA(9)m20    (能動能力9で判定、+20%の増強が能動側に入る判定)
+
+      MESSAGETEXT
+
+      register_prefix('RQG', 'RES', 'RSA')
+
+      def eval_game_system_specific_command(command)
+        case command
+        when /RQG/i
+          return do_ability_roll(command)
+        when /RES/i
+          return do_resistance_roll(command)
+        when /RSA/i
+          return do_resistance_active_characteristic_roll(command)
+        end
+        return nil
+      end
+
+      private
+
+      # 技能などの一般判定
+      def do_ability_roll(command)
+        m = %r{\A(RQG)(<=([+-/*\d]+))?$}.match(command)
+        unless m
+          return nil
+        end
+
+        roll_value = @randomizer.roll_once(100)
+        unless m[3]
+          # RQGのみ指定された場合は1d100を振ったのと同じ挙動
+          return "(1D100) ＞ #{roll_value}"
+        end
+
+        ability_value = Arithmetic.eval(m[3], RoundType::ROUND)
+        result_prefix_str = "(1D100<=#{ability_value}) ＞"
+
+        if ability_value == 0
+          # 0%は判定なしで失敗
+          return Result.failure("#{result_prefix_str} 失敗")
+        end
+
+        result_str = "#{result_prefix_str} #{roll_value} ＞"
+
+        # 判定
+        get_roll_result(result_str, ability_value, roll_value)
+      end
+
+      # 抵抗判定
+      def do_resistance_roll(command)
+        m = %r{\A(RES)([+-/*\d]+)(M([+-/*\d]+))?$}.match(command)
+        unless m
+          return nil
+        end
+
+        unless m[2]
+          return nil
+        end
+
+        difference_value = Arithmetic.eval(m[2], RoundType::ROUND)
+        difference_value = -10 if difference_value < -10
+
+        resistance_velue = 50 + (difference_value * 5)
+        resistance_velue += Arithmetic.eval(m[4], RoundType::ROUND) if m[4]
+
+        roll_value = @randomizer.roll_once(100)
+        result_str = "(1D100<=#{resistance_velue}) ＞ #{roll_value} ＞"
+
+        # 判定
+        get_roll_result(result_str, resistance_velue, roll_value)
+      end
+
+      # 能動側のみの対抗判定
+      def do_resistance_active_characteristic_roll(command)
+        m = %r{\A(RSA)(\d+)(M([+-/*\d]+))?$}.match(command)
+        unless m
+          return nil
+        end
+
+        unless m[2]
+          return nil
+        end
+
+        active_ability_value = m[2].to_i
+        if active_ability_value == 0
+          return "0は指定できません。"
+        end
+
+        modifiy_value = m[4] ? Arithmetic.eval(m[4], RoundType::ROUND) : 0
+        roll_value = @randomizer.roll_once(100)
+        active_value = active_ability_value * 5 + modifiy_value
+        result_prefix_str = "(1D100<=#{active_value}) ＞ #{roll_value} ＞"
+
+        note_str = "クリティカル/スペシャル、ファンブルは未処理。必要なら確認すること。"
+
+        if roll_value >= 96
+          # 96-99は無条件で失敗
+          Result.failure("#{result_prefix_str} 失敗\n#{note_str}")
+        elsif roll_value <= 5 || roll_value <= modifiy_value
+          # 02-05あるいは修正値以下は無条件で成功
+          Result.success("#{result_prefix_str} 成功\n#{note_str}")
+        else
+          # 上記全てが当てはまらない時に突破可能な能力値を算出
+          "#{result_prefix_str} 相手側能力値#{active_ability_value + (50 + modifiy_value - roll_value) / 5}まで成功\n#{note_str}"
+        end
+      end
+
+      # 判定結果の取得
+      def get_roll_result(result_str, success_value, roll_value)
+        critical_value = (success_value.to_f / 20).round
+        special_value = (success_value.to_f / 5).round
+        funmble_value = ((100 - success_value.to_f) / 20).round
+
+        if (roll_value == 1) || (roll_value <= critical_value)
+          # クリティカル(01は必ずクリティカル)
+          Result.critical("#{result_str} クリティカル/スペシャル")
+        elsif (roll_value == 100) || (roll_value >= (100 - funmble_value + 1))
+          # ファンブル(00は必ずファンブル)
+          Result.fumble("#{result_str} ファンブル")
+        elsif roll_value <= special_value
+          # スペシャル
+          Result.success("#{result_str} スペシャル")
+        elsif (roll_value <= 95) && ((roll_value <= 5) || (roll_value <= success_value))
+          # 成功(02-05は必ず成功で、96-99は必ず失敗)
+          Result.success("#{result_str} 成功")
+        else
+          # 失敗
+          Result.failure("#{result_str} 失敗")
+        end
+      end
+    end
+  end
+end