bcdice 3.0.0.pre.alpha.1 → 3.1.0

data/lib/bcdice/game_system/AngelGear.rb

@@ -0,0 +1,123 @@
+# frozen_string_literal: true
+
+require "bcdice/dice_table/table"
+require "bcdice/dice_table/d66_grid_table"
+require "bcdice/arithmetic"
+
+module BCDice
+  module GameSystem
+    class AngelGear < Base
+      # ゲームシステムの識別子
+      ID = 'AngelGear'
+
+      # ゲームシステム名
+      NAME = 'エンゼルギア 天使大戦TRPG The 2nd Editon'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'エンセルキア2'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~MESSAGETEXT
+        ・判定　nAG[s][±a]
+        []内は省略可能。
+        n:判定値
+        s:技能値
+        a:修正
+        （例）
+        12AG 10AG3±20
+
+        ・感情表　ET
+      MESSAGETEXT
+
+      def initialize(command)
+        super(command)
+
+        @sort_barabara_dice = true # バラバラロール（Bコマンド）でソート有
+      end
+
+      def eval_game_system_specific_command(command)
+        if (m = /^(\d+)AG(\d+)?(([+\-]\d+)*)$/.match(command))
+          resolute_action(m[1].to_i, m[2]&.to_i, m[3], command)
+        else
+          roll_tables(command, TABLES)
+        end
+      end
+
+      def resolute_action(num_dice, skill_value, modify, command)
+        dice = @randomizer.roll_barabara(num_dice, 6).sort
+        dice_text = dice.join(",")
+        modify_n = 0
+        success = 0
+
+        if skill_value
+          success = dice.count { |val| val <= skill_value }
+          modify_n = Arithmetic.eval(modify, RoundType::FLOOR) unless modify.empty?
+        end
+
+        output = "(#{command}) ＞ #{success}[#{dice_text}]#{format('%+d', modify_n)} ＞ 成功数: #{success + modify_n}"
+        if success + modify_n >= 100
+          output += "(福音発生)"
+        end
+        return output
+      end
+
+      TABLES = {
+        'ET' => DiceTable::D66GridTable.new(
+          '感情表',
+          [
+            [
+              '好奇心（好奇心）',
+              '憧れ（あこがれ）',
+              '尊敬（そんけい）',
+              '仲間意識（なかまいしき）',
+              '母性愛（ぼせいあい）',
+              '感心（かんしん）'
+            ],
+            [
+              '純愛（じゅんあい）',
+              '友情（ゆうじょう）',
+              '同情（どうじょう）',
+              '父性愛（ふせいあい）',
+              '幸福感（こうふくかん）',
+              '信頼（しんらい）'
+            ],
+            [
+              '競争心（きょうそうしん）',
+              '親近感（しんきんかん）',
+              'まごころ',
+              '好意（こうい）',
+              '有為（ゆうい）',
+              '崇拝（すうはい）'
+            ],
+            [
+              '大嫌い（だいきらい）',
+              '妬み（ねたみ）',
+              '侮蔑（ぶべつ）',
+              '腐れ縁（くされえん）',
+              '恐怖（きょうふ）',
+              '劣等感（れっとうかん）'
+            ],
+            [
+              '偏愛（へんあい）',
+              '寂しさ（さびしさ）',
+              '憐憫（れんびん）',
+              '闘争心（とうそうしん）',
+              '食傷（しょくしょう）',
+              '嘘つき（うそつき）'
+            ],
+            [
+              '甘え（あまえ）',
+              '苛立ち（いらだち）',
+              '下心（したごころ）',
+              '憎悪（ぞうお）',
+              '疑惑（ぎわく）',
+              '支配（しはい）'
+            ],
+          ]
+        )
+      }.freeze
+
+      register_prefix('(\d+)AG(\d+)?(([\+\-]\d+)*)', TABLES.keys)
+    end
+  end
+end

data/lib/bcdice/game_system/AnimaAnimus.rb

@@ -31,13 +31,9 @@ module BCDice
         　情報収集表　IGT/喪失表　LT
       MESSAGETEXT
 
-      def initialize(command)
-        super(command)
-      end
-
       def eval_game_system_specific_command(command)
         case command
-        when /(\d+)AN<=(\d+([\+\-]\d+)*)/i
+        when /(\d+)AN<=(\d+([+\-]\d+)*)/i
           return check_action(Regexp.last_match)
         else
           return roll_tables(command, TABLES)
@@ -90,7 +86,7 @@ module BCDice
       }.freeze
 
       # ダイスボットで使用するコマンドを配列で列挙する
-      register_prefix(['\d+AN<=\d([\+\-]\d+)*'] + TABLES.keys)
+      register_prefix('\d+AN<=\d([\+\-]\d+)*', TABLES.keys)
     end
   end
 end

data/lib/bcdice/game_system/Arianrhod.rb

@@ -22,7 +22,6 @@ module BCDice
         super(command)
 
         @sort_add_dice = true
-        @enabled_d66 = true
         @d66_sort_type = D66SortType::NO_SORT
       end
 

data/lib/bcdice/game_system/ArsMagica.rb

@@ -26,7 +26,7 @@ module BCDice
         　　最初の0が判断基準で、その右側5つがボッチダイスです。1*2,8*2,0*1なので1botchという訳です。
       INFO_MESSAGE_TEXT
 
-      register_prefix(['ArS.*', '1R10.*'])
+      register_prefix('ArS', '1R10')
 
       def eval_game_system_specific_command(string)
         unless parse_ars(string) || parse_1r10(string)

data/lib/bcdice/game_system/Avandner.rb

@@ -34,7 +34,7 @@ module BCDice
         ・8av4*7+10 → 8d10で目標値4、攻撃力7、クリティカルトリガー10の命中判定。
       MESSAGETEXT
 
-      register_prefix(['\d+AV\d+((x|\*)\d+(\+\d+)?)?(c\d+)?'])
+      register_prefix('\d+AV\d+((x|\*)\d+(\+\d+)?)?(c\d+)?')
 
       def initialize(command)
         super(command)

data/lib/bcdice/game_system/BBN.rb

@@ -1,16 +1,18 @@
+# frozen_string_literal: true
+
 module BCDice
   module GameSystem
     class BBN < Base
       # ダイスボットで使用するコマンドを配列で列挙する
-      register_prefix(['\d+BN.*'])
+      register_prefix('\d+BN')
 
-      ID = 'BBN'.freeze
+      ID = 'BBN'
 
-      NAME = 'BBNTRPG'.freeze
+      NAME = 'BBNTRPG'
 
-      SORT_KEY = 'ひいひいえぬTRPG'.freeze
+      SORT_KEY = 'ひいひいえぬTRPG'
 
-      HELP_MESSAGE = <<~MESSAGETEXT.freeze
+      HELP_MESSAGE = <<~MESSAGETEXT
         ・判定(xBN±y>=z[c,f])
         　xD6の判定。クリティカル、ファンブルの自動判定を行います。
         　1Dのクリティカル値とファンブル値は1。2Dのクリティカル値とファンブル値は2。

data/lib/bcdice/game_system/BadLife.rb

@@ -41,7 +41,7 @@ module BCDice
         ・スキル表：SKL
       MESSAGETEXT
 
-      register_prefix(['\d?(BAD|BL|GL).*', '[TDGKSB]RN', 'SKL'])
+      register_prefix('\d?(BAD|BL|GL)', '[TDGKSB]RN', 'SKL')
 
       def eval_game_system_specific_command(command)
         command = command.upcase
@@ -65,7 +65,7 @@ module BCDice
       end
 
       def judgeDice(command)
-        unless (m = /(\d+)?(BAD|BL|GL)([-+\d]*)((C|F)([-+\d]*)?)?((C|F)([-+\d]*))?(\@([-+\d]*))?(\!(\D*))?/i.match(command))
+        unless (m = /(\d+)?(BAD|BL|GL)([-+\d]*)((C|F)([-+\d]*)?)?((C|F)([-+\d]*))?(@([-+\d]*))?(!(\D*))?/i.match(command))
           return nil
         end
 

data/lib/bcdice/game_system/BarnaKronika.rb

@@ -26,7 +26,7 @@ module BCDice
         　セット数が1以上の時はセット数も表示し、攻撃判定の場合は命中部位も表示します。
       INFO_MESSAGE_TEXT
 
-      register_prefix(['\d+BK.*', '\d+BA.*', '\d+BKC\d+.*', '\d+BAC\d+.*', '\d+R6.*'])
+      register_prefix('\d+BK', '\d+BA', '\d+BKC\d+', '\d+BAC\d+', '\d+R6')
 
       def initialize(command)
         super(command)

data/lib/bcdice/game_system/BeastBindTrinity.rb

@@ -6,15 +6,6 @@ require 'bcdice/normalize'
 require 'bcdice/dice_table/table'
 require 'bcdice/dice_table/d66_grid_table'
 
-# ビーストバインド トリニティのダイスボット
-#
-# = 前ver(1.43.07)からの変更・修正
-# * nBBで判定を行う際、「ダイスを１個しか振らない場合」の達成値計算が正しくなかった誤りを修正。
-# * @x(クリティカル値指定)、を加減式で入力できるように仕様変更。クリティカル値は、加減式での入力なら%w(人間性からのクリティカル値計算)と併用可能に。
-# * #y(ファンブル値指定)を加減式で入力できるように仕様変更。また、「ファンブルしても達成値が0にならない」モード#Ayを追加。
-# * &v(出目v未満のダイスを出目vとして扱う)のモードを追加。2018年12月現在、ゲーマーズ・フィールド誌先行収録データでのみ使用するモードです。
-# * 「暴露表」および「正体判明チャート」をダイスボットに組み込み。
-# * どどんとふ以外のボーンズ＆カーズを用いたオンラインセッション用ツールにあわせ、ヘルプメッセージ部分からイニシアティブ表についての言及を削除。
 module BCDice
   module GameSystem
     class BeastBindTrinity < Base
@@ -63,7 +54,6 @@ module BCDice
       def initialize(command)
         super(command)
 
-        @enabled_d66 = true
         @d66_sort_type = D66SortType::ASC
       end
 
@@ -86,7 +76,7 @@ module BCDice
           end
 
           dice_list_filtered = dice_list_org.map { |dice| [dice, @dice_value_lower_limit].max }.sort
-          @dice_total = dice_list_filtered.inject(0, :+)
+          @dice_total = dice_list_filtered.last(2).inject(0, :+)
 
           total = calc_total()
 
@@ -107,7 +97,7 @@ module BCDice
         private
 
         def parse()
-          m = /^(\d+)(?:R6|BB6?)((?:[\+\-]\d+)+)?(?:%(\-?\d+))?(?:@([\+\-\d]+))?(?:#(A)?([\+\-\d]+))?(?:\$([1-6]+))?(?:&([1-6]))?(?:([>=]+)(\d+))?$/.match(@command)
+          m = /^(\d+)(?:R6|BB6?)((?:[+\-]\d+)+)?(?:%(-?\d+))?(?:@([+\-\d]+))?(?:#(A)?([+\-\d]+))?(?:\$([1-6]+))?(?:&([1-6]))?(?:([>=]+)(\d+))?$/.match(@command)
           unless m
             @parse_error = true
             return
@@ -342,7 +332,7 @@ module BCDice
         ),
       }.freeze
 
-      register_prefix(['\d+BB.*', '\d+R6.*'] + TABLES.keys)
+      register_prefix('\d+BB', '\d+R6', TABLES.keys)
     end
   end
 end

data/lib/bcdice/game_system/BeginningIdol.rb

@@ -54,7 +54,7 @@ module BCDice
         []内は省略可　D66入れ替えあり
       INFO_MESSAGE_TEXT
 
-      register_prefix([
+      register_prefix(
         '[1-7]*PD\d+(?:[\+\-]\d+)?',
         'HW',
         'BWT',
@@ -142,13 +142,12 @@ module BCDice
         'LIT',
         'TIT',
         'CIT'
-      ])
+      )
 
       def initialize(command)
         super(command)
 
         @sort_add_dice = true
-        @enabled_d66 = true
         @d66_sort_type = D66SortType::ASC
       end
 
@@ -171,7 +170,7 @@ module BCDice
 
       def eval_game_system_specific_command(command)
         case command.upcase
-        when /^([1-7]*)PD(\d+)([\+\-]\d+)?$/
+        when /^([1-7]*)PD(\d+)([+\-]\d+)?$/
           counts = Regexp.last_match(2).to_i
           return nil if counts <= 0
 
@@ -1952,7 +1951,7 @@ module BCDice
           ]
           return textFrom1D6Table(title, table)
 
-        when /^(\d+)(S?)A([1-6]*)([\+\-]\d+)?$/
+        when /^(\d+)(S?)A([1-6]*)([+\-]\d+)?$/
           title = '攻撃'
           counts = Regexp.last_match(1).to_i
           return nil if counts <= 0
@@ -2262,7 +2261,7 @@ module BCDice
         return text, skill unless text =~ /チャンスが(\d{1,2})以下ならオフ。/
 
         target = Regexp.last_match(1).to_i
-        matchedText = $&
+        matchedText = Regexp.last_match(0)
 
         if target >= chance.to_i
           text = "オフ"
@@ -2434,7 +2433,7 @@ module BCDice
         end
 
         substitution = text.clone
-        substitution = substitution.gsub($&, '')
+        substitution = substitution.gsub(Regexp.last_match(0), '')
         substitution += "\n" unless substitution.empty? || /\n$/ =~ substitution
 
         return substitution + badStatus(counts)

data/lib/bcdice/game_system/BeginningIdol_Korean.rb

@@ -52,7 +52,7 @@ module BCDice
         []内は省略可　D66 다이스가 존재
       INFO_MESSAGE_TEXT
 
-      register_prefix([
+      register_prefix(
         '[1-7]*PD\d+(?:[\+\-]\d+)?',
         'HW',
         'BWT',
@@ -137,13 +137,12 @@ module BCDice
         'LIT',
         'TIT',
         'CIT'
-      ])
+      )
 
       def initialize(command)
         super(command)
 
         @sort_add_dice = true
-        @enabled_d66 = true
         @d66_sort_type = D66SortType::ASC
       end
 
@@ -166,7 +165,7 @@ module BCDice
 
       def eval_game_system_specific_command(command)
         case command.upcase
-        when /^([1-7]*)PD(\d+)([\+\-]\d+)?$/
+        when /^([1-7]*)PD(\d+)([+\-]\d+)?$/
           counts = Regexp.last_match(2).to_i
           return nil if counts <= 0
 
@@ -1803,7 +1802,7 @@ module BCDice
           ]
           return textFrom1D6Table(title, table)
 
-        when /^(\d+)(S?)A([1-6]*)([\+\-]\d+)?$/
+        when /^(\d+)(S?)A([1-6]*)([+\-]\d+)?$/
           title = '攻撃'
           counts = Regexp.last_match(1).to_i
           return nil if counts <= 0
@@ -2113,7 +2112,7 @@ module BCDice
         return text, skill unless text =~ /チャンスが(\d{1,2})以下なら오프。/
 
         target = Regexp.last_match(1).to_i
-        matchedText = $&
+        matchedText = Regexp.last_match(0)
 
         if target >= chance.to_i
           text = "오프"
@@ -2285,7 +2284,7 @@ module BCDice
         end
 
         substitution = text.clone
-        substitution = substitution.gsub($&, '')
+        substitution = substitution.gsub(Regexp.last_match(0), '')
         substitution += "\n" unless substitution.empty? || /\n$/ =~ substitution
 
         return substitution + badStatus(counts)

data/lib/bcdice/game_system/BladeOfArcana.rb

@@ -32,13 +32,13 @@ module BCDice
         　　例）CTR+→因縁表（R版）を出目2～21でロールする。
       INFO_MESSAGE_TEXT
 
-      register_prefix([
+      register_prefix(
         '\d+A\d*[CF]?\d*[CF]?\d*',
         'CT3[\+\-]?',
         'CTR[\+\-]?',
         'DJV\-?',
         'AKST[\+\-]?'
-      ])
+      )
 
       def initialize(command)
         super(command)
@@ -66,7 +66,7 @@ module BCDice
           end
           return rollAct(counts, judgment, critical, fumble)
 
-        when /^CT3([\+\-]?)$/
+        when /^CT3([+\-]?)$/
           sign = Regexp.last_match(1)
           title = '因縁表(The 3rd)　『BoA3』P292'
           table = [
@@ -95,7 +95,7 @@ module BCDice
           ]
           return tableText(title, table, sign)
 
-        when /^CTR([\+\-]?)$/
+        when /^CTR([+\-]?)$/
           sign = Regexp.last_match(1)
           title = '因縁表(リインカーネイション)　『BAR』P51、299'
           table = [
@@ -124,7 +124,7 @@ module BCDice
           ]
           return tableText(title, table, sign)
 
-        when /^DJV(\-?)$/
+        when /^DJV(-?)$/
           sign = Regexp.last_match(1)
           title = '前世邂逅表（デジャブ）　『BAR』P235'
           table = [
@@ -153,7 +153,7 @@ module BCDice
           ]
           return tableText(title, table, sign)
 
-        when /^AKST([\+\-]?)$/
+        when /^AKST([+\-]?)$/
           sign = Regexp.last_match(1)
           title = '悪徳シーン表　『GoV』P16、164'
           table = [