bcdice 3.14.0 → 3.16.1

data/lib/bcdice/game_system/CyberpunkRed.rb

@@ -68,8 +68,7 @@ module BCDice
 
       def eval_game_system_specific_command(command)
         debug("eval_game_system_specific_command begin string", command)
-
-        cp_roll_result(command) || roll_tables(command, TABLES)
+        cp_roll_result(command) || roll_tables(command, self.class::TABLES)
       end
 
       private_constant :CP_RE

data/lib/bcdice/game_system/CyberpunkRed_Korean.rb

@@ -0,0 +1,66 @@
+# frozen_string_literal: true
+
+require "bcdice/game_system/CyberpunkRed"
+
+module BCDice
+  module GameSystem
+    class CyberpunkRed_Korean < CyberpunkRed
+      # ゲームシステムの識別子
+      ID = 'CyberpunkRed:Korean'
+
+      # ゲームシステム名
+      NAME = '사이버펑크 RED'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = '国際化:Korean:사이버펑크'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~HELP
+        ・판정　CPx+y>z
+          　(x＝능력치와 기능치의 합(base)、y＝수정치(mod)、z＝난이도(DV) or 방어자의 값　x、y、z는 생략 가능)
+          　예시）CP12, CP10+2>12,　CP7-1,　CP8+4,　CP7>12,　CP,　CP>9
+
+          각종 표
+          ・치명적인 손상표
+          　FFD　：신체에 치명적 손상
+          　HFD　：머리에 치명적 손상
+          ・조우 표
+          　NCDT　：나이트시티(낮)
+          　NCMT　：나이트 시티(심야)
+          ・스크림 시트(신문)
+          　SCSR　：스크림 시트(랜덤)
+          　SCST　：스크림 시트 카테고리
+          　SCSA　：헤드 라인A
+          　SCSB　：헤드 라인B
+          　SCSC　：헤드 라인C
+          ・가장 가까운 자판기
+          　VMCR　：가장 가까운 자판기표
+          　VMCT　：자판기 유형 결정표
+          　VMCE　：식품
+          　VMCF　：패션
+          　VMCS　：이상한 물건
+          ・보데가(상점) 손님
+          　STORE　：상점 손님과 점원
+          　STOREA　：점주 또는 계산원
+          　STOREB　：별난 손님 1
+          　STOREC　：별난 손님 2
+          ・야시장
+          　NMCT　：상품의 분야
+          　NMCFO　：음식과 약물
+          　NMCME　：개인용 전자기기
+          　NMCWE　：무기와 갑옷
+          　NMCCY　：사이버웨어
+          　NMCFA　：의류 및 패션웨어
+          　NMCSU　：생존 장비(servival gear)
+      HELP
+
+      def initialize(command)
+        super(command)
+        @locale = :ko_kr
+      end
+
+      register_prefix_from_super_class()
+      TABLES = translate_tables(:ko_kr)
+    end
+  end
+end

data/lib/bcdice/game_system/DoubleCross.rb

@@ -27,6 +27,9 @@ module BCDice
         　　ポジティブとネガティブの両方を振って、表になっている側に○を付けて表示します。
         　　もちろん任意で選ぶ部分は変更して構いません。
 
+        ・ハプニングチャート（HC）
+        ・RWプロローグチャート ポジティブ (PCP)
+        ・RWプロローグチャート ネガティブ (PCN)
         ・D66ダイスあり
       INFO_MESSAGE_TEXT
 
@@ -213,6 +216,10 @@ module BCDice
           return dx.execute(@randomizer)
         end
 
+        if self.class::TABLES.key?(command)
+          return roll_tables(command, self.class::TABLES)
+        end
+
         if command == 'ET'
           return roll_emotion_table()
         end
@@ -356,13 +363,23 @@ module BCDice
             ]
           ).freeze
         end
-      end
 
+        def translate_tables(locale)
+          {
+            "HC" => DiceTable::RangeTable.from_i18n("DoubleCross.HC", locale),
+            "PCP" => DiceTable::Table.from_i18n("DoubleCross.PCP", locale),
+            "PCN" => DiceTable::Table.from_i18n("DoubleCross.PCN", locale),
+          }
+        end
+      end
       # 感情表（ポジティブ）
       POSITIVE_EMOTION_TABLE = positive_emotion_table(:ja_jp).freeze
 
       # 感情表（ネガティブ）
       NEGATIVE_EMOTION_TABLE = negative_emotion_table(:ja_jp).freeze
+
+      TABLES = translate_tables(:ja_jp).freeze
+      register_prefix('\d+DX', TABLES.keys)
     end
   end
 end

data/lib/bcdice/game_system/DoubleCross_Korean.rb

@@ -24,6 +24,9 @@ module BCDice
         　・감정표（ET）
         　　포지티브와 네거티브 양쪽을 굴려, 겉으로 나타는 쪽에 O를 붙여 표시합니다.
         　　물론 임의로 정하는 부분을 변경해도 괜찮습니다.
+        ・해프닝차트（HC)
+        ・RW프롤로그차트 포지티브（PCP）
+        ・RW프롤로그차트 네거티브（PCN）
         ・D66다이스 있음
       INFO_MESSAGE_TEXT
 
@@ -46,9 +49,10 @@ module BCDice
 
       # 感情表（ポジティブ）
       POSITIVE_EMOTION_TABLE = positive_emotion_table(:ko_kr).freeze
-
       # 感情表（ネガティブ）
       NEGATIVE_EMOTION_TABLE = negative_emotion_table(:ko_kr).freeze
+      TABLES = translate_tables(:ko_kr).freeze
+      register_prefix('\d+DX', TABLES.keys)
     end
   end
 end

data/lib/bcdice/game_system/EdgeFlippers.rb

@@ -0,0 +1,315 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class EdgeFlippers < Base
+      # ゲームシステムの識別子
+      ID = 'EdgeFlippers'
+
+      # ゲームシステム名
+      NAME = 'EDGE FLIPPERS'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'えつしふりつはあす'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~MESSAGETEXT
+        ■ 汎用コマンド
+          xHD+ySD=t,t,t
+          人間ダイスと怪異ダイスをロールして、特定の出目があるか判定します。
+          x: 人間ダイスの数
+          y: 怪異ダイスの数
+          t: 必要な出目（省略化）
+
+        ■ 拮抗判定
+          xHD+ySD=Xi
+          人間ダイスと怪異ダイスをロールして、ゾロ目が必要数あるか判定します。
+          i: 必要なゾロ目の個数
+
+        ■ 全力判定
+          xHFD>=t
+          xSFD>=t
+          x: ダイスの数
+          t: 目標値（省略時20）
+
+        ■ 存在判定
+          EXIST -> 2HD+2SD
+
+        ■ 都市判定
+          xHCD -> xHD=1,2,3,4
+
+        ■ 超常判定
+          nSPD -> nSD=7,8,9,10
+
+        ■ 術式判定
+          TD
+
+        ■ ランダム表
+          BAET：【人間】にも【怪異】にも影響のある後遺症
+          HAET：【人間寄り】の時に影響のある後遺症
+          SAET：【怪異寄り】の時に影響のある後遺症
+      MESSAGETEXT
+
+      def eval_game_system_specific_command(command)
+        roll_hs(command) || roll_alias(command) || roll_fullpower(command) || roll_technical(command) || roll_tables(command, TABLES)
+      end
+
+      private
+
+      class HSCommand
+        class << self
+          def parse(command)
+            m = /^(?:(\d+)HD(?:\+(\d+)SD)?|(\d+)SD(?:\+(\d+)HD)?)(?:=(?:([\d,]+)|X(\d+)))?$/.match(command)
+            return nil unless m
+
+            h = m[1]&.to_i || m[4]&.to_i || 0
+            s = m[2]&.to_i || m[3]&.to_i || 0
+            targets = parse_target(m[5])
+            same_value = m[6]&.to_i
+
+            if h == 0 && s == 0
+              return nil
+            end
+
+            return HSCommand.new(h, s, targets, same_value)
+          end
+
+          private
+
+          def parse_target(str)
+            return nil unless str
+
+            str.split(",").filter { |s| !s.empty? }.map(&:to_i).sort
+          end
+        end
+
+        def initialize(h, s, targets, same_value)
+          @h = h
+          @s = s
+          @targets = targets
+          @same_value = same_value
+        end
+
+        def roll(randomizer)
+          @hv = randomizer.roll_barabara(@h, 6).sort
+          @sv = randomizer.roll_barabara(@s, 10).sort
+          values = (@hv + @sv).sort
+
+          @is_success = if @targets
+                          subset?(values, @targets)
+                        elsif @same_value
+                          values.group_by(&:itself).any? { |_k, v| v.length >= @same_value }
+                        end
+
+          Result.new.tap do |r|
+            r.text = [expr(), result_values(), result_label].compact.join(" ＞ ")
+            unless @is_success.nil?
+              r.condition = @is_success
+            end
+          end
+        end
+
+        private
+
+        def subset?(superset, subset)
+          return true if subset.empty?
+
+          i = 0
+          superset.each do |a|
+            b = subset[i]
+            if b == a
+              i += 1
+              if i == subset.length
+                return true
+              end
+            elsif a > b
+              return false
+            end
+          end
+
+          return false
+        end
+
+        def expr
+          "(#{expr_body()}#{expr_cond()})"
+        end
+
+        def expr_body
+          if @h != 0 && @s != 0
+            "#{@h}HD+#{@s}SD"
+          elsif @h != 0
+            "#{@h}HD"
+          else
+            "#{@s}SD"
+          end
+        end
+
+        def expr_cond
+          if @targets
+            "=#{@targets.join(',')}"
+          elsif @same_value
+            "=X#{@same_value}"
+          else
+            ""
+          end
+        end
+
+        def result_values
+          d6 = !@hv.empty? ? "D6[#{@hv.join(',')}]" : nil
+          d10 = !@sv.empty? ? "D10[#{@sv.join(',')}]" : nil
+          [d6, d10].compact.join(" ")
+        end
+
+        def result_label
+          case @is_success
+          when true
+            "成功"
+          when false
+            "失敗"
+          end
+        end
+      end
+
+      def roll_hs(command)
+        cmd = HSCommand.parse(command)
+        return nil unless cmd
+
+        cmd.roll(@randomizer)
+      end
+
+      def parse_target(str)
+        return nil unless str
+
+        str.split(",").filter { |s| !s.empty? }.map(&:to_i).sort
+      end
+
+      def subset?(superset, subset)
+        return true if subset.empty?
+
+        i = 0
+        superset.each do |a|
+          b = subset[i]
+          if b == a
+            i += 1
+            if i == subset.length
+              return true
+            end
+          elsif a > b
+            return false
+          end
+        end
+
+        return false
+      end
+
+      def roll_alias(command)
+        case command
+        when "EXIST"
+          return roll_hs("2HD+2SD")
+        end
+
+        m = /^(\d+)(HCD|SPD)$/.match(command)
+        return nil unless m
+
+        n = m[1].to_i
+        case m[2]
+        when "HCD"
+          roll_hs("#{n}HD=1,2,3,4")
+        when "SPD"
+          roll_hs("#{n}SD=7,8,9,10")
+        end
+      end
+
+      def roll_fullpower(command)
+        parser = Command::Parser.new(/[HS]FD/, round_type: @round_type)
+                                .disable_modifier.enable_prefix_number.restrict_cmp_op_to(nil, :>=)
+        parsed = parser.parse(command)
+        return nil unless parsed
+
+        n = parsed.prefix_number
+        side = parsed.command == "HFD" ? 6 : 10
+        target = parsed.target_number || 20
+        return nil if n == 0
+
+        dice = @randomizer.roll_barabara(n, side).sort
+        sum = dice.sum()
+        tries = [dice]
+        while sum < target
+          dice = @randomizer.roll_barabara(n, side).sort
+          tries.push(dice)
+          sum += dice.sum()
+        end
+
+        Result.new.tap do |r|
+          r.text = "(#{n}#{parsed.command}>=#{target})"
+          tries.each do |ds|
+            r.text += " ＞ #{ds.sum}[#{ds.join(',')}]"
+          end
+
+          is_success = tries.length < 5
+          r.text += " ＞ #{sum}(#{tries.length}回)"
+          r.text += is_success ? " ＞ 成功" : " ＞ 失敗"
+          r.condition = is_success
+        end
+      end
+
+      def roll_technical(command)
+        return nil unless command == "TD"
+
+        value = @randomizer.roll_once(10)
+        is_success = value <= 2
+        Result.new.tap do |r|
+          r.text = "(TD) ＞ #{value} ＞ #{is_success ? '成功' : '失敗'}"
+          r.condition = is_success
+        end
+      end
+
+      TABLES = {
+        "BAET" => DiceTable::Table.new(
+          "【人間】にも【怪異】にも影響のある後遺症",
+          "1D12",
+          [
+            "鏡に映らない：鏡や水面に姿が映らなくなる。他者から見えなくなるわけではない",
+            "部分的に透明：身体のどこかが透明になる",
+            "部分的欠落：身体のどこかが消えて触ることもできなくなる。生命維持に影響はない",
+            "角が生える：角が生えてくる。元から角がある場合はさらに追加",
+            "しっぽ：動物のしっぽが生える",
+            "けもみみ：動物の耳が頭に生える",
+            "影がなくなる：自分の影がなくなってしまう",
+            "涙が止まらない：ずっと涙が流れ続けて止まらなくなる",
+            "視界の端に何かいる：常に視界の端に何かがいて、踊っている",
+            "耳鳴り：ずっと耳鳴りがやまない。たまに幻聴がする",
+            "美しい幻聴：時々他人の声が現実離れした美しい声に変わって聞こえる",
+            "皮膚の下のうごめき：皮膚の下でずっと何かが蠢いているように感じられる",
+          ]
+        ),
+        "HAET" => DiceTable::Table.new(
+          "【人間寄り】の時に影響のある後遺症",
+          "1D6",
+          [
+            "幻肢の感覚：存在しない追加の腕や翼の感覚がある",
+            "声変わり：普段とは違う声になってしまう",
+            "怪異の片鱗：【怪異寄り】のときの容姿の一部が【人間寄り】の時にも出てしまう",
+            "幻覚：時折やけに生々しい幻覚が見えるようになる",
+            "恐怖：あらゆるものが怖く見える",
+            "怪異言語：【人間】の領域には存在しない謎の言語が理解できる",
+          ]
+        ),
+        "SAET" => DiceTable::Table.new(
+          "【怪異寄り】の時に影響のある後遺症",
+          "1D6",
+          [
+            "吸精体質：他者に触れると生命力を吸収してしまう。特に仲の良い相手だとより強くなる",
+            "威圧する視線：あなたの視線は周囲に強烈な威圧感を与えてしまう",
+            "キメラ：あなたの容姿の一部が、他の【越境者】の【怪異寄り】のときの容姿のものと同じになる",
+            "異なる怪異：あなた本来の【怪異】の姿とは違う姿に変化してしまう",
+            "ポルターガイスト：周囲でラップ音や部品の浮遊といった怪現象が多発する",
+            "人間そのもの：【怪異寄り】のときでも人間そのものの容姿になってしまう",
+          ]
+        ),
+      }.freeze
+
+      register_prefix('\d+HD', '\d+SD', '\d+HCD', '\d+SPD', '\d+HFD', '\dSFD', 'EXIST', 'TD', TABLES.keys)
+    end
+  end
+end

data/lib/bcdice/game_system/Emoklore_Korean.rb

@@ -0,0 +1,42 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class Emoklore_Korean < Emoklore
+      # ゲームシステムの識別子
+      ID = "Emoklore:Korean"
+
+      # ゲームシステム名
+      NAME = "에모크로아TRPG"
+
+      # ゲームシステム名の読みがな
+      #
+      # 「ゲームシステム名の読みがなの設定方法」（docs/dicebot_sort_key.md）を参考にして
+      # 設定してください
+      SORT_KEY = "国際化:Korean:에모크로아TRPG"
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~MESSAGETEXT
+        ・기능치 판정（xDM<=y）
+          "(개수)DM<=(판정치)"로 판정합니다.
+          주사위의 개수는 생략 가능하며, 생략 시 1개로 설정됩니다.
+          ex）2DM<=5 DM<=8
+
+        ・기능치 판정（sDAa+z)
+          "(기능 레벨)DA(능력치)+(주사위 보너스)"로 판정합니다.
+          주사위 보너스의 개수는 생략 가능하며, 생략 시 0개로 설정됩니다.
+          기능 레벨에는 1~3의 수치를 입력합니다. 기본 기능으로 판정하려면 기능 레벨에"b"를 입력하세요.
+          주사위 개수는 기능 레벨과 주사위 보너스 개수에 따라 결정되며, s+z개의 주사위를 굴립니다. (s="b"인 경우 s=1)
+          판정치는 s+a 입니다.（s="b"인 경우에는 s=0）
+      MESSAGETEXT
+
+      register_prefix_from_super_class()
+
+      def initialize(command)
+        super(command)
+
+        @locale = :ko_kr
+      end
+    end
+  end
+end

data/lib/bcdice/game_system/FullFace.rb

@@ -22,9 +22,9 @@ module BCDice
            FF<=2,1:   能力値2,難易度1で判定し、その結果(成功数,1の目の数,6の目の数,成功・失敗,バースト)を表示。
            6FF<=3,2&1:ヒート6,能力値3,難易度2,基本ダメージ1で戦闘判定し、その結果(成功数,1の目の数,6の目の数,ダメージ,バースト)を表示。
 
-      INFO_MESSAGETEXT
+        ■ジャンク表　JKT
 
-      register_prefix('([+\d]+)*FF')
+      INFO_MESSAGETEXT
 
       def initialize(command)
         super(command)
@@ -33,7 +33,8 @@ module BCDice
       end
 
       def eval_game_system_specific_command(command)
-        resolute_action(command)
+        resolute_action(command) ||
+          roll_tables(command, TABLES)
       end
 
       private
@@ -116,6 +117,27 @@ module BCDice
           result.text = sequence.join(" ＞ ")
         end
       end
+
+      TABLES = {
+        "JKT" => DiceTable::Table.new(
+          "ジャンク表",
+          "2D6",
+          [
+            "命欲しさに重要な情報を吐いた。セッションのボスに関する情報を得る。",
+            "ユニットの機密文書だ。この戦闘で獲得したユニットがあるなら、そのうち好きなユニット1つを経験点を消費せずに常備化できる。",
+            "違法アップロードされた個人情報のデータだ。このセッション中、エネミーと出会ったとき、詳細なデータが即座に公開される（GMはできるだけ拒否しないこと）。",
+            "鍵を持っていた。近くに施錠された扉や箱などがあるなら、そのうちの1つを開けることができる。",
+            "何も見つけられなかったが、敵を倒したことによって自信を得た。このセッション中のみ、1回だけ自身の判定で出た6の目を1つ消すことができる。",
+            "自爆装置だ。何も残らなかった。",
+            "使い捨ての武器を手に入れた。このセッション中のみ、1回だけ「近接攻撃5『本能』」の攻撃アクションを行える。",
+            "敵が改心した。倒されたキャラクターがまだ生きているなら、そのうちの一人が君たちに協力を申し込んでくる（このセッション限定の恩恵「人脈：協力者」を得る）。",
+            "金を手に入れた。キャラクター全員、アフターフェイズに配布される経験点が1増加する。",
+            "強力なユニットを隠し持っていた。好きな組織専用ユニットを1つ獲得する。",
+            "大金を手に入れた。キャラクター全員、アフターフェイズに配布される経験点が3増加する。",
+          ]
+        ),
+      }.freeze
+      register_prefix('([+\d]+)*FF', TABLES.keys)
     end
   end
 end

data/lib/bcdice/game_system/FutariSousa.rb

@@ -16,7 +16,9 @@ module BCDice
       HELP_MESSAGE = <<~MESSAGETEXT
         ・判定用コマンド
         探偵用：【DT】…10面ダイスを2つ振って判定します。『有利』なら【3DT】、『不利』なら【1DT】を使います。
+        　　　　【DT6】…6面ダイスを2つ振って判定します。『有利』なら【3DT6】、『不利』なら【1DT6】を使います。
         助手用：【AS】…6面ダイスを2つ振って判定します。『有利』なら【3AS】、『不利』なら【1AS】を使います。
+        　　　　【AS10】…10面ダイスを2つ振って判定します。『有利』なら【3AS10】、『不利』なら【1AS10】を使います。
         ・各種表
         【セッション時】
         異常な癖決定表　　　　　 SHRD／新・異常な癖決定表　　 SHND
@@ -67,13 +69,13 @@ module BCDice
         @d66_sort_type = D66SortType::ASC
       end
 
-      register_prefix('(\d+)?DT', '(\d+)?AS')
+      register_prefix('(\d+)?DT(?:6)?', '(\d+)?AS(?:10)?')
 
       def eval_game_system_specific_command(command)
-        if (m = /^(\d+)?DT$/i.match(command))
+        if (m = /^(\d+)?DT(?:6)?$/i.match(command))
           count = m[1]&.to_i || 2
           return roll_dt(command, count)
-        elsif (m = /^(\d+)?AS$/i.match(command))
+        elsif (m = /^(\d+)?AS(?:10)?$/i.match(command))
           count = m[1]&.to_i || 2
           return roll_as(command, count)
         end
@@ -91,7 +93,12 @@ module BCDice
 
       # 探偵用判定コマンド DT
       def roll_dt(command, count)
-        dice_list = @randomizer.roll_barabara(count, 10)
+        dice_list =
+          if command =~ /^(\d*)DT6$/i
+            @randomizer.roll_barabara(count, 6)
+          else
+            @randomizer.roll_barabara(count, 10)
+          end
         max = dice_list.max
 
         result =
@@ -111,7 +118,12 @@ module BCDice
 
       # 助手用判定コマンド AS
       def roll_as(command, count)
-        dice_list = @randomizer.roll_barabara(count, 6)
+        dice_list =
+          if command =~ /^(\d*)AS10$/i
+            @randomizer.roll_barabara(count, 10)
+          else
+            @randomizer.roll_barabara(count, 6)
+          end
         max = dice_list.max
 
         result =