bcdice 3.4.0 → 3.5.0

data/lib/bcdice/game_system/CastleInGray.rb

@@ -0,0 +1,133 @@
+module BCDice
+  module GameSystem
+    class CastleInGray < Base
+      # ゲームシステムの識別子
+      ID = "CastleInGray".freeze
+
+      # ゲームシステム名
+      NAME = "灰色城綺譚".freeze
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = "はいいろしようきたん".freeze
+
+      HELP_MESSAGE = <<~TEXT.freeze
+        ■ 色占い (BnWm)
+        n: 黒
+        m: 白
+        n, m は1～12の異なる整数
+
+        例) B12W7
+        例) B5W12
+
+        ■ 悪意の渦による占い (MALn)
+        n: 悪意の渦
+        n は1～12の整数
+
+        ■ その他
+        ・感情表 ET
+        ・暗示表(黒) BIT
+        ・暗示表(白) WIT
+      TEXT
+
+      TABLES = {
+        "ET" => DiceTable::Table.new(
+          "感情表",
+          "1D12",
+          [
+            "友情(白)／敵視(黒)",
+            "恋慕(白)／嫌悪(黒)",
+            "信頼(白)／不信(黒)",
+            "同情(白)／憐憫(黒)",
+            "憧憬(白)／劣等感(黒)",
+            "尊敬(白)／蔑視(黒)",
+            "忠誠(白)／執着(黒)",
+            "有用(白)／邪魔(黒)",
+            "許容(白)／罪悪感(黒)",
+            "羨望(白)／嫉妬(黒)",
+            "共感(白)／拒絶(黒)",
+            "愛情(白)／狂信(黒)"
+          ]
+        ),
+        "BIT" => DiceTable::Table.new(
+          "暗示表(黒)",
+          "1D12",
+          [
+            "終わりなき夜に生まれつく者もあり",
+            "悪意もて真実を語らば",
+            "笑えども笑みはなし",
+            "影より抜け出ることあたわじ",
+            "心の赴くままに手をとれ",
+            "時ならぬ嵐の過ぎ去るを待つ",
+            "赦されぬと知るがゆえに",
+            "見張りは持ち場を離れる",
+            "誰もが盲いたる彷徨い人なり",
+            "落ちる日を眺めるがごとく",
+            "冷たく雨ぞ降りしきる",
+            "今日は笑む花も明日には枯れゆく"
+          ]
+        ),
+        "WIT" => DiceTable::Table.new(
+          "暗示表(白)",
+          "1D12",
+          [
+            "無垢なる者のみが真実を得る",
+            "げに慈悲深きは沈黙なり",
+            "懐かしき日々は去りぬ",
+            "束の間に光さす",
+            "迷える者に手を差し伸べよ",
+            "嵐の前には静けさがある",
+            "どうか責めないで",
+            "灯した明かりを絶やさぬように",
+            "目を開けて見よ",
+            "淑やかに訪れる",
+            "今こそ泣け、さもなくば二度と泣くな",
+            "時が許す間に薔薇を摘め"
+          ]
+        ),
+      }.freeze
+
+      register_prefix('B', 'MAL', TABLES.keys)
+
+      def eval_game_system_specific_command(command)
+        return roll_color(command) || roll_mal(command) || roll_tables(command, TABLES)
+      end
+
+      def roll_color(command)
+        m = /^B(\d{1,2})W(\d{1,2})$/.match(command)
+        return nil unless m
+
+        black = m[1].to_i
+        white = m[2].to_i
+        return nil unless black.between?(1, 12) && white.between?(1, 12)
+
+        value = @randomizer.roll_once(12)
+
+        if black == white
+          return color_text(black, white, value, '白と黒は重ねられません')
+        end
+
+        if white > black
+          return color_text(black, white, value, black <= value && value < white ? '黒' : '白')
+        else
+          return color_text(black, white, value, white <= value && value < black ? '白' : '黒')
+        end
+      end
+
+      def color_text(black, white, value, result)
+        return "色占い(黒#{black}白#{white}) ＞ [#{value}] ＞ #{result}"
+      end
+
+      def roll_mal(command)
+        m = /^MAL(\d{1,2})$/i.match(command)
+        return nil unless m
+
+        mal = m[1].to_i
+        return nil unless mal.between?(1, 12)
+
+        value = @randomizer.roll_once(12)
+        result = value <= mal ? '黒' : '白'
+        return "悪意の渦(#{mal}) ＞ [#{value}] ＞ #{result}"
+      end
+    end
+  end
+end

data/lib/bcdice/game_system/Cthulhu.rb

@@ -193,12 +193,12 @@ module BCDice
       end
 
       def getRegistResult(command)
-        m = /^RES(B)?([-\d]+)$/i.match(command)
+        m = /^RESB?(-?\d+)$/i.match(command)
         unless m
           return nil
         end
 
-        value = m[2].to_i
+        value = m[1].to_i
         target = value * 5 + 50
 
         if target < 5

data/lib/bcdice/game_system/Cthulhu7th.rb

@@ -64,17 +64,17 @@ module BCDice
           combine_roll(command)
         when /^FAR/i
           getFullAutoResult(command)
-        when /^BMR/i # 狂気の発作（リアルタイム）
+        when "BMR" # 狂気の発作（リアルタイム）
           roll_bmr_table()
-        when /^BMS/i # 狂気の発作（サマリー）
+        when "BMS" # 狂気の発作（サマリー）
           roll_bms_table()
-        when /^FCL/i # キャスティング・ロールのプッシュに失敗した場合（小）
+        when "FCL" # キャスティング・ロールのプッシュに失敗した場合（小）
           roll_1d8_table("キャスティング・ロール失敗(小)表", FAILED_CASTING_L_TABLE)
-        when /^FCM/i # キャスティング・ロールのプッシュに失敗した場合（大）
+        when "FCM" # キャスティング・ロールのプッシュに失敗した場合（大）
           roll_1d8_table("キャスティング・ロール失敗(大)表", FAILED_CASTING_M_TABLE)
-        when /^PH/i # 恐怖症表
+        when "PH" # 恐怖症表
           roll_1d100_table("恐怖症表", PHOBIAS_TABLE)
-        when /^MA/i # マニア表
+        when "MA" # マニア表
           roll_1d100_table("マニア表", MANIAS_TABLE)
         end
       end

data/lib/bcdice/game_system/DoubleCross.rb

@@ -30,6 +30,11 @@ module BCDice
         ・D66ダイスあり
       INFO_MESSAGE_TEXT
 
+      def initialize(command)
+        super(command)
+        @sides_implicit_d = 10
+      end
+
       register_prefix('\d+DX', 'ET')
 
       # 成功判定コマンドのノード

data/lib/bcdice/game_system/Emoklore.rb

@@ -67,7 +67,7 @@ module BCDice
         success_value = 2 * critical + success - fumble
         result = compare_result(success_value)
 
-        result.text = "#{values} ＞ #{success_value} ＞ #{result.text}"
+        result.text = "#{values} ＞ #{success_value} ＞ 成功数#{success_value} #{result.text}"
         return result
       end
 

data/lib/bcdice/game_system/FateCoreSystem.rb

@@ -0,0 +1,117 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class FateCoreSystem < Base
+      # ゲームシステムの識別子
+      ID = 'FateCoreSystem'
+
+      # ゲームシステム名
+      NAME = 'Fate Core System'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'ふえいとこあしすてむ'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~MESSAGETEXT
+        ■ ファッジダイスによる判定 (xDF+y>=t)
+          ファッジダイスをx個ダイスロールし、結果を判定します。
+          x: ダイス数
+          y: 修正値（省略可）
+          t: 目標値値（省略可）
+          例）4DF, 4DF>=3, 4DF+1>=3
+      MESSAGETEXT
+
+      register_prefix('\d+DF')
+
+      def eval_game_system_specific_command(command)
+        roll_df(command)
+      end
+
+      private
+
+      def roll_df(command)
+        parser = Command::Parser.new("DF", round_type: @round_type)
+                                .enable_prefix_number()
+                                .restrict_cmp_op_to(:>=, nil)
+
+        parsed = parser.parse(command)
+        unless parsed
+          return nil
+        end
+
+        dice_list = roll_fate_dice(parsed.prefix_number)
+        total = dice_list.sum() + parsed.modify_number
+
+        fate_dice_list = dice_list.map do |i|
+          if i.zero?
+            "[ ]"
+          elsif i.positive?
+            "[+]"
+          else
+            "[-]"
+          end
+        end
+
+        result = outcome(total, parsed.target_number)
+        sequence = [
+          "(#{parsed})",
+          "#{fate_dice_list.join()}#{Format.modifier(parsed.modify_number)}",
+          result_ladder(total),
+          result.text,
+        ]
+
+        result.text = sequence.compact.join(" ＞ ")
+        return result
+      end
+
+      def roll_fate_dice(times)
+        @randomizer.roll_barabara(times, 3).map { |i| i - 2 }
+      end
+
+      def result_ladder(total)
+        ladder =
+          case total.clamp(-2, 8)
+          when 8
+            "Legendary"
+          when 7
+            "Epic"
+          when 6
+            "Fantastic"
+          when 5
+            "Superb"
+          when 4
+            "Great"
+          when 3
+            "Good"
+          when 2
+            "Fair"
+          when 1
+            "Average"
+          when 0
+            "Mediocre"
+          when -1
+            "Poor"
+          else
+            "Terrible"
+          end
+
+        return "#{ladder}(#{format('%+d', total)})"
+      end
+
+      def outcome(total, target)
+        if target.nil?
+          Result.new
+        elsif total == target
+          Result.success("Tie")
+        elsif total >= target + 3
+          Result.critical("Succeed with Style")
+        elsif total >= target
+          Result.success("Succeed")
+        else
+          Result.failure("Fail")
+        end
+      end
+    end
+  end
+end

data/lib/bcdice/game_system/Karukami.rb

@@ -0,0 +1,84 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class Karukami < Base
+      # ゲームシステムの識別子
+      ID = 'Karukami'
+
+      # ゲームシステム名
+      NAME = 'カルカミ'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'かるかみ'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~HELP_MESSAGE
+        ■ 行為判定、ダメージ算出 (xUB+y@c>=t)
+          6面ダイスをx個ダイスロールし、クリティカル値以上の出目が出たら振り足して合計値を算出します。
+          x: ダイス数
+          y: 修正値（省略可）
+          c: クリティカル値（省略可）
+          t: 目標値値（省略可）
+          例）2UB, 2UB>=7, 3UB+1@5, 3UB+1@5<10
+      HELP_MESSAGE
+
+      register_prefix('\d+UB')
+
+      def eval_game_system_specific_command(command)
+        roll_ub(command)
+      end
+
+      def roll_ub(command)
+        parser = Command::Parser.new("UB", round_type: @round_type)
+                                .has_prefix_number
+                                .enable_critical
+        parsed = parser.parse(command)
+        unless parsed
+          return nil
+        end
+
+        critical = parsed.critical || 6
+        if critical <= 1
+          return "(#{parsed}) ＞ クリティカル値は2以上としてください"
+        end
+
+        list_list = []
+        criticals = 0
+        stack = parsed.prefix_number
+        while stack > 0
+          dice_list = @randomizer.roll_barabara(stack, 6)
+          list_list.push(dice_list)
+          stack = dice_list.count { |x| x >= critical }
+          criticals += stack
+        end
+
+        total = list_list.flatten.sum() + parsed.modify_number
+
+        result =
+          if list_list.first.all?(1)
+            total = 0
+            Result.fumble("ファンブル")
+          elsif parsed.cmp_op.nil?
+            Result.new()
+          elsif total.send(parsed.cmp_op, parsed.target_number)
+            Result.success("成功")
+          else
+            Result.failure("失敗")
+          end
+        result.critical = criticals > 0
+
+        sequence = [
+          "(#{parsed})",
+          *list_list.map { |list| "[#{list.join(',')}]" },
+          total,
+          ("#{criticals}クリティカル" if result.critical?),
+          result.text,
+        ].compact
+
+        result.text = sequence.join(" ＞ ")
+        return result
+      end
+    end
+  end
+end

data/lib/bcdice/game_system/KurayamiCrying.rb

@@ -47,7 +47,7 @@ module BCDice
             "さっきからずっと、不気味な視線を感じる……どうやら、良くない存在に目をつけられてしまったようだ。「怪異」があなたに一方的な「ツナガリ」を獲得する。すでに「怪異」から「ツナガリ」を獲得されている場合、ダイスを振り直し、再度「アクシデント表」に当てはめる。",
             "ぶつんと頭の中で音がする。あれっ？誰かのことを考えていたような……なんだか記憶が霞んで、思い出せない。あなたが獲得している「ツナガリ」をランダムに1つ失う（「継続的なツナガリ」である場合、セッション終了後に再度獲得する）。「ツナガリ」が1つもない場合、ダイスを振り直し、再度「アクシデント表」に当てはめる。",
             "ぞわりと背中に懇寒が走る。自分を取り巻く「流れ」──運命に似た何かが歪んでしまったような、おぞましい予感が胸を走る。「確保」しているダイスの目が「10」になる。ダイスを「確保」していない場合、新たに「10」を「確保」する。すでに「10」の目を「確保」している場合、ダイスを振り直し、再度「アクシデント表」に当てはめる。",
-            "違う……違う、違う。これは自分のせいじゃない。いや、きっと何かの間違いだ。そう、あいつのせいに決まってる！進行役があなた以外の主人公をランダムに1人選ぷ（誰を選んだか参加者に教えてはならない） 。選ばれた主人公が次に判定を行った際、進行役は、最も低い数字を示しているダイスの目を「10」に変更する。",
+            "違う……違う、違う。これは自分のせいじゃない。いや、きっと何かの間違いだ。そう、あいつのせいに決まってる！進行役があなた以外の主人公をランダムに1人選ぶ（誰を選んだか参加者に教えてはならない） 。選ばれた主人公が次に判定を行った際、進行役は、最も低い数字を示しているダイスの目を「10」に変更する。",
             "あぁ……見つからない。アレがないとダメなのに。一体どうしたら──！「アイテム」をランダムに1つ失う（「継続品」である場合、センョン終了後に再度獲得する）。「アイテム」を1つも所持していない場合、「アイテム」を所持する主人公をランダムに1人選び、2点のダメージを与え、「アイテム」を1つ奪い取る。主人公が誰も「アイテム」を所持していない場合、「理性」を2点失う。",
             "まるで自分を支える何かが失われたように、あなたはその場に立ち尽くす。諦めと絶望が心を支配する。ああ、そうか。これが、「心が折れる」ということか……。あなたは「理性」を4点失う。"
           ]

data/lib/bcdice/game_system/MonotoneMuseum_Korean.rb

@@ -23,10 +23,10 @@ module BCDice
         　　자동성공, 자동실패, 성공, 실패를 자동표기합니다.
         ・각종표
         　・감정표　ET／감정표 2.0　ET2
-        　・징조표　OT／兆候表ver2.0　OT2／兆候表ver3.0　OT3
-        　・일그러짐표　DT／일그러짐표ver2.0　DT2／歪み表(野外)　DTO／歪み表(海)　DTS／歪み表(館・城)　DTM
-        　・세계왜곡표　　WDT／世界歪曲表2.0　WDT2
-        　・永劫消失表　EDT
+        　・징조표　OT／징조표ver2.0　OT2／징조표ver3.0　OT3
+        　・일그러짐표　DT／일그러짐표ver2.0　DT2／일그러짐표(야외)　DTO／일그러짐표(바다)　DTS／일그러짐표(저택・성)　DTM
+        　・세계왜곡표　　WDT／세계왜곡표2.0　WDT2
+        　・영구소실표　EDT
         ・D66다이스 있음
       INFO_MESSAGE_TEXT