bcdice/BCDice

# frozen_string_literal: true

require "bcdice/game_system/cyberpunk_red/tables"

module BCDice
  module GameSystem
    class CyberpunkRed < Base
      # ゲームシステムの識別子
      ID = 'CyberpunkRed'

      # ゲームシステム名
      NAME = 'サイバーパンクRED'

      # ゲームシステム名の読みがな
      SORT_KEY = 'さいはあはんくれつと'

      # ダイスボットの使い方
      HELP_MESSAGE = <<~HELP
        ・判定　CPx+y>z
        　(x＝能力値と技能値の合計、y＝修正値、z＝難易度 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
      HELP

      # 判定の正規表現
      CP_RE = /^CP(?<ability>\d+)?(?<modifier>[+-]\d+)?(?<target>>=\d+)?/.freeze

      def initialize(command)
        super(command)

        @sort_add_dice = false
        @d66_sort_type = D66SortType::NO_SORT
      end

      def eval_game_system_specific_command(command)
        debug("eval_game_system_specific_command begin string", command)

        cp_roll_result(command) || roll_tables(command, TABLES)
      end

      private_constant :CP_RE

      def cp_roll_result(command)
        parser = Command::Parser.new('CP', round_type: RoundType::FLOOR)
                                .enable_suffix_number
                                .restrict_cmp_op_to(nil, :>)
        parsed = parser.parse(command)
        return nil if parsed.nil?

        dice_cnt = 1
        dice_face = 10
        modify_number = 0
        total = 0

        result = Result.new

        dices = [@randomizer.roll_once(dice_face)]
        total += dices.first
        modify_number += parsed.suffix_number if parsed.suffix_number
        modify_number += parsed.modify_number if parsed.modify_number
        total += modify_number

        case dices.first
        when 10 # critical
          dices << @randomizer.roll_once(dice_face)
          total += dices.last
          result.critical = true
        when 1 # fumble
          dices << @randomizer.roll_once(dice_face)
          total -= dices.last
          result.fumble = true
        end

        if parsed.target_number
          result.condition = total > parsed.target_number
        end

        result.text = "(#{dice_cnt}D#{dice_face}#{Format.modifier(modify_number)}#{parsed.cmp_op}#{parsed.target_number})"
        result.text += ' ＞ '
        result.text += "#{dices.first}[#{dices.first}]#{Format.modifier(modify_number)}"
        result.text += ' ＞ '

        if result.critical?
          result.text += '決定的成功！ ＞ '
          result.text += "#{dices.last}[#{dices.last}] ＞ "
        end
        if result.fumble?
          result.text += '決定的失敗！ ＞ '
          result.text += "#{dices.last}[#{dices.last}] ＞ "
        end

        result.text += total.to_s

        if result.success?
          result.text += ' ＞ 成功'
        end
        if result.failure?
          result.text += ' ＞ 失敗'
        end

        return result
      end

      register_prefix('CP', TABLES.keys)
    end
  end
end