bcdice 3.6.0 → 3.8.0

data/lib/bcdice/game_system/Kutulu.rb

@@ -0,0 +1,95 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class Kutulu < Base
+      # ゲームシステムの識別子
+      ID = 'Kutulu'
+
+      # ゲームシステム名
+      NAME = 'Kutulu'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'くとうるう'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~INFO_MESSAGETEXT
+        ■判定　nKU        n: ダイス数
+
+        例)3KU: ダイスを3個振って、その結果を表示(ギリギリでの成功も表示)
+
+        ■対抗判定　nKR        n: ダイス数
+
+        例)2KR: ダイスを2個振って、その結果を表示。対抗判定用の3桁の数字も出力。(大きい方が勝利)
+      INFO_MESSAGETEXT
+
+      register_prefix('\dK[UR]')
+
+      def initialize(command)
+        super(command)
+
+        @sort_barabara_dice = true # バラバラロール（Bコマンド）でソート有
+      end
+
+      def eval_game_system_specific_command(command)
+        resolute_action(command) || resolute_competition(command)
+      end
+
+      private
+
+      # アクティヴ能力の判定
+      # @param [String] command
+      # @return [Result]
+      def resolute_action(command)
+        m = /(\d)KU/.match(command)
+        return nil unless m
+
+        num_dices = m[1].to_i
+
+        dices = @randomizer.roll_barabara(num_dices, 6).sort
+        dice_text = dices.join(",")
+
+        output = "(#{num_dices}KU) ＞ #{dice_text}"
+
+        success_num = dices.count { |val| val >= 4 }
+        counts_4 = dices.count(4)
+        if success_num > 0
+          output += " ＞ 成功数#{success_num}"
+          if success_num == 1 && counts_4 == 1
+            output += " ＞ *ギリギリでの成功"
+          end
+          return Result.success(output)
+        else
+          output += " ＞ 失敗"
+          return Result.failure(output)
+        end
+      end
+
+      # 対抗判定用出力
+      # @param [String] command
+      # @return [Result]
+      def resolute_competition(command)
+        m = /(\d)KR/.match(command)
+        return nil unless m
+
+        num_dices = m[1].to_i
+
+        dices = @randomizer.roll_barabara(num_dices, 6).sort
+        dice_text = dices.join(",")
+
+        counts_6 = dices.count(6)
+        counts_5 = dices.count(5)
+        success_num = dices.count { |val| val >= 4 }
+        com_text = format("(%d%d%d)", success_num, counts_6, counts_5)
+
+        output = "(#{num_dices}KR) ＞ #{dice_text} ＞ #{com_text}"
+
+        if success_num > 0
+          return Result.success(output)
+        else
+          return Result.failure(output)
+        end
+      end
+    end
+  end
+end

data/lib/bcdice/game_system/LostRoyal.rb

@@ -64,7 +64,7 @@ module BCDice
       def check_lostroyal(checking_table)
         keys = []
 
-        (0...3).each do |_i|
+        3.times do |_i|
           key = @randomizer.roll_once(6)
           keys << key
         end

data/lib/bcdice/game_system/NobunagasBlackCastle.rb

@@ -0,0 +1,237 @@
+# frozen_string_literal: true
+
+require 'bcdice/dice_table/table'
+
+module BCDice
+  module GameSystem
+    class NobunagasBlackCastle < Base
+      # ゲームシステムの識別子
+      ID = 'NobunagasBlackCastle'
+
+      # ゲームシステム名
+      NAME = '信長の黒い城'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'のふなかのくろいしろ'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~INFO_MESSAGETEXT
+        ■判定　sDRt        s: 能力値 t:目標値
+
+        例)+3DR12: 能力値+3、DR12で1d20を振って、その結果を表示(クリティカル・ファンブルも表示)
+
+        ■イニシアティヴ　INS
+
+        例)INS: 1d6を振って、イニシアティヴの結果を表示(PC先行を成功として表示)
+
+        ■NPC能力値作成　NPCST
+
+        例)NPCST: 3d6を4回振って、各能力値とHPを表示
+
+
+        ■各種表
+
+        ・遭遇反応表(ERT)
+        ・武器表(SWT)/その他の奇妙な武器表(OSWT)
+        ・鎧表(ART)
+
+      INFO_MESSAGETEXT
+
+      def initialize(command)
+        super(command)
+
+        @sort_add_dice = true
+        @d66_sort_type = D66SortType::NO_SORT
+      end
+
+      def eval_game_system_specific_command(command)
+        resolute_action(command) || resolute_initiative(command) || roll_tables(command, TABLES) || make_npc_status(command)
+      end
+
+      private
+
+      def result_dr(total, dice_total, target)
+        if dice_total <= 1
+          Result.fumble("ファンブル")
+        elsif dice_total >= 20
+          Result.critical("クリティカル")
+        elsif total >= target
+          Result.success("成功")
+        else
+          Result.failure("失敗")
+        end
+      end
+
+      # DR判定
+      # @param [String] command
+      # @return [Result]
+      def resolute_action(command)
+        m = /^([+-]?\d*)DR(\d+)$/.match(command)
+        return nil unless m
+
+        num_status = m[1].to_i
+        num_target = m[2].to_i
+
+        total = @randomizer.roll_once(20)
+        total_status = total.to_s + with_symbol(num_status)
+        result = result_dr(total + num_status, total, num_target)
+
+        sequence = [
+          "(#{command})",
+          total_status,
+          total + num_status,
+          result.text,
+        ]
+
+        result.text = sequence.join(" ＞ ")
+        return result
+      end
+
+      def with_symbol(number)
+        if number == 0
+          return "+0"
+        elsif number > 0
+          return "+#{number}"
+        else
+          return number.to_s
+        end
+      end
+
+      # イニシアティヴ判定
+      # @param [String] command
+      # @return [Result]
+      def resolute_initiative(command)
+        unless command == "INS"
+          return nil
+        end
+
+        total = @randomizer.roll_once(6)
+        result =
+          if total >= 4
+            Result.success("PC先行")
+          else
+            Result.failure("敵先行")
+          end
+
+        result.text = "(#{command}) ＞ #{total} ＞ #{result.text}"
+        return result
+      end
+
+      # NPC能力値作成
+      # @param [String] command
+      # @return [String]
+      def make_npc_status(command)
+        unless command == "NPCST"
+          return nil
+        end
+
+        pre = @randomizer.roll_sum(3, 6)
+        agi = @randomizer.roll_sum(3, 6)
+        str = @randomizer.roll_sum(3, 6)
+        tgh = @randomizer.roll_sum(3, 6)
+        hpd = @randomizer.roll_once(8)
+        hp  = hpd + calc_status(tgh)
+        hp = 1 if hp < 1
+
+        text = [
+          "心#{with_symbol(calc_status(pre))}(#{pre})",
+          "技#{with_symbol(calc_status(agi))}(#{agi})",
+          "体#{with_symbol(calc_status(str))}(#{str})",
+          "耐久#{with_symbol(calc_status(tgh))}(#{tgh})",
+          "HP#{hp}(#{hpd})",
+        ].join(", ")
+
+        return "(#{command}) ＞ #{text}"
+      end
+
+      def calc_status(st)
+        if st <= 4
+          return -3
+        elsif st <= 6
+          return -2
+        elsif st <= 8
+          return -1
+        elsif st <= 12
+          return 0
+        elsif st <= 14
+          return 1
+        elsif st <= 16
+          return 2
+        elsif st <= 20
+          return 3
+        end
+      end
+
+      # 各種表
+
+      TABLES = {
+        'OSWT' => DiceTable::Table.new(
+          'その他の奇妙な武器表',
+          '1D10',
+          [
+            '六尺棒（D4）',
+            '手槍（D4）',
+            '弓矢（D6）',
+            '鉄扇（D4）',
+            '大鉞（D8）',
+            '吹き矢（D2）＋感染',
+            '鞭（D3）',
+            '熊手（D4）',
+            '石つぶて（D3）',
+            '丸太（D4）',
+          ]
+        ),
+        'SWT' => DiceTable::Table.new(
+          '武器表',
+          '1D12',
+          [
+            '尖らせた骨の杭（D3）',
+            '竹槍（D4）',
+            '百姓から奪った鍬（D4）',
+            '脇差し（D4）',
+            '手裏剣　D6本（D4）',
+            '刀（D6）',
+            '鎖鎌（D6）',
+            '太刀（D8）',
+            '種子島銃（2D6）　弾丸（心+5）発',
+            '大槍（D8）',
+            '爆裂弾（D4）　心+3発',
+            '斬馬刀（D10）',
+          ]
+        ),
+        'ART' => DiceTable::Table.new(
+          '鎧表',
+          '1D6',
+          [
+            '防具は、何もない',
+            '防具は、何もない',
+            '部分鎧（腹巻き）　-D2ダメージ',
+            'お貸し具足　-D3ダメージ',
+            '武者鎧　-D4ダメージ',
+            '大鎧　-D6ダメージ',
+          ]
+        ),
+        # 無理に高度なことをしなくても、表は展開して実装しても動く
+        'ERT' => DiceTable::Table.new(
+          '遭遇反応表',
+          '2D6',
+          [
+            'お前ら、殺す！',
+            'お前ら、殺す！',
+            '憎悪の視線で睨んでくる。すきを見せれば、攻撃してくる。',
+            '憎悪の視線で睨んでくる。すきを見せれば、攻撃してくる。',
+            '憎悪の視線で睨んでくる。すきを見せれば、攻撃してくる。',
+            '警戒はしているが、特に、戦闘は望んでいない。怒らせなければ、自分たちの目的に沿って動く。',
+            '警戒はしているが、特に、戦闘は望んでいない。怒らせなければ、自分たちの目的に沿って動く。',
+            '中立。何かを与えたり、取引の材料を提示したりできれば、交渉できそうだ。',
+            '中立。何かを与えたり、取引の材料を提示したりできれば、交渉できそうだ。',
+            '好意的に会話できそうだ。向こうも取引したがっている。',
+            '好意的に会話できそうだ。向こうも取引したがっている。',
+          ]
+        ),
+      }.freeze
+
+      register_prefix('[+-]?\d*DR[\d]+', 'INS', 'NPCST', TABLES.keys)
+    end
+  end
+end

data/lib/bcdice/game_system/OracleEngine.rb

@@ -46,7 +46,7 @@ MESSAGETEXT
         case command
         when /\d+CL.*/i
           clutch_roll(command)
-        when /\d+D6.*\$[+\-]?\d.*/
+        when /\d+D6.*\$[+-]?\d.*/
           damage_roll(command)
         when /\d+R6/
           r_roll(command)

data/lib/bcdice/game_system/Raisondetre.rb

@@ -52,7 +52,7 @@ module BCDice
 
           return checkRoll(diceCount, choiceCount, target)
 
-        elsif command =~ /(-)?(\d+)?DD([1-9])?([+\-]\d+)?$/i
+        elsif command =~ /(-)?(\d+)?DD([1-9])?([+-]\d+)?$/i
           diceCount = (Regexp.last_match(2) || 1).to_i
           diceCount *= -1 unless Regexp.last_match(1).nil?
           armor = (Regexp.last_match(3) || 0).to_i

data/lib/bcdice/game_system/RokumonSekai2.rb

@@ -31,7 +31,7 @@ module BCDice
       end
 
       def replace_text(string)
-        string = string.gsub(/(\d+)RS([+\-][+\-\d]+)<=(\d+)/i) { "3R6#{Regexp.last_match(2)}<=#{Regexp.last_match(3)}[#{Regexp.last_match(1)}]" }
+        string = string.gsub(/(\d+)RS([+-][+\-\d]+)<=(\d+)/i) { "3R6#{Regexp.last_match(2)}<=#{Regexp.last_match(3)}[#{Regexp.last_match(1)}]" }
         string = string.gsub(/(\d+)RS<=(\d+)/i) { "3R6<=#{Regexp.last_match(2)}[#{Regexp.last_match(1)}]" }
 
         return string

data/lib/bcdice/game_system/SajinsenkiAGuS.rb

@@ -0,0 +1,154 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class SajinsenkiAGuS < Base
+      # ゲームシステムの識別子
+      ID = 'SajinsenkiAGuS'
+
+      # ゲームシステム名
+      NAME = '砂塵戦機アーガス'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'さしんせんきああかす'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~INFO_MESSAGE_TEXT
+        ・一般判定Lv（チャンス出目0→判定0） nAG+x
+        　　　nは習得レベル、Lv0の場合nの省略可能。xは判定値修正（数式による修正可）、省略した場合はレベル修正0
+        　　　例）AG:習得レベル0の一般技能、1AG+1:習得レベル1・判定値修正+1の技能、AG+2-1：習得レベル0・判定値修正2-1の技能、(1-1)AG：習得レベル1・レベル修正-1の技能
+
+        ・適正距離での命中判定（チャンス出目0→判定0、HR算出）OM+y@z
+        　　　yは命中補正値（数式可）、zはクリティカル値。クリティカル値省略時は0
+        　　　HRの算出時には、HRが大きくなる場合に出目0を10に読み替えます。
+        　　　例）OM+18-6@2:命中補正値+18-6でクリティカル値2、適正距離の判定
+
+        ・非適正距離での命中判定（チャンス出目0→判定0、HR算出）NM+y@z
+        　　　yは命中補正値（数式可）、zはクリティカル値。クリティカル値省略時は0
+        　　　HRの算出時には、HRが大きくなる場合に出目0を10に読み替えます。
+        　　　例）NM+4-3:命中補正値+4-3で非適正距離の判定
+
+        ・クリティカル表 CR
+
+        ※通常の1D10などの10面ダイスにおいて出目10の読み替えはしません。コマンドのみです。
+
+      INFO_MESSAGE_TEXT
+      register_prefix('-?\d*AG', 'OM', 'NM', 'CR')
+
+      def eval_game_system_specific_command(command)
+        roll_ippan(command) || roll_hit_check(command) || roll_tables(command, TABLES)
+      end
+
+      private
+
+      def roll_ippan(command)
+        m = /^(-?\d+)?AG((?:[-+]\d+)*)$/.match(command)
+        return nil unless m
+
+        level = m[1].to_i
+        x = Arithmetic.eval(m[2], @round_type) || 0
+        target = level <= 0 ? 7 + x : 10 + level + x
+
+        dice_list = @randomizer.roll_barabara(2, 10).map { |d| d == 10 ? 0 : d }
+        total = dice_list.sum
+
+        return Result.new.tap do |result|
+          result.condition = total <= target
+
+          sequence = [
+            "(2D10<=#{target})",
+            "#{total}[#{dice_list.join(',')}]",
+            ("チャンス" if dice_list.include?(0)),
+            result.success? ? "成功" : "失敗"
+          ].compact
+
+          result.text = sequence.join(" ＞ ")
+        end
+      end
+
+      # 命中判定＆HR算出
+      def roll_hit_check(command)
+        parser = Command::Parser.new("OM", "NM", round_type: @round_type).enable_critical
+        parsed = parser.parse(command)
+        return nil unless parsed
+
+        if parsed.command == "OM"
+          return roll_om(parsed)
+        elsif parsed.command == "NM"
+          return roll_nm(parsed)
+        end
+      end
+
+      def roll_om(parsed)
+        target = parsed.modify_number
+        critical = parsed.critical || 0
+
+        dice_list = @randomizer.roll_barabara(2, 10).map { |v| v == 10 ? 0 : v }.sort.reverse
+
+        total = dice_list.sum()
+        criticals = dice_list.count { |v| v <= critical }
+        hr = calc_hr(target, dice_list)
+
+        return Result.new.tap do |r|
+          r.condition = total <= target
+          r.critical = criticals >= 1
+          r.text = [
+            "(2D10<=#{target})",
+            "#{total}[#{dice_list.join(',')}]",
+            ("チャンス" if dice_list.include?(0)),
+            r.success? ? "成功（HR=#{hr}、クリティカル#{criticals}）" : "失敗",
+          ].compact.join(" ＞ ")
+        end
+      end
+
+      def roll_nm(parsed)
+        target = parsed.modify_number
+        critical = parsed.critical || 0
+
+        dice_list = @randomizer.roll_barabara(3, 10).map { |v| v == 10 ? 0 : v }.sort.reverse
+
+        chosen_dice_list = dice_list.take(2)
+        total = chosen_dice_list.sum()
+        criticals = chosen_dice_list.count { |v| v <= critical }
+        hr = calc_hr(target, chosen_dice_list)
+
+        return Result.new.tap do |r|
+          r.condition = total <= target
+          r.critical = criticals >= 1
+          r.text = [
+            "(3D10<=#{target})",
+            "#{total}[#{dice_list[0]},#{dice_list[1]}&#{dice_list[2]}]",
+            ("チャンス" if chosen_dice_list.include?(0)),
+            r.success? ? "成功（HR=#{hr}、クリティカル#{criticals}）" : "失敗",
+          ].compact.join(" ＞ ")
+        end
+      end
+
+      def calc_hr(target, chosen_dice_list)
+        total = chosen_dice_list.sum()
+        a = (target - total).abs
+        b = (target - total - chosen_dice_list.count(0) * 10).abs
+        return [a, b].max
+      end
+
+      TABLES = {
+        "CR" => DiceTable::Table.new(
+          "クリティカル表",
+          "1D10",
+          [
+            "1：「小破」ダメージ+［5］。耐久値-［1］",
+            "2：「小破」ダメージ+［5］。耐久値-［1］",
+            "3：「小破」ダメージ+［5］。耐久値-［1］",
+            "4：「小破」ダメージ+［5］。耐久値-［1］",
+            "5：「兵装」損壊を受けるごとに［1D10］を振り、出目に応じた部位の兵装とオプションが《脱落》",
+            "6：「上体」攻撃系能力［白兵/ 火器/ 索敵］は各［- 損壊Lv］",
+            "7：「脚部」行動系・防御系能力［Iv 値（イニシア値）/ 最大MP/ 回避］は各［- 損壊Lv］",
+            "8：「搭乗者」搭乗者の〈最大HP〉および〈HP〉は［-（4 ×損壊Lv）］",
+            "9：「搭乗者」搭乗者の〈最大HP〉および〈HP〉は［-（4 ×損壊Lv）］",
+            "0：「小破」ダメージ+［5］。耐久値-［1］",
+          ]
+        )
+      }.freeze
+    end
+  end
+end

data/lib/bcdice/game_system/Sengensyou.rb

@@ -0,0 +1,59 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class Sengensyou < Base
+      # ゲームシステムの識別子
+      ID = 'Sengensyou'
+
+      # ゲームシステム名
+      NAME = '千幻抄'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'せんけんしよう'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~INFO_MESSAGE_TEXT
+        ・SGS　命中判定・回避判定
+      INFO_MESSAGE_TEXT
+
+      register_prefix('SGS')
+
+      def eval_game_system_specific_command(command)
+        # 命中判定・回避判定
+        parser = Command::Parser.new('SGS', round_type: @round_type).restrict_cmp_op_to(nil)
+        command = parser.parse(command)
+
+        unless command
+          return nil
+        end
+
+        dice_list = @randomizer.roll_barabara(3, 6)
+        dice_total = dice_list.sum()
+        is_critical = dice_total >= 16
+        is_fumble = dice_total <= 5
+        additional_text =
+          if is_critical
+            "クリティカル"
+          elsif is_fumble
+            "ファンブル"
+          end
+        modify_text = "#{dice_total}#{Format.modifier(command.modify_number)}" if command.modify_number != 0
+        sequence = [
+          "(3D6#{Format.modifier(command.modify_number)})",
+          "#{dice_total}[#{dice_list.join(',')}]",
+          modify_text,
+          (dice_total + command.modify_number).to_s,
+          additional_text,
+        ].compact
+
+        result = Result.new.tap do |r|
+          r.text = sequence.join(" ＞ ")
+          r.critical = is_critical
+          r.fumble = is_fumble
+        end
+        return result
+      end
+    end
+  end
+end

data/lib/bcdice/game_system/ShinkuuGakuen.rb

@@ -39,7 +39,7 @@ module BCDice
       )
 
       def eval_game_system_specific_command(command)
-        m = /^([A-Z]+)([+\-]?\d+)?(?:>=(\d+))?$/i.match(command)
+        m = /^([A-Z]+)([+-]?\d+)?(?:>=(\d+))?$/i.match(command)
         unless m
           return nil
         end

data/lib/bcdice/game_system/ShinobiGami.rb

@@ -41,6 +41,7 @@ module BCDice
         　　／夏の終わりシーン表　NTST／培養プラントシーン表　　PLST
         　　・忍秘伝　　中忍試験シーン表　HC/滅びの塔シーン表　HT/影の街でシーン表　HK
         　　/夜行列車シーン表　HY/病院シーン表　HO/龍動シーン表　HR/密室シーン表　HM/催眠シーン表　HS
+        　・ファンブル表（旧文庫版）　OFT
         ・D66ダイスあり
       INFO_MESSAGE_TEXT
 
@@ -584,6 +585,18 @@ module BCDice
         'FT' => DiceTable::Table.new(
           'ファンブル表',
           '1D6',
+          [
+            '何か調子がおかしい。そのサイクルの間、すべての行為判定にマイナス１の修正がつく。',
+            'しまった！　好きな忍具を１つ失ってしまう。',
+            '情報が漏れる！　あなた以外のキャラクターは、あなたの持っている【秘密】か【居所】の中から、好きなものをそれぞれ一つ知ることができる。',
+            '油断した！　術の制御に失敗し、好きな【生命力】を１点失う。',
+            '敵の陰謀か？　罠にかかり、ランダムに選んだ変調一つを受ける。変調は、変調表で決定すること。',
+            'ふう。危ないところだった。特に何も起こらない。',
+          ]
+        ),
+        'OFT' => DiceTable::Table.new(
+          'ファンブル表（旧文庫版）',
+          '1D6',
           [
             '何か調子がおかしい。そのサイクルの間、すべての行為判定にマイナス１の修正がつく。',
             'しまった！　好きな忍具を１つ失ってしまう。',
@@ -634,7 +647,7 @@ module BCDice
           '1D6',
           [
             '故障:すべての忍具が使用不能になる。この効果は累積しない。各サイクルの終了時に、《絡繰術》で行為判定を行い、成功するとこの変調は無効化される。',
-            'マヒ:修得している特技の中からランダムに一つを選び、その特技が使用不能になる。この効果は、修得している特技の数だけ累積する。各サイクルの終了時に、《身体操術l》で行為判定を行い、成功するとこの変調はすべて無効化される。',
+            'マヒ:修得している特技の中からランダムに一つを選び、その特技が使用不能になる。この効果は、修得している特技の数だけ累積する。各サイクルの終了時に、《身体操術》で行為判定を行い、成功するとこの変調はすべて無効化される。',
             '重傷:命中判定、情報判定、感情判定を行うたびに、接近戦ダメージを１点受ける。この効果は累積しない。各サイクルの終了時に、《生存術》で行為判定を行い、成功するとこの変調は無効化される。',
             '行方不明:メインフェイズ中、自分以外がシーンプレイヤーのシーンに登場することができなくなる。この効果は累積しない。各サイクルの終了時に、《経済力》で行為判定を行い、成功するとこの変調は無効化される。',
             '忘却:修得している【感情】の中からランダムに一つを選び、その【感情】を持っていないものとして扱う。この効果は、修得している【感情】の数だけ累積する。各サイクルの終了時に、《記憶術》で行為判定を行い、成功するとこの変調はすべて無効化される。',