ATBオプション - 呪文詠唱

［概要］

スクリプト「アクティブタイムバトル」に呪文詠唱待ち機能を追加します。
詠唱ありスキルを使用したキャラクターのCTゲージの色が変化し、
ゲージがMAXになった時点でスキルが発動するようになります。

［スクリプト］

#==============================================================================
#　＋＋　ATBオプション - 呪文詠唱　ver. 1.01　＋＋
#　　Script by パラ犬
#　　http://2d6.parasite.jp/
#------------------------------------------------------------------------------
# スクリプト「アクティブタイムバトル」に呪文詠唱待ち機能を追加します。
#------------------------------------------------------------------------------
#［使う前に］
# データベースで「詠唱中」という名前（設定項目で変更可）のステートを
# 作成してください。
#==============================================================================

module PARA_CTB
  
  SPELL_SPEED=[]#この行は消さないでください

# スキルごとの詠唱速度
  #（「基準能力値×詠唱速度」がゲージの溜まる速さになります）
  #（記述形式は「SPELL_SPEED[（スキルID）] = 数値 」）
  SPELL_SPEED[1] = 5
  SPELL_SPEED[2] = 1
  SPELL_SPEED[3] = 0.5
  SPELL_SPEED[7] = 5
  SPELL_SPEED[8] = 1
  SPELL_SPEED[9] = 0.5
  
  # 基準能力値（詠唱スピードに影響する能力値です）
  # （ 0:魔力 / 1:器用さ / 2:素早さ ）
  SPELL_STATUS_TYPE = 0
  
  # ステート名
  SPELL_STATE_NAME = "詠唱中"

# 詠唱中ゲージの色（グラデーション左端）
  SPELL_COLOR_LEFT = Color.new(128, 0, 255, 255)
  # 詠唱中ゲージの色（グラデーション右端）
  SPELL_COLOR_RIGHT= Color.new(225, 225, 255, 255)
  # 詠唱完了時のゲージの色
  SPELL_COLOR_FULL = Color.new(200, 200, 255, 255)

end

# ↑ 設定項目ここまで
#------------------------------------------------------------------------------

#==============================================================================
# ■ Scene_Battle
#==============================================================================

class Scene_Battle
  #--------------------------------------------------------------------------
  # ● 次のアクターのコマンド入力へ
  #--------------------------------------------------------------------------
  def phase3_next_actor
    # ループ
    begin
      # アクターの明滅エフェクト OFF
      if @active_battler != nil
        @active_battler.blink = false
      end
      # 最後のアクターの場合
      if @actor_array_index + 1 == @pre_action_battlers.size
        # メインフェーズ開始
        start_phase4
        return
      #次がエネミーの場合
      elsif $game_troop.enemies.include?(@pre_action_battlers[@actor_array_index + 1])
        # メインフェーズ開始
        start_phase4
        return
      end
      # アクターのインデックスを進める
      @actor_array_index += 1
      @actor_index = @pre_action_battlers[@actor_array_index].index
      @active_battler = $game_party.actors[@actor_index]
      @active_battler.blink = true
      # 詠唱中はアクションを保持
      if @active_battler.spelling? == false
        @active_battler.current_action.clear
      end
    # アクターがコマンド入力を受け付けない状態ならもう一度
    end until @active_battler.inputable?
    # アクターコマンドウィンドウをセットアップ
    phase3_setup_command_window
  end
  #--------------------------------------------------------------------------
  # ● 前のアクターのコマンド入力へ
  #--------------------------------------------------------------------------
  def phase3_prior_actor
    # ループ
    begin
      # アクターの明滅エフェクト OFF
      if @active_battler != nil
        @active_battler.blink = false
      end
      # 最初のアクターの場合
      if @actor_array_index <= 0
        # アクターコマンドフェーズ開始
        start_phase2
        return
      end
      # アクターのインデックスを戻す
      @actor_array_index -= 1
      @actor_index = @pre_action_battlers[@actor_array_index].index
      @active_battler = $game_party.actors[@actor_index]
      @active_battler.blink = true
      # 詠唱中はアクションを保持
      if @active_battler.spelling? == false
        @active_battler.current_action.clear
      end
    # アクターがコマンド入力を受け付けない状態ならもう一度
    end until @active_battler.inputable?
    # アクターコマンドウィンドウをセットアップ
    phase3_setup_command_window
  end
  #--------------------------------------------------------------------------
  # ● スキルアクション 結果作成
  #--------------------------------------------------------------------------
  alias make_skill_action_result_ctbs make_skill_action_result
  def make_skill_action_result
    skill_id = @active_battler.current_action.skill_id
    if PARA_CTB::SPELL_SPEED[skill_id] != nil
      if @active_battler.spelling?
        # 詠唱ステートを解除
        @active_battler.spelling(false)
        make_skill_action_result_ctbs
      else
        # 強制フラグを設定
        @active_battler.current_action.forcing = true
        # 詠唱開始
        @active_battler.spelling(true)
        @active_battler.countup = true
        clear_ct(@active_battler)
        # ステップ 1 に移行
        @phase4_step = 1
      end
    else
      make_skill_action_result_ctbs
    end
  end
end

#==============================================================================
# ■ Window_BattleStatus
#==============================================================================

class Window_BattleStatus < Window_Base
  #--------------------------------------------------------------------------
  # ● CTゲージのリフレッシュ
  #--------------------------------------------------------------------------
  def refresh_ct
    for i in 0...$game_party.actors.size
      actor = $game_party.actors[i]
      line_height = 120 / PARA_CTB::PARTY_SIZE
      actor_y = i * line_height + 4
      if actor.spelling?
        # 詠唱完了時のゲージの色
        ct_color_full = PARA_CTB::SPELL_COLOR_FULL
        # CTゲージの色（左端）
        ct_color_start = actor.full_ct ? ct_color_full : PARA_CTB::SPELL_COLOR_LEFT
        # CTゲージの色（右端）
        ct_color_end = actor.full_ct ? ct_color_full : PARA_CTB::SPELL_COLOR_RIGHT
      else
        # CTが満タンになったときのゲージの色
        ct_color_full = PARA_CTB::COLOR_FULL
        # CTゲージの色（左端）
        ct_color_start = actor.full_ct ? ct_color_full : PARA_CTB::COLOR_LEFT
        # CTゲージの色（右端）
        ct_color_end = actor.full_ct ? ct_color_full : PARA_CTB::COLOR_RIGHT
      end
      if @level_up_flags[i] != true and actor.ct_visible
        draw_meter(actor.now_ct, actor.max_ct, 344, actor_y+14, 100, 8, ct_color_start, ct_color_end)
      elsif @level_up_flags[i] != true
        draw_meter(0, actor.max_ct, 344, actor_y+14, 100, 8, ct_color_start, ct_color_end)
      end
    end
  end
end

#==============================================================================
# ■ Game_Battler
#==============================================================================

class Game_Battler
  #--------------------------------------------------------------------------
  # ● アクションスピードの決定
  #--------------------------------------------------------------------------
  alias make_action_speed_para_ctb make_action_speed
  def make_action_speed
    if self.spelling?
      # 基準能力値
      case PARA_CTB::SPELL_STATUS_TYPE
      when 0
        sts = int
      when 1
        sts = dex
      when 2
        sts = agi
      end
      # 倍率計算
      if PARA_CTB::SPELL_SPEED[@current_action.skill_id] != nil
        spd = sts * PARA_CTB::SPELL_SPEED[@current_action.skill_id]
        @current_action.speed = spd + rand(10 + agi / 4)
      else
        # 詠唱ステートを解除
        spelling(false)
        make_action_speed_para_ctb
      end
    else
      make_action_speed_para_ctb
    end
  end
  #--------------------------------------------------------------------------
  # ○ 詠唱中判定
  #--------------------------------------------------------------------------
  def spelling?
    state_id = -1
    # 詠唱ステートのIDを取得
    for i in 1...$data_states.size
      state = $data_states[i]
      if state.name == PARA_CTB::SPELL_STATE_NAME
        state_id = state.id
      end
    end
    if self.state?(state_id)
      return true
    else
      return false
    end
  end
  #--------------------------------------------------------------------------
  # ○ 詠唱ステート変更
  #--------------------------------------------------------------------------
  def spelling(bool)
    # 詠唱ステートのIDを取得
    for i in 1...$data_states.size
      state = $data_states[i]
      if state.name == PARA_CTB::SPELL_STATE_NAME
        state_id = state.id
      end
    end
    # ステートを変更
    if state_id != nil
      if bool
        add_state(state_id, true)
      else
        remove_state(state_id, true)
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● コマンド入力可能判定
  #--------------------------------------------------------------------------
  alias ctbs_inputable? inputable?
  def inputable?
    bool = spelling? ? false : ctbs_inputable?
    return bool
  end
end

［使う前に］

データベースで「詠唱中」という名前のステートを作成します。
（詠唱中として扱うステートの名前は設定項目で変更可）

必要な設定は、「名前」「バトル終了時に解除」の二点です。

あとは、詠唱中のアニメーションや「物理ダメージで詠唱中断」「一時的に魔法防御アップ」など、
お好みの詠唱スタイルに合わせて設定してください。

［詠唱速度について］

詠唱ゲージの溜まる速さは、「基準能力値×詠唱速度（倍率）」になります。

たとえば、基準能力値が「魔力」で、魔力100のキャラクターが詠唱速度1.5のスキルを使用したとき
CTゲージの溜まる速さは、素早さ150のキャラクターの待ち時間に相当します。

［更新履歴］

2005/10/12　ver.1.01
　戦闘不能ステートの名前が「詠唱中」に書き換えられてしまうバグを修正。
2005/9/14　ver.1.00
　公開。

戻る