bcdice 3.0.0.pre.alpha.1

data/lib/bcdice/game_system/TokumeiTenkousei.rb

@@ -0,0 +1,96 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class TokumeiTenkousei < Base
+      # ゲームシステムの識別子
+      ID = 'TokumeiTenkousei'
+
+      # ゲームシステム名
+      NAME = '特命転攻生'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'とくめいてんこうせい'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~HELP
+        ・判定 (xD6+y>=n)
+        　ゾロ目での自動振り足し
+        　1の出目に応じてEPPの獲得量を表示
+        　目標値 "?" には未対応
+      HELP
+
+      def initialize(command)
+        super(command)
+
+        @sort_add_dice = true
+      end
+
+      register_prefix(['\d+D6.*'])
+
+      def eval_game_system_specific_command(command)
+        parser = CommandParser.new(/^\d+D6$/)
+        cmd = parser.parse(command)
+        unless cmd
+          return nil
+        end
+
+        times = cmd.command.to_i
+
+        dice_list = @randomizer.roll_barabara(times, 6).sort
+        @dice_list = [dice_list]
+        while same_all_dice?(dice_list)
+          dice_list = @randomizer.roll_barabara(times, 6).sort
+          @dice_list.push(dice_list)
+        end
+
+        dice_list_flatten = @dice_list.flatten
+        dice_total = dice_list_flatten.sum()
+        count_one = dice_list_flatten.count(1)
+
+        total = dice_total + cmd.modify_number
+
+        result =
+          if cmd.cmp_op
+            total.send(cmd.cmp_op, cmd.target_number) ? "成功" : "失敗"
+          end
+
+        sequence = [
+          "(#{cmd})",
+          interim_expr(cmd, dice_total),
+          total.to_s,
+          result,
+          epp(count_one)
+        ].compact
+
+        return sequence.join(" ＞ ")
+      end
+
+      # 出目が全て同じか
+      def same_all_dice?(dice_list)
+        dice_list.size > 1 && dice_list.uniq.size == 1
+      end
+
+      def interim_expr(cmd, dice_total)
+        if @dice_list.flatten.size == 1 && cmd.modify_number == 0
+          return nil
+        end
+
+        dice_list = @dice_list.map { |ds| "[#{ds.join(',')}]" }.join("")
+        modifier = Format.modifier(cmd.modify_number)
+
+        return [dice_total.to_s, dice_list, modifier].join("")
+      end
+
+      # エキストラパワーポイント獲得
+      #
+      # @param count_one [Integer]
+      # @return [String, nil]
+      def epp(count_one)
+        if count_one > 0
+          "#{count_one * 5}EPP獲得"
+        end
+      end
+    end
+  end
+end

data/lib/bcdice/game_system/TokyoGhostResearch.rb

@@ -0,0 +1,122 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class TokyoGhostResearch < Base
+      # ゲームシステムの識別子
+      ID = 'TokyoGhostResearch'
+
+      # ゲームシステム名
+      NAME = '東京ゴーストリサーチ'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'とうきようこおすとりさあち'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~MESSAGETEXT
+        判定
+        ・タスク処理は目標値以上の値で成功となります。
+          1d10>={目標値}
+          例：目標値「5」の場合、5～0で成功
+        各種表
+          ・導入表  OP
+          ・一般トラブル表  TB
+      MESSAGETEXT
+
+      # ダイスボットで使用するコマンドを配列で列挙する
+      register_prefix([
+        'OP', 'TB', 'TK?\(\d+\)'
+      ])
+
+      def eval_game_system_specific_command(command)
+        output =
+          case command.upcase
+
+          when /TK/i
+            return getCheckResult(command)
+
+          when 'OP'
+            tgr_opening_table
+          when 'TB'
+            tgr_common_trouble_table
+          end
+
+        return output
+      end
+
+      def getCheckResult(command)
+        output = ""
+        diff = 0
+
+        if /TK?<=(\d+)/i =~ command
+          diff = Regexp.last_match(2).to_i
+        end
+
+        if diff > 0
+          output += "(1D10<=#{diff})"
+
+          total_n = @randomizer.roll_once(10)
+          output += ' ＞ ' + total_n.to_s
+          output += ' ＞ ' + getCheckResultText(total_n, diff)
+        end
+        return output
+      end
+
+      def getCheckResultText(total_n, diff)
+        if total_n >= diff
+          result = "成功"
+        else
+          result = "失敗"
+        end
+
+        return result
+      end
+
+      # 導入表(1d10)[OP]
+      def tgr_opening_table
+        name = "導入表"
+        table = [
+          [1, "【病休中断】体調不良または怪我で療養中だったが強制召喚された。"],
+          [2, "【忙殺中】別の業務で忙殺中であった。"],
+          [3, "【出張帰り】遠方での仕事から戻ったばかり。"],
+          [4, "【休暇取り消し】休暇中だったが呼び戻された。"],
+          [5, "【平常運転】いつもどおりの仕事中だった。"],
+          [6, "【休暇明け】十分に休養をとったあとで、心身ともに充実している。"],
+          [7, "【人生の岐路】人生の岐路にまさに差し掛かったところであった。"],
+          [8, "【同窓会】かつての同級生に会い、差を実感したばかりだった。"],
+          [9, "【転職活動中】転職を考えて求人サイトを見ているところだった。"],
+          [10, "【サボリ中】仕事をサボっているところに呼び出しがあった。"],
+        ]
+        return get_1d10_table_result(name, table)
+      end
+
+      # 一般トラブル表(1d10)[TB]
+      def tgr_common_trouble_table
+        name = "一般トラブル表"
+        table = [
+          [1, "トラブルが生じたが、間一髪、危機を脱した。【ダメージなし】"],
+          [2, "どうにかタスクを処理したが、非常に疲労してしまった。【肉体ダメージ1点】"],
+          [3, "タスク処理の過程で負傷してしまった。【肉体ダメージ1点】"],
+          [4, "恐怖や混乱、ストレスなどで精神の均衡を崩してしまった。【精神ダメージ1点】"],
+          [5, "過去のトラウマなどを思い出し、気分が沈んでしまった。【精神ダメージ1点】"],
+          [6, "自身の信用をキズつけたり、汚名を背負ってしまった。【環境ダメージ1点】"],
+          [7, "会社や上司の不興を買ってしまった。【環境ダメージ1点】"],
+          [8, "疲労困憊で動くこともままならない。【肉体ダメージ1点＋精神ダメージ1点】"],
+          [9, "負傷したうえ、会社に損害を与えてしまった。【肉体ダメージ1点＋環境ダメージ1点】"],
+          [10, "上司から厳しく叱責され、まずい立場になった。【精神ダメージ1点＋環境ダメージ1点】"],
+        ]
+        return get_1d10_table_result(name, table)
+      end
+
+      def get_1d10_table_result(name, table)
+        dice = @randomizer.roll_once(10)
+        output = get_table_by_number(dice, table)
+        return get_table_result(name, dice, output)
+      end
+
+      def get_table_result(name, dice, output)
+        return "#{name}(#{dice}) ＞ #{output}"
+      end
+    end
+  end
+end

data/lib/bcdice/game_system/TokyoNova.rb

@@ -0,0 +1,19 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class TokyoNova < Base
+      # ゲームシステムの識別子
+      ID = 'TokyoNova'
+
+      # ゲームシステム名
+      NAME = 'トーキョーN◎VA'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'とおきよおのは'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = "※このダイスボットは部屋のシステム名表示用となります。\n"
+    end
+  end
+end

data/lib/bcdice/game_system/Torg.rb

@@ -0,0 +1,364 @@
+# frozen_string_literal: true
+
+module BCDice
+  module GameSystem
+    class Torg < Base
+      # ゲームシステムの識別子
+      ID = 'TORG'
+
+      # ゲームシステム名
+      NAME = 'トーグ'
+
+      # ゲームシステム名の読みがな
+      SORT_KEY = 'とおく'
+
+      # ダイスボットの使い方
+      HELP_MESSAGE = <<~INFO_MESSAGE_TEXT
+        ・判定　(TGm)
+        　TORG専用の判定コマンドです。
+        　"TG(技能基本値)"でロールします。Rコマンドに読替されます。
+        　振り足しを自動で行い、20の出目が出たときには技能無し値も並記します。
+        ・各種表　"(表コマンド)(数値)"で振ります。
+        　・一般結果表 成功度出力「RTx or RESULTx」
+        　・威圧/威嚇 対人行為結果表「ITx or INTIMIDATEx or TESTx」
+        　・挑発/トリック 対人行為結果表「TTx or TAUNTx or TRICKx or CTx」
+        　・間合い 対人行為結果表「MTx or MANEUVERx」
+        　・オーズ（一般人）ダメージ　「ODTx or ORDSx or ODAMAGEx」
+        　・ポシビリティー能力者ダメージ「DTx or DAMAGEx」
+        　・ボーナス表「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.*'])
+
+      def replace_text(string)
+        string = string.gsub(/Result/i, 'RT')
+        string = string.gsub(/(Intimidate|Test)/i, 'IT')
+        string = string.gsub(/(Taunt|Trick|CT)/i, 'TT')
+        string = string.gsub(/Maneuver/i, 'MT')
+        string = string.gsub(/(ords|odamage)/i, 'ODT')
+        string = string.gsub(/damage/i, 'DT')
+        string = string.gsub(/(bonus|total)/i, 'BT')
+        string = string.gsub(/TG(\d+)/i) { "1R20+#{Regexp.last_match(1)}" }
+        string = string.gsub(/TG/i, '1R20')
+
+        return string
+      end
+
+      ####################              TORG             ########################
+      def torg_check(string)
+        unless /(^|\s)S?(1R20([+-]\d+)*)(\s|$)/i =~ string
+          return nil
+        end
+
+        string = Regexp.last_match(2)
+        mod = Regexp.last_match(3)
+
+        debug(mod)
+        mod = ArithmeticEvaluator.eval(mod) if mod
+        debug(mod)
+        mod = mod.to_i
+
+        skilled, unskilled, dice_str = torg_dice
+        sk_bonus = get_torg_bonus(skilled)
+
+        if mod
+          if mod > 0
+            output = "#{sk_bonus}[#{dice_str}]+#{mod}"
+          else
+            output = "#{sk_bonus}[#{dice_str}]#{mod}"
+          end
+        else
+          output = "#{sk_bonus}[#{dice_str}]"
+        end
+
+        output += " ＞ " + (sk_bonus + mod).to_s
+
+        if skilled != unskilled
+          output += "(技能無" + (get_torg_bonus(unskilled) + mod).to_s + ")"
+        end
+
+        output = "(#{string}) ＞ #{output}"
+
+        return output
+      end
+
+      def torg_dice
+        isSkilledCritical = true
+        isCritical = true
+        skilled = 0
+        unskilled = 0
+        dice_str = ""
+
+        while isSkilledCritical
+          dice_n = @randomizer.roll_once(20)
+          skilled += dice_n
+          unskilled += dice_n if isCritical
+
+          dice_str += "," unless dice_str.empty?
+          dice_str += dice_n.to_s
+
+          if dice_n == 20
+            isCritical = false
+          elsif dice_n != 10
+            isSkilledCritical = false
+            isCritical = false
+          end
+        end
+
+        return skilled, unskilled, dice_str
+      end
+
+      def eval_game_system_specific_command(command)
+        string = command.upcase
+        string = replace_text(string)
+
+        if (result = torg_check(string))
+          return result
+        end
+
+        output = '1'
+        ttype = ""
+        value = 0
+
+        return nil unless /([RITMDB]T)(\d+([\+\-]\d+)*)/i =~ string
+
+        type = Regexp.last_match(1)
+        num = Regexp.last_match(2)
+
+        case type
+        when 'RT'
+          value = ArithmeticEvaluator.eval(num)
+          output = get_torg_success_level(value)
+          ttype = '一般結果'
+        when 'IT'
+          value = ArithmeticEvaluator.eval(num)
+          output = get_torg_interaction_result_intimidate_test(value)
+          ttype = '威圧/威嚇'
+        when 'TT'
+          value = ArithmeticEvaluator.eval(num)
+          output = get_torg_interaction_result_taunt_trick(value)
+          ttype = '挑発/トリック'
+        when 'MT'
+          value = ArithmeticEvaluator.eval(num)
+          output = get_torg_interaction_result_maneuver(value)
+          ttype = '間合い'
+        when 'DT'
+          value = ArithmeticEvaluator.eval(num)
+          if string =~ /ODT/i
+            output = get_torg_damage_ords(value)
+            ttype = 'オーズダメージ'
+          else
+            output = get_torg_damage_posibility(value)
+            ttype = 'ポシビリティ能力者ダメージ'
+          end
+        when 'BT'
+          output, value = get_torg_bonus_text(num)
+          ttype = 'ボーナス'
+        end
+
+        if ttype != ''
+          output = "#{ttype}表[#{value}] ＞ #{output}"
+        end
+
+        return output
+      end
+
+      # 一般結果表 成功度
+      def get_torg_success_level(value)
+        success_table = [
+          [0, "ぎりぎり"],
+          [1, "ふつう"],
+          [3, "まあよい"],
+          [7, "かなりよい"],
+          [12, "すごい"]
+        ]
+
+        return get_torg_table_result(value, success_table)
+      end
+
+      # 対人行為結果表
+      # 威圧／威嚇(intimidate/Test)
+      def get_torg_interaction_result_intimidate_test(value)
+        interaction_results_table = [
+          [0, "技能なし"],
+          [5, "萎縮"],
+          [10, "逆転負け"],
+          [15, "モラル崩壊"],
+          [17, "プレイヤーズコール"]
+        ]
+
+        return get_torg_table_result(value, interaction_results_table)
+      end
+
+      # 挑発／トリック(Taunt/Trick)
+      def get_torg_interaction_result_taunt_trick(value)
+        interaction_results_table = [
+          [0, "技能なし"],
+          [5, "萎縮"],
+          [10, "逆転負け"],
+          [15, "高揚／逆転負け"],
+          [17, "プレイヤーズコール"]
+        ]
+
+        return get_torg_table_result(value, interaction_results_table)
+      end
+
+      # 間合い(maneuver)
+      def get_torg_interaction_result_maneuver(value)
+        interaction_results_table = [
+          [0, "技能なし"],
+          [5, "疲労"],
+          [10, "萎縮／疲労"],
+          [15, "逆転負け／疲労"],
+          [17, "プレイヤーズコール"]
+        ]
+
+        return get_torg_table_result(value, interaction_results_table)
+      end
+
+      def get_torg_table_result(value, table)
+        output = '1'
+
+        table.each do |item|
+          item_index = item[0]
+
+          if item_index > value
+            break
+          end
+
+          output = item[1]
+        end
+
+        return output
+      end
+
+      # オーズダメージチャート
+      def get_torg_damage_ords(value)
+        damage_table_ords = [
+          [0, "1"],
+          [1, "O1"],
+          [2, "K1"],
+          [3, "O2"],
+          [4, "O3"],
+          [5, "K3"],
+          [6, "転倒 K／O4"],
+          [7, "転倒 K／O5"],
+          [8, "1レベル負傷  K／O7"],
+          [9, "1レベル負傷  K／O9"],
+          [10, "1レベル負傷  K／O10"],
+          [11, "2レベル負傷  K／O11"],
+          [12, "2レベル負傷  KO12"],
+          [13, "3レベル負傷  KO13"],
+          [14, "3レベル負傷  KO14"],
+          [15, "4レベル負傷  KO15"]
+        ]
+
+        return get_torg_damage(value,
+                               4,
+                               "レベル負傷  KO15",
+                               damage_table_ords)
+      end
+
+      # ポシビリティー能力者ダメージチャート
+      def get_torg_damage_posibility(value)
+        damage_table_posibility = [
+          [0, "1"],
+          [1, "1"],
+          [2, "O1"],
+          [3, "K2"],
+          [4, "2"],
+          [5, "O2"],
+          [6, "転倒 O2"],
+          [7, "転倒 K2"],
+          [8, "転倒 K2"],
+          [9, "1レベル負傷  K3"],
+          [10, "1レベル負傷  K4"],
+          [11, "1レベル負傷  O4"],
+          [12, "1レベル負傷  K5"],
+          [13, "2レベル負傷  O4"],
+          [14, "2レベル負傷  KO5"],
+          [15, "3レベル負傷  KO5"]
+        ]
+
+        return get_torg_damage(value,
+                               3,
+                               "レベル負傷  KO5",
+                               damage_table_posibility)
+      end
+
+      def get_torg_damage(value, maxDamage, maxDamageString, damage_table)
+        if value < 0
+          return '1'
+        end
+
+        table_max_value = damage_table.length - 1
+
+        if value <= table_max_value
+          return get_torg_table_result(value, damage_table)
+        end
+
+        over_kill_damage = ((value - table_max_value) / 2).to_i
+        return "" + (over_kill_damage + maxDamage).to_s + maxDamageString
+      end
+
+      def get_torg_bonus_text(num)
+        val_arr = num.split(/\+/)
+        value = val_arr.shift.to_i
+
+        mod = ArithmeticEvaluator.eval(val_arr.join('+'))
+        resultValue = get_torg_bonus(value)
+
+        debug('TORG BT resultValue', resultValue)
+        debug('TORG BT mod', mod)
+
+        if mod == 0
+          output = resultValue.to_s
+        else
+          output = getTorgBonusOutputTextWhenModDefined(value, resultValue, mod)
+          value = "#{value}+#{mod}"
+        end
+
+        return output, value
+      end
+
+      def getTorgBonusOutputTextWhenModDefined(value, resultValue, mod)
+        debug('getTorgBonusOutputTextWhenModDefined value, mod', value, mod)
+        if mod > 0
+          return "#{resultValue}[#{value}]+#{mod} ＞ #{resultValue + mod}"
+        else
+          debug('resultValue', resultValue)
+          debug('mod', mod)
+          return "#{resultValue}[#{value}]#{mod} ＞ #{resultValue + mod}"
+        end
+      end
+
+      def get_torg_bonus(value)
+        bonus_table = [
+          [1, -12],
+          [2, -10],
+          [3, -8],
+          [5, -5],
+          [7, -2],
+          [9, -1],
+          [11, 0],
+          [13, 1],
+          [15, 2],
+          [16, 3],
+          [17, 4],
+          [18, 5],
+          [19, 6],
+          [20, 7]
+        ]
+
+        bonus = get_torg_table_result(value, bonus_table)
+
+        if value > 20
+          over_value_bonus = ((value - 21) / 5).to_i + 1
+          bonus += over_value_bonus
+        end
+
+        return bonus
+      end
+    end
+  end
+end