bcdice 3.0.0.pre.rc.1 → 3.1.2

data/lib/bcdice/game_system/SwordWorld2_0.rb

@@ -3,6 +3,7 @@
 require 'bcdice/arithmetic_evaluator'
 
 require 'bcdice/game_system/SwordWorld'
+require 'bcdice/game_system/sword_world/transcendent_test'
 
 module BCDice
   module GameSystem
@@ -34,10 +35,12 @@ module BCDice
         　またタイプの軽減化のために末尾に「@クリティカル値」でも処理するようにしました。
         　例）K20[10]　　　K10+5[9]　　　k30[10]　　　k10[9]+10　　　k10-5@9
 
-        ・レーティング表の半減 (HKx)
+        ・レーティング表の半減 (HKx, KxH+N)
         　レーティング表の先頭または末尾に"H"をつけると、レーティング表を振って最終結果を半減させます。
+        　末尾につけた場合、直後に修正ををつけることで、半減後の加減算を行うことができます。
+        　この際、複数の項による修正にはカッコで囲うことが必要です（カッコがないとパースに失敗します）
         　クリティカル値を指定しない場合、クリティカルなしと扱われます。
-        　例）HK20　　K20h　　HK10-5@9　　K10-5@9H　　K20gfH
+        　例）HK20　　K20h　　HK10-5@9　　K10-5@9H　　K20gfH　　K20+8H+2　　K20+8H(1+1)
 
         ・ダイス目の修正（運命変転やクリティカルレイ用）
         　末尾に「$修正値」でダイス目に修正がかかります。
@@ -65,115 +68,13 @@ module BCDice
         　絡み効果表を出すことができます。
       INFO_MESSAGE_TEXT
 
-      register_prefix('H?K\d+.*', 'Gr(\d+)?', '2D6?@\d+.*', 'FT', 'TT')
-
-      # 超越判定のノード
-      class TranscendentTest
-        # @param [Integer] critical_value クリティカル値
-        # @param [Integer] modifier 修正値
-        # @param [String, nil] cmp_op 比較演算子（> または >=）
-        # @param [Integer, nil] target 目標値
-        def initialize(critical_value, modifier, cmp_op, target)
-          @critical_value = critical_value
-          @modifier = modifier
-          @cmp_op = cmp_op
-          @target = target
-
-          @modifier_str = Format.modifier(@modifier)
-          @expression = node_expression()
-        end
-
-        # 超越判定を行う
-        # @param randomizer [Randomizer]
-        # @return [String]
-        def execute(randomizer)
-          if @critical_value < 3
-            return "(#{@expression}) ＞ クリティカル値が小さすぎます。3以上を指定してください。"
-          end
-
-          first_value_group = randomizer.roll_barabara(2, 6)
-          value_groups = [first_value_group]
-
-          fumble = first_value_group == [1, 1]
-          critical = first_value_group == [6, 6]
-
-          if !fumble && !critical
-            while sum_of_dice(value_groups.last) >= @critical_value
-              value_groups.push(randomizer.roll_barabara(2, 6))
-            end
-          end
-
-          sum = sum_of_dice(value_groups)
-          total_sum = sum + @modifier
-
-          parts = [
-            "(#{@expression})",
-            "#{dice_str(value_groups, sum)}#{@modifier_str}",
-            total_sum,
-            @target && result_str(total_sum, value_groups.length, fumble, critical)
-          ].compact
-
-          return parts.join(' ＞ ')
-        end
-
-        private
-
-        # 数式表記を返す
-        # @return [String]
-        def node_expression
-          lhs = "2D6@#{@critical_value}#{@modifier_str}"
-
-          return @target ? "#{lhs}#{@cmp_op}#{@target}" : lhs
-        end
-
-        # 出目の合計を返す
-        # @param [(Integer, Integer), Array<(Integer, Integer)>] value_groups
-        #   出目のグループまたはその配列
-        # @return [Integer]
-        def sum_of_dice(value_groups)
-          value_groups.flatten.sum
-        end
-
-        # ダイス部分の文字列を返す
-        # @param [Array<(Integer, Integer)>] value_groups 出目のグループの配列
-        # @param [Integer] sum 出目の合計
-        # @return [String]
-        def dice_str(value_groups, sum)
-          value_groups_str =
-            value_groups
-            .map { |values| "[#{values.join(',')}]" }
-            .join
-
-          return "#{sum}#{value_groups_str}"
-        end
-
-        # 判定結果の文字列を返す
-        # @param [Integer] total_sum 合計値
-        # @param [Integer] n_value_groups 出目のグループの数
-        # @param [Boolean] fumble ファンブルかどうか
-        # @param [Boolean] critical クリティカルかどうか
-        # @return [String]
-        def result_str(total_sum, n_value_groups, fumble, critical)
-          return '自動的失敗' if fumble
-          return '自動的成功' if critical
-
-          if total_sum.send(@cmp_op, @target)
-            # 振り足しが行われ、合計値が41以上ならば「超成功」
-            n_value_groups >= 2 && total_sum >= 41 ? '超成功' : '成功'
-          else
-            '失敗'
-          end
-        end
-      end
+      register_prefix('H?K\d+', 'Gr(\d+)?', '2D6?@\d+', 'FT', 'TT')
 
       def initialize(command)
         super(command)
         @rating_table = 2
       end
 
-      # 超越判定のパターン
-      TRANSCENDENT_TEST_RE = /\A2D6?@(\d+)([-+\d]+)?(?:(>=?)(\d+))?/.freeze
-
       def eval_game_system_specific_command(command)
         case command
         when /^Gr(\d+)?/i
@@ -182,15 +83,17 @@ module BCDice
           else
             growth
           end
-        when TRANSCENDENT_TEST_RE
-          m = Regexp.last_match
-
-          critical_value = m[1].to_i
-          modifier = m[2] ? ArithmeticEvaluator.eval(m[2]) : 0
-          cmp_op = m[3]
-          target = m[3] && m[4].to_i
+        when /^2D6?@\d+/i
+          transcendent_parser = Command::Parser.new(/2D6?/i, round_type: BCDice::RoundType::CEIL)
+                                               .enable_critical
+                                               .restrict_cmp_op_to(nil, :>=, :>)
+          cmd = transcendent_parser.parse(command)
+
+          unless cmd
+            return nil
+          end
 
-          node = TranscendentTest.new(critical_value, modifier, cmp_op, target)
+          node = TranscendentTest.new(cmd.critical, cmd.modify_number, cmd.cmp_op, cmd.target_number)
           node.execute(@randomizer)
         when 'FT'
           get_fumble_table
@@ -201,32 +104,13 @@ module BCDice
         end
       end
 
-      def getRateUpFromString(string)
-        rateUp = 0
-
-        regexp = /r\[(\d+)\]/i
-        if (m = regexp.match(string))
-          rateUp = m[1].to_i
-          string = string.gsub(regexp, '')
-        end
-
-        return rateUp, string
-      end
-
-      def getAdditionalString(string, output)
-        output, values = super(string, output)
-
-        isGratestFortune, = getGratestFortuneFromString(string)
-
-        values['isGratestFortune'] = isGratestFortune
-        output += "gf" if isGratestFortune
-
-        return output, values
+      def rating_parser
+        return RatingParser.new(version: :v2_0)
       end
 
-      def rollDice(values)
-        unless values['isGratestFortune']
-          return super(values)
+      def rollDice(command)
+        unless command.greatest_fortune
+          return super(command)
         end
 
         dice = @randomizer.roll_once(6)
@@ -234,18 +118,6 @@ module BCDice
         return dice * 2, "#{dice},#{dice}"
       end
 
-      def getGratestFortuneFromString(string)
-        isGratestFortune = false
-
-        regexp = /gf/i
-        if regexp.match?(string)
-          isGratestFortune = true
-          string = string.gsub(regexp, '')
-        end
-
-        return isGratestFortune, string
-      end
-
       def growth(count = 1)
         ((1..count).map { growth_step }).join " | "
       end

data/lib/bcdice/game_system/SwordWorld2_5.rb

@@ -32,10 +32,12 @@ module BCDice
         　またタイプの軽減化のために末尾に「@クリティカル値」でも処理するようにしました。
         　例）K20[10]　　　K10+5[9]　　　k30[10]　　　k10[9]+10　　　k10-5@9
 
-        ・レーティング表の半減 (HKx)
+        ・レーティング表の半減 (HKx, KxH+N)
         　レーティング表の先頭または末尾に"H"をつけると、レーティング表を振って最終結果を半減させます。
+        　末尾につけた場合、直後に修正ををつけることで、半減後の加減算を行うことができます。
+        　この際、複数の項による修正にはカッコで囲うことが必要です（カッコがないとパースに失敗します）
         　クリティカル値を指定しない場合、クリティカルなしと扱われます。
-        　例）HK20　　K20h　　HK10-5@9　　K10-5@9H　　K20gfH
+        　例）HK20　　K20h　　HK10-5@9　　K10-5@9H　　K20gfH　　K20+8H+2　　K20+8H+(1+1)
 
         ・ダイス目の修正（運命変転やクリティカルレイ用）
         　末尾に「$修正値」でダイス目に修正がかかります。
@@ -66,54 +68,138 @@ module BCDice
 
         ・絡み効果表　(TT)
         　絡み効果表を出すことができます。
-      INFO_MESSAGE_TEXT
 
-      register_prefix('H?K\d+.*', 'Gr(\d+)?', '2D6?@\d+.*', 'FT', 'TT')
+        ・ドルイドの物理魔法用表　(Dru[2-6の値,7-9の値,10-12の値])
+        　例）Dru[0,3,6]+10-3
 
-      # コマンド実行前にメッセージを置換する
-      # @param [String] string 受信したメッセージ
-      # @return [String]
-      def replace_text(string)
-        return string unless RATING_TABLE_RE_FOR_CHANGE_TEXT.match?(string)
+        ・アビスカース表　(ABT)
+        　アビスカース表を出すことができます。
+      INFO_MESSAGE_TEXT
 
-        super(string).gsub(/#([-+]?\d+)/) do
-          modifier = Regexp.last_match(1).to_i
-          "a[#{Format.modifier(modifier)}]"
+      register_prefix('H?K\d+', 'Gr(\d+)?', '2D6?@\d+', 'FT', 'TT', 'Dru\[\d+,\d+,\d+\]', 'ABT')
+
+      ABYSS_CURSE_TABLE = DiceTable::D66GridTable.new(
+        'アビスカース表', [
+          [
+            "「自傷の」　装備時　この武具を装備中に装備者がクリティカルを発生させた時、装備者のHPが5点減少する。",
+            "「嘆きの」　装備時　近くに敵がいたり、長い緊張状態が続くと涙が止まらなくなる。戦闘中なら「射程：術者（自身）」「射程：接触」以外の効果で対象を選べなくなる。",
+            "「優しき」　装備時　敵に同情してしまう。敵対するキャラクターを対象にする場合、対象のHPが1点以上減少しているなら命中力判定、魔法行使判定に-2のペナルティ修正を受ける。",
+            "「差別の」　装備時　特定の分類に対して与える物理ダメージ・魔法ダメージが2点減少する。分類は「分類決定表」で無作為に決定する。",
+            "「脆弱な」　装備時　魔法ダメージを受けるたび、そのダメージが+1点される。",
+            "「無謀な」　装備時　防護点が2点減少する（最低0）。",
+          ], [
+            "「重い」　装備時　強化した武具の必要筋力が+2される。威力、防護点などは変化なし。",
+            "「難しい」　装備時　いかなる威力表使用時でも、③④欄の数値が威力に関係なく「0」になる（自動失敗ではない）。",
+            "「軟弱な」　装備時　精神抵抗力判定に-1のペナルティ修正を受ける。",
+            "「病弱な」　装備時　生命抵抗力判定に-1のペナルティ修正を受ける。",
+            "「過敏な」　装備時　特定の属性から受ける物理ダメージ、魔法ダメージが2点上昇する。属性は「属性決定表」で無作為に決定する。",
+            "「陽気な」　装備時　精神抵抗判定に失敗するたび、笑いが止まらなくなる。次の手番終了時まで行動判定（『Ⅰ』123頁）に-1のペナルティ修正を受ける。この効果は累積する。",
+          ], [
+            "「たどたどしい」　装備時　話をする時に言葉に詰まったり、言い間違えたりしやすくなる。魔法行使判定に-1のペナルティ修正を受ける。",
+            "「代弁する」　装備時　自身の会話は、そのまま武具が魔法文明語の聞き取りづらい声で話す。装備中は魔法文明語以外の言語で会話は行えず、妖精魔法、魔動機術を行使できなくなる。",
+            "「施しは受けない」　装備時　戦闘中、「抵抗：任意」の効果を受け入れた場合、次の手番終了時まで生命抵抗力、精神抵抗力に-2のペナルティ修正を受ける。",
+            "「死に近い」　携行時　常に生死判定に「冒険者レベル」と同じ値のペナルティ修正を受ける。",
+            "「おしゃれな」　携行時　その武具を常に華美に飾りたくなる。収入を得るたび、その1割以上をこの武具の装飾に費やさなければならない（効果などに変化はない）。",
+            "「マナを吸う」　携行時　魔法や練技など、自身の意思でMPを消費する効果を使用する場合、すべてのMP消費が1点上昇する。",
+          ], [
+            "「鈍重な」　携行時　移動力が半分（端数切り上げ）になる。",
+            "「定まらない」　携行時　戦闘中の手番開始時に1dし、出目が「1」なら《ターゲッティング》とそれを前提とした戦闘特技を習得していないものとして扱う。",
+            "「錯乱の」　携行時　戦闘中の手番開始時に1dし、出目が「1」なら近接攻撃を含む「射程：接触」の対象に効果を使用する際、対象は同じ位置（エリア、座標）の全てのキャラクター（敵味方含む）から無作為に選ばれる。",
+            "「足絡みの」　携行時　戦闘中の手番開始時に1dし、出目が「1」ならその場で即座に転倒する。手番中には起き上がれない。",
+            "「滑り落ちる」　携行時　戦闘中の手番開始時に1dし、出目が「1」なら手に装備または保持しているものをすべてその場に落とす（その手番の主動作で拾う事は可能）。",
+            "「悪臭放つ」　携行時　強い悪臭を放つ。所持しているだけで他のキャラクターに不快感を与え、隠密判定に-2のペナルティ修正を受ける。さらに冒険者ランク（『Ⅱ』137頁）が1段階低いものとして扱われる。",
+          ], [
+            "「醜悪な」　携行時　武具の見た目が悪く、魅力がない。売却する際、基本取引価格の4分の1の価格で売却する。さらに冒険者ランク（『Ⅱ』137頁）が1段階低いものとして扱われる。",
+            "「唸る」　携行時　その武具から常に羽虫が飛び交うような音が響く。隠密判定、危険感知判定に-4のペナルティ修正を受ける。",
+            "「ふやけた」　携行時　水を吸ったようにふやけた質感をしている。追加ダメージ-1（武器）、防護点-1（鎧、盾）。病気属性の効果に対する生命抵抗力、精神抵抗力判定に-4のペナルティ修正を受ける。",
+            "「古傷の」　携行時　HPを回復する効果（休息による回復を含む）を受けた場合、その回復量が1点減少する。",
+            "「まばゆい」　携行時　光などを弾いて強く輝く。自身は常に視界が悪い事による-1のペナルティ修正を受ける。",
+            "「栄光なき」　携行時　行為判定で自動成功した際、自動成功とは扱わず、2dを振り直し、その後の出目に従う。この効果は1日に1回のみ発揮される。",
+          ], [
+            "「正直者の」　携行時　嘘、方便がすぐばれるようになる。真偽判定の対象となる場合、-4のペナルティ修正を受ける。",
+            "「乗り物酔いの」　携行時　揺れに弱くなる。自身の足以外の手段で10分以上移動した後、1時間、行動判定に-1のペナルティ修正を受ける。",
+            "「碧を厭う」　携行時　自然の中では落ち着かなくなる。自然環境（『Ⅰ』108頁）では行動判定に-1のペナルティ修正を受ける。",
+            "「我慢できない」　携行時　セッション中に1日の始まりを迎えるたび、趣味や嗜好品などに「冒険者レベル×10」ガメルを出費しなければならない。趣味や嗜好品が消費できない環境であれば、翌日の朝まで最大HP、最大MPが「冒険者レベル」点減少する。",
+            "「つきまとう」　携行時　この武具が気がつけば身の回りにある。この武具以外での命中力判定、魔法行使判定（武器）、回避力判定（鎧、盾）に-4のペナルティ修正を受ける。",
+            "「のろまな」　携行時　戦闘開始処理の「戦闘準備」をいっさい行えなくなる。",
+          ],
+        ]
+      )
+
+      ABYSS_CURSE_CATEGORY_TABLE = DiceTable::D66ParityTable.new(
+        "アビスカース分類決定表",
+        ["蛮族", "動物", "植物", "アンデッド", "魔法生物", "「蛮族」「動物」「植物」「アンデッド」「魔法生物」から任意"],
+        ["魔動機", "幻獣", "妖精", "魔神", "人族", "「魔動機」「幻獣」「妖精」「魔神」「人族」から任意"]
+      )
+
+      ABYSS_CURSE_ATTR_TABLE = DiceTable::D66ParityTable.new(
+        "アビスカース属性決定表",
+        ["土", "水・氷", "炎", "風", "雷", "純粋エネルギー"],
+        ["断空", "衝撃", "毒", "病気", "呪い", "精神効果"]
+      )
+
+      def eval_game_system_specific_command(command)
+        case command
+        when /^dru\[(\d+),(\d+),(\d+)\]/i
+          power_list = Regexp.last_match.captures.map(&:to_i)
+          druid_parser = Command::Parser.new(/dru\[\d+,\d+,\d+\]/i, round_type: BCDice::RoundType::CEIL)
+
+          cmd = druid_parser.parse(command)
+          unless cmd
+            return nil
+          end
+
+          druid_dice(cmd, power_list)
+        when 'ABT'
+          get_abyss_curse_table
+        else
+          super(command)
         end
       end
 
-      def getRatingCommandStrings
-        super + "aA"
-      end
-
-      def getAdditionalString(string, output)
-        output, values = super(string, output)
-
-        keptDiceChangeModify, = getKeptDiceChangesFromString(string)
-
-        values['keptDiceChangeModify'] = keptDiceChangeModify
-        output += "a[#{keptDiceChangeModify}]" if keptDiceChangeModify != 0
-
-        return output, values
+      def rating_parser
+        return RatingParser.new(version: :v2_5)
       end
 
-      def getAdditionalDiceValue(dice, values)
-        keptDiceChangeModify = values['keptDiceChangeModify'].to_i
-
-        value = 0
-        value += keptDiceChangeModify.to_i if (keptDiceChangeModify != 0) && (dice != 2)
-
-        return value
+      def druid_dice(command, power_list)
+        dice_list = @randomizer.roll_barabara(2, 6)
+        dice_total = dice_list.sum()
+        offset =
+          case dice_total
+          when 2..6
+            0
+          when 7..9
+            1
+          when 10..12
+            2
+          end
+        power = power_list[offset]
+        total = power + command.modify_number
+        sequence = [
+          "(#{command.command.capitalize}#{Format.modifier(command.modify_number)})",
+          "2D[#{dice_list.join(',')}]=#{dice_total}",
+          "#{power}#{Format.modifier(command.modify_number)}",
+          total
+        ]
+
+        return sequence.join(" ＞ ")
       end
 
-      def getKeptDiceChangesFromString(string)
-        keptDiceChangeModify = 0
-        regexp = /a\[([+\-]\d+)\]/i
-        if regexp =~ string
-          keptDiceChangeModify = Regexp.last_match(1)
-          string = string.gsub(regexp, '')
-        end
-        return keptDiceChangeModify, string
+      def get_abyss_curse_table
+        table_result = ABYSS_CURSE_TABLE.roll(@randomizer)
+        additional =
+          case table_result.value
+          when 14  # 「差別の」における分類決定表
+            ABYSS_CURSE_CATEGORY_TABLE.roll(@randomizer).to_s
+          when 25  # 「過敏な」における属性決定表
+            ABYSS_CURSE_ATTR_TABLE.roll(@randomizer).to_s
+          end
+        final_result = [
+          table_result.to_s,
+          additional,
+        ].compact
+
+        return final_result.join("\n")
       end
     end
   end

data/lib/bcdice/game_system/Torg.rb

@@ -28,7 +28,7 @@ module BCDice
         　・ボーナス表「BTx+y or BONUSx+y or TOTALx+y」 xは数値, yは技能基本値
       INFO_MESSAGE_TEXT
 
-      register_prefix('TG.*', '1R20.*', 'RT.*', 'Result.*', 'IT.*', 'Initimidate.*', 'TT.*', 'Taunt.*', 'Trick.*', 'CT.*', 'MT.*', 'Maneuver.*', 'ODT.*', 'ords.*', 'odamage.*', 'DT.*', 'damage.*', 'BT.*', 'bonus.*', 'total.*')
+      register_prefix('TG', '1R20', 'RT', 'Result', 'IT', 'Intimidate', 'Test', 'TT', 'Taunt', 'Trick', 'CT', 'MT', 'Maneuver', 'ODT', 'ords', 'odamage', 'DT', 'damage', 'BT', 'bonus', 'total')
 
       def replace_text(string)
         string = string.gsub(/Result/i, 'RT')

data/lib/bcdice/game_system/TorgEternity.rb

@@ -41,7 +41,7 @@ module BCDice
         　・ダメージ結果表「DTx or DAMAGEx」
         　・ロールボーナス表「BTx+y or BONUSx+y or TOTALx+y」 xは数値, yは技能基本値
       INFO_MESSAGE_TEXT
-      register_prefix('TE.*', 'UP.*', 'POS.*', '\d+BD.*', 'TG.*', 'RT.*', 'Result.*', 'DT.*', 'damage.*', 'BT.*', 'bonus.*', 'total.*', '1R20.*')
+      register_prefix('TE', 'UP', 'POS', '\d+BD', 'TG', 'RT', 'Result', 'DT', 'damage', 'BT', 'bonus', 'total', '1R20')
 
       def eval_game_system_specific_command(command)
         torg_check(command) ||
@@ -229,7 +229,7 @@ module BCDice
       # ロールボーナス表コマンド
       def getRollBonusDiceCommandResult(command)
         debug("TorgEternity Roll Bonus Table Command ? ", command)
-        m = /(BT|Bonus)(\d+)(([+\-]\d+)*)/i.match(command)
+        m = /(BT|Bonus|Total)(\d+)(([+\-]\d+)*)/i.match(command)
         unless m
           return nil
         end

data/lib/bcdice/game_system/TunnelsAndTrolls.rb

@@ -30,7 +30,7 @@ module BCDice
         　下から２番目の出目をずらした分だけ合計にマイナス修正を追加して表示します。
       INFO_MESSAGE_TEXT
 
-      register_prefix('\d+H?BS.*', '\d+R6.*', '\d+D\d+.+', '\dD6.*')
+      register_prefix('\d+H?BS', '\d+R6', '\d+D\d+.+', '\dD6')
 
       def initialize(command)
         super(command)