bcdice 3.13.0 → 3.15.0

data/lib/bcdice/game_system/BlackJacket_Korean.rb

@@ -0,0 +1,244 @@
+# frozen_string_literal: true
+
+require 'bcdice/dice_table/range_table'
+
+module BCDice
+  module GameSystem
+    class BlackJacket_Korean < BlackJacket
+      # ゲームシステムの識別子
+      ID = 'BlackJacket:Korean'
+
+      # ゲームシステム名
+      NAME = '블랙재킷RPG'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = '国際化:Korean:블랙재킷RPG'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~INFO_MESSAGE_TEXT
+        ・행위 판정（BJx）
+        　x：성공률
+        　예）BJ80
+        　크리티컬,펌블 여부는 자동으로 판정합니다.
+        　「BJ50+20-30」처럼 값을 가감하여 기재할 수 있습니다.
+        　성공률의 상한은 100％、하한은 ０％ 입니다.
+        ・데스 차트 (DCxY)
+        　x：차트 종류. 육체：DCL, 정신：DCS, 환경：DCC
+        　Y=마이너스 값
+        　예）DCL5：라이프 마이너스 값 5 + 1D10 판정
+        　　　DCS3：새니티 마이너스 값 3 + 1D10 판정
+        　　　DCC0：크레딧 마이너스 값 0 + 1D10 판정
+        ・챌린지・패널티 차트（CPC）
+        ・사이드 트랙 차트（STC）
+      INFO_MESSAGE_TEXT
+
+      def eval_game_system_specific_command(command)
+        resolute_action(command) || roll_death_chart(command) || roll_tables(command, TABLES)
+      end
+
+      private
+
+      def resolute_action(command)
+        m = /^BJ(\d+([+-]\d+)*)$/.match(command)
+        unless m
+          return nil
+        end
+
+        success_rate = ArithmeticEvaluator.eval(m[1])
+
+        roll_result, dice10, dice01 = roll_d100
+        roll_result_text = format('%02d', roll_result)
+
+        result = action_result(roll_result, dice10, dice01, success_rate)
+
+        sequence = [
+          "행위판정(성공률:#{success_rate}％)",
+          "1D100[#{dice10},#{dice01}]=#{roll_result_text}",
+          roll_result_text.to_s,
+          result.text
+        ]
+
+        result.text = sequence.join(" ＞ ")
+        result
+      end
+
+      SUCCESS_STR = "성공"
+      FAILURE_STR = "실패"
+      CRITICAL_STR = (SUCCESS_STR + " ＞ 크리티컬! 파워의 대가(코스트) 절반으로 감소").freeze
+      FUMBLE_STR = (FAILURE_STR + " ＞ 펌블! 파워의 대가(코스트) 2배 & 재굴림 불가").freeze
+      MISERY_STR = (FAILURE_STR + " ＞ 미저리! 파워의 대가(코스트) 2배 & 재굴림 불가").freeze
+
+      def action_result(total, tens, ones, success_rate)
+        if total == 100
+          Result.fumble(MISERY_STR)
+        elsif success_rate <= 0
+          Result.fumble(FUMBLE_STR)
+        elsif total <= success_rate - 100
+          Result.critical(CRITICAL_STR)
+        elsif tens == ones
+          if total <= success_rate
+            Result.critical(CRITICAL_STR)
+          else
+            Result.fumble(FUMBLE_STR)
+          end
+        elsif total <= success_rate
+          Result.success(SUCCESS_STR)
+        else
+          Result.failure(FAILURE_STR)
+        end
+      end
+
+      def roll_d100
+        dice10 = @randomizer.roll_once(10)
+        dice10 = 0 if dice10 == 10
+        dice01 = @randomizer.roll_once(10)
+        dice01 = 0 if dice01 == 10
+
+        roll_result = dice10 * 10 + dice01
+        roll_result = 100 if roll_result == 0
+
+        return roll_result, dice10, dice01
+      end
+
+      class DeathChart
+        def initialize(name, chart)
+          @name = name
+          @chart = chart.freeze
+
+          if @chart.size != 11
+            raise ArgumentError, "unexpected chart size #{name.inspect} (given #{@chart.size}, expected 11)"
+          end
+        end
+
+        # @param randomizer [Randomizer]
+        # @param minus_score [Integer]
+        # @return [String]
+        def roll(randomizer, minus_score)
+          dice = randomizer.roll_once(10)
+          key_number = dice + minus_score
+
+          key_text, chosen = at(key_number)
+
+          return "데스 차트（#{@name}）[마이너스 값:#{minus_score} + 1D10(->#{dice}) = #{key_number}] ＞ #{key_text} ： #{chosen}"
+        end
+
+        private
+
+        # key_numberの10から20がindexの0から10に対応する
+        def at(key_number)
+          if key_number < 10
+            ["10이하", @chart.first]
+          elsif key_number > 20
+            ["20이상", @chart.last]
+          else
+            [key_number.to_s, @chart[key_number - 10]]
+          end
+        end
+      end
+
+      def roll_death_chart(command)
+        m = /^DC([LSC])(\d+)$/i.match(command)
+        unless m
+          return m
+        end
+
+        chart = DEATH_CHARTS[m[1]]
+        minus_score = m[2].to_i
+
+        return chart.roll(@randomizer, minus_score)
+      end
+
+      DEATH_CHARTS = {
+        'L' => DeathChart.new(
+          '육체',
+          [
+            "효과 없음. 당신은 기적적으로 목숨을 건졌다. 싸움은 계속된다.",
+            "격한 통증을 느낀다. 이후 이벤트가 끝날 때까지 모든 판정의 성공률에 -10%.",
+            "더이상 몸이 움직이지 않는다…… 당신은 [경직 2]를 받는다.",
+            "혼신의 일격!! 당신은 〈생존〉 판정을 한다. 실패할 경우 [사망]한다.",
+            "갑자기 눈앞이 캄캄해진다. 당신은 [기절 2]를 받는다.",
+            "이후, 이벤트 종료까지 모든 판정의 성공률 -20%.",
+            "기록적인 일격!! 당신은 〈생존〉 -20% 으로 판정한다. 실패할 경우 [사망]한다.",
+            "사느냐 죽느냐. 당신은 [빈사 2]를 받는다.",
+            "역사에 한 획을 그을 일격!! 당신은 <생존> -30% 으로 판정한다. 실패할 경우 [사망]한다.",
+            "이후, 이벤트 종료 시까지 모든 판정의 성공률 -30%.",
+            "신화적 일격!! 공중에서 세 바퀴 정도 회전한 후 땅바닥에 내동댕이쳐진다. 보기에도 끔찍한 모습. 육체는 원형을 유지하지 못했다. 당신은 [사망]한다.",
+          ]
+        ),
+        'S' => DeathChart.new(
+          '정신',
+          [
+            "효과 없음. 당신은 이를 악물고 스트레스를 견뎌냈다.",
+            "이후, 이벤트 종료 시까지 모든 판정의 성공률 -10%.",
+            "말할 수 없는 공포가 당신을 엄습한다. 당신은 [공포 2]를 받는다.",
+            "상처를 많이 받았다. 당신은 〈의지〉 판정을 한다. 실패할 경우 [절망] 상태가 되어서 NPC가 된다.",
+            "의식을 잃었다. 당신은 [기절 2]를 받는다.",
+            "이후, 이벤트 종료 시까지 모든 판정의 성공률 -20%.",
+            "신뢰했던 자에게 속은 아픔. 당신은 〈의지〉 -20% 으로 판정한다. 실패할 경우, [절망] 상태가 되어서 NPC가 된다.",
+            "동료에게 배신 당한 것일지도 모른다. 당신은 [혼란 2]를 받는다.",
+            "너무나 참혹한 현실. 당신은 〈의지〉 -30% 으로 판정한다. 실패할 경우 [절망] 상태가 되어서 NPC가 된다.",
+            "이후, 이벤트 종료 시까지 모든 판정의 성공률 -30%.",
+            "천지개벽의 이치 그 이상. 그것은 인류의 인식한계를 뛰어넘는 무언가였다. 당신은 [절망] 상태가 된 후 NPC가 된다.",
+          ]
+        ),
+        'C' => DeathChart.new(
+          '환경',
+          [
+            "효과 없음. 당신은 뒤숭숭한 소문을 무시했다.",
+            "이후, 이벤트 종료 시까지 모든 판정의 성공률 -10%.",
+            "위험한 상태! 이후, 라운드 종료 시까지 당신은 카르마를 사용할 수 없다.",
+            "나쁜 소문이 돈다. 당신은 〈교섭〉 판정을 한다. 실패할 경우 당신은 동료들의 신뢰를 잃고 [무연고] 상태가 된 후 NPC가 된다.",
+            "이후, 시나리오 종료 시까지 대가(코스트)에 크레딧을 소비하는 파워를 사용할 수 없다.",
+            "당신의 악평이 세상에 널리 알려진다. 협력자로부터의 지원이 중단된다. 이후 시나리오 종료 시까지 모든 판정의 성공률 -20%.",
+            "배신!! 당신은 〈경제〉 -20% 으로 판정한다. 실패할 경우 당신은 주위로부터 신용을 잃고, [무연고] 상태가 되어 NPC가 된다.",
+            "이후, 시나리오 종료 시까지 【환경】 계열의 기능 레벨이 모두 0이 된다.",
+            "날조 보도? 기억나지 않는 배신 행위가 특종으로 보도된다. 당신은 〈심리〉 -30% 으로 판정한다. 실패할 경우 당신은 인간으로서의 존엄성을 잃고, [무연고]가 된다.",
+            "이후, 이벤트 종료 시까지 모든 판정 성공률 -30%.",
+            "당신의 이름은 사상 최악의 오점으로 영원히 역사에 새겨진다. 이제 당신을 믿는 동료는 없고 당신을 돕는 사회도 없다. 당신은 [무연고] 상태가 된 후 NPC가 된다.",
+          ]
+        )
+      }.freeze
+
+      TABLES = {
+        "CPC" => DiceTable::Table.new(
+          "챌린지・패널티 차트",
+          "1D10",
+          [
+            "사망\n도와야 할 NPC (히로인 등)가 사망한다.",
+            "검은 별\n적이 목적을 성취하고, 사건은 PC의 패배로 끝난다. 그대로 여운 페이즈로 넘어갈 것.",
+            "활성\n적 보스의 라이프를 2배로 한 다음 결전 페이즈를 개시한다.",
+            "공세\n적 보스의 대미지에 +2D6의 수정을 준 후 결전 페이즈를 개시한다.",
+            "대거\n적의 수(보스 제외)를 2배로 한 후 결전 페이즈를 개시한다.",
+            "암흑\n모든 에리어(구역)을 [어둠]으로 만든 다음 결전 페이즈를 개시한다.",
+            "맹화\n전투 에리어(구역) 2개를 [대미지 존 2]로 취급한 후, 결전 페이즈를 개시한다.",
+            "복병\n적의 절반을 에리어(구역) 1과 에리어(구역) 2로 이동시킨 후, 결전 페이즈를 개시한다.",
+            "만복\n보스 이외의 적의 라이프를 모두 2배로 한 다음, 결전 페이즈를 개시한다.",
+            "봉인\nPC는 결전 페이즈 동안 카르마를 사용할 수 없다. 결전 페이즈를 개시한다."
+          ]
+        ),
+        "STC" => DiceTable::Table.new(
+          "사이드 트랙 차트",
+          "1D10",
+          [
+            "해후\n우연히 NPC와 만난다. 어떤 NPC가 나타날지는 GM이 결정한다.",
+            "사고\교통사고를 당한다. 주변에서 패닉이 일어나고 있을지도 모른다.",
+            "낮잠\n지독한 졸음이 몰려온다. 설마, 신참 빌런의 능력인가?",
+            "고백\nNPC 한 명이 지금까지 간직하고 있던 마음을 당신에게 고백한다.",
+            "설정\n새로운 설정이 밝혀진다. 사실은 NPC의 아버지였다든가, 선천적으로 눈이 보이지 않는다든가.",
+            "자객\n누군가로부터 공격을 받는다. 제3세력인가?",
+            "불청객\n우연히 원수 한 명과 마주친다. 상황에 따라서 바로 전투가 발생할지도 모른다.",
+            "의심\n수상한 사람을 눈치챘다. 따라가야 하나? 무시해야 하나?",
+            "조우\n시나리오와 관계없는 빌런 조직과 조우한다.",
+            "평화\n별일 없었다.",
+          ]
+        ),
+      }.freeze
+
+      register_prefix(
+        'BJ',
+        'DC[LSC]',
+        TABLES.keys
+      )
+    end
+  end
+end

data/lib/bcdice/game_system/CharonSanctions.rb

@@ -0,0 +1,112 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class CharonSanctions < Base
+      # ゲームシステムの識別子
+      ID = "CharonSanctions"
+
+      # ゲームシステム名
+      NAME = "カローン・サンクションズ"
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = "かろおんさんくしおんす"
+
+      HELP_MESSAGE = <<~TEXT
+        ■ 判定
+          nCSm>=t ［判定］を行う。成功／不完全成功を判定。（p.111）
+          n: ダイス数
+          m: ［難易度］（省略時 4）
+          t: ［必要成功数］（省略時 1）
+
+        ■ 各種表
+          ET 感情ワード（キャラクター）表（p.120）
+          RT 襲撃表（p.146）
+      TEXT
+
+      def eval_game_system_specific_command(command)
+        action_roll(command) ||
+          roll_tables(command, TABLES)
+      end
+
+      private
+
+      def action_roll(command)
+        parser = Command::Parser.new("CS", round_type: round_type)
+                                .has_prefix_number
+                                .enable_suffix_number
+                                .disable_modifier
+                                .restrict_cmp_op_to(nil, :>=)
+        cmd = parser.parse(command)
+        return nil unless cmd
+
+        times = cmd.prefix_number
+        return nil if times < 1
+
+        required = (cmd.suffix_number || 4).clamp(2, 6)
+        target = cmd.target_number || 1
+
+        dice_list = @randomizer.roll_barabara(times, 6)
+        count = dice_list.count { |i| i >= required }
+
+        result =
+          if count >= target
+            Result.success("成功")
+          else
+            Result.failure("不完全成功")
+          end
+
+        sequence = [
+          "(#{cmd})",
+          "(#{times}B6>=#{required}[>=#{target}])",
+          "[#{dice_list.join(',')}]",
+          "成功数:#{count}",
+          result.text
+        ].compact
+
+        result.text = sequence.join(" ＞ ")
+        result
+      end
+
+      TABLES = {
+        'ET' => DiceTable::D66RangeTable.new(
+          '感情ワード（キャラクター）表',
+          {
+            11..12 => '愛情／あなたは、対象のキャラクターに愛情を抱いています。',
+            13..14 => '家族／あなたは、対象のキャラクターをまるで家族のように感じています。',
+            15..16 => '腐れ縁／あなたは、対象のキャラクターを腐れ縁だとを感じています（または、まるで長年の腐れ縁のように気が合う相手だと感じています）。',
+            21..22 => '師弟／そのキャラクターとは、師弟のような関係だと感じています。',
+            23..24 => '好敵手／そのキャラクターを、好敵手だと感じています。',
+            25..26 => '親近感／あなたは、対象のキャラクターに、親近感を抱いています。',
+            31..32 => '友情／あなたは、対象のキャラクターに、友情を抱いています。',
+            33..34 => '尊敬／あなたは、対象のキャラクターを尊敬しています。',
+            35..36 => '庇護／あなたは、対象のキャラクターを守らなければと感じています。',
+            41..42 => '好感／あなたは、対象のキャラクターに好感を抱いています。',
+            43..44 => '興味／あなたは、対象のキャラクターに興味を抱いています。',
+            45..46 => '感銘／あなたは、対象のキャラクターに感銘を抱いています。',
+            51..52 => '畏怖／あなたは、対象のキャラクターに畏怖を抱いています。',
+            53..54 => '信頼／あなたは、対象のキャラクターに信頼を感じています。',
+            55..56 => '不信感／あなたは、対象のキャラクターに不信感を抱いています。',
+            61..62 => '劣等感／あなたは、対象のキャラクターの能力や容姿、実績などに対し劣等感を抱いています。',
+            63..64 => '後悔／あなたは対象のキャラクターを見ると、後悔の念を思い出します（かつて失った人に似ている、など）。',
+            65..66 => '無関心／あなたは、対象のキャラクターに対して無関心を装っています。しかし本当は無視できない存在であると感じています。',
+          }
+        ),
+        "RT" => DiceTable::Table.new(
+          "襲撃表",
+          "1D6",
+          [
+            "概要：今回の事件の黒幕が放ったものか、それとも何かで恨みを買ったのか、裏社会の暗殺者たちが襲撃を仕掛けてくる。迎え撃つ必要がある。\n判定：2人で判定。【機敏(SR+1)】〔†射撃〕／【身体(SR+1)】〔†白兵〕\n全員が完全成功：敵の迎撃に成功した。襲撃者を放ってきた相手もしばらくは動けないだろう。【AP】+1。\n1人でも不完全成功：何とか敵を迎撃したが、手傷を負ってしまった。PC全員は【HP】を1d+[SR]点消費する。",
+            "概要：あまりにも目立ちすぎたせいか、自分に目を光らせている司法組織の捜査官が追ってきた。戦うわけにもいかない。誰かが囮になってうまく逃げるしかない。\n判定：1人で判定。【身体(SR+2)】〔運動〕\n全員が完全成功：うまく追手をまくことができた。しばらくは時間を稼ぐことができるだろう。【AP】+1。\n1人でも不完全成功：何とか逃げることには成功したが、体力を使い果たした。判定を行ったPCは、[調査フェイズ]終了時まで【身体】の判定で振るダイス数-1d。",
+            "概要：偶然、一般市民に非合法の活動をしている場面を目撃される。彼らを巻き込まないためにも、何とか誤魔化した方がいいだろう。\n判定：全員で判定。【知性(SR)】〔交渉〕\n全員が完全成功：それらしい理屈をつけて、誤魔化すことができた。機転の利いた対応に、裏社会での評価も上がる。【畏敬】+2。\n1人でも不完全成功：なんとか誤魔化せたが、相手はいまいち納得できないようだ。今後、彼らの動向にも気を配る必要があるだろう。[不完全成功]だったPCは[調査フェイズ]終了まで【知性】の判定で振るダイス数-1d。",
+            "概要：情報を整理しようと集まった瞬間、何者かに襲撃を受ける。出自は不明だが、裏社会の存在で間違いないだろう。迎撃の必要がある。\n判定：全員で判定。【機敏(SR)】〔†射撃〕／【身体(SR)】〔†白兵〕\n全員が完全成功：鮮やかに敵を撃退してみせた。【畏敬】+2。\n1人でも不完全成功：敵を撃退できたものの、手傷を負ってしまった。[不完全成功]だったPCは[調査フェイズ]終了まで【機敏】の判定で振るダイス数-1d。",
+            "概要：君の活躍に目をつけ、闇の組織が急な情報収集の仕事を依頼してきた。やむにやまれぬ事情があり、無視することもできない。急いで片付けた方がいいだろう。\n判定：2人で判定。【知性(SR+1)】〔コンピュータ〕／【機敏(SR+1)】〔操縦〕\n全員が完全成功：コンピュータやフットワークを活かし、情報を素早く手に入れた。闇社会からの評価も上がる。【畏敬】+2。\n1人でも不完全成功：仕事は成功させたものの、少し雑なものとなって相手を落胆させてしまう。【畏敬】-1。",
+            "概要：カローンのことを嗅ぎ回っているマスコミに、活動現場を見られてしまった。何とか言いくるめて、対処する必要がある。\n判定：1人で判定。【知性(SR+2)】〔交渉〕\n全員が完全成功：自分たちはカローンではないと言いくるめることができた。ついでに事件捜査の時間を稼ぐための偽情報をリークすることにも成功する。【AP】+1。\n1人でも不完全成功：何とか言いくるめることができたが、激しく気力を消耗してしまう。判定を行ったPCは、【EP】-1。",
+          ]
+        ),
+      }.freeze
+
+      register_prefix('\d+CS', TABLES.keys)
+    end
+  end
+end

data/lib/bcdice/game_system/ConvictorDrive.rb

@@ -19,7 +19,7 @@ module BCDice
 
       # ダイスボットの使い方
       HELP_MESSAGE = <<~MESSAGETEXT
-        xCD@z>=y: x個の10面ダイスで目標値y、クリティカルラインzの判定を行う
+        xCD@z>=y: x個の10面ダイスで目標値y（省略時5）、クリティカルラインz（省略時10）の判定を行う。
         SLT: 技能レベル表を振る
         DCT: 遅延イベント表を振る
       MESSAGETEXT
@@ -87,7 +87,7 @@ module BCDice
         parser = Command::Parser.new('CD', round_type: round_type)
                                 .has_prefix_number
                                 .enable_critical
-                                .restrict_cmp_op_to(:>=)
+                                .restrict_cmp_op_to(:>=, nil)
         cmd = parser.parse(command)
 
         unless cmd
@@ -95,8 +95,9 @@ module BCDice
         end
 
         dice_list = @randomizer.roll_barabara(cmd.prefix_number, 10)
-        critical = cmd.critical&.clamp(cmd.target_number, 10) || 10
-        succeed_num = dice_list.count { |x| x >= cmd.target_number }
+        target_num = cmd.target_number || 5
+        critical = cmd.critical&.clamp(target_num, 10) || 10
+        succeed_num = dice_list.count { |x| x >= target_num }
         critical_num = dice_list.count { |x| x >= critical }
 
         text = [

data/lib/bcdice/game_system/Cthulhu7th.rb

@@ -203,7 +203,7 @@ module BCDice
 
         if bonus_dice == 0 && difficulty.nil?
           dice = @randomizer.roll_once(100)
-          return "1D100 ＞ #{dice}"
+          return "(1D100) ＞ #{dice}"
         end
 
         if bonus_dice.abs > 100