敵味方複数回数行動

敵味方複数回数行動

コンセプト	敵と味方を連続行動させたい。
挿入位置	「MAIN」の近く。戦闘系素材より下。「精神コマンド再現」より下。
完成すると	指定回数の連続行動が可能となる。
更新履歴	3/5：ATB併用時の行動回数周りの挙動修正。 3/1：複数回行動を入力順に修正。　　　戦闘行動の強制絡みの挙動を修正。 ========== 2013年 ============================================================ 11/2：ATB修正対応。 6/22：簡易汎用ATB併用時のパーティコマンド「待機」が実行されないエラー修正。 ========== 2012年 ============================================================ 12/11：精神コマンド併用時の挙動修正。　　　それに伴い、精神コマンドより下に挿入位置変更。 12/7：ターン制複数回行動のアクターコマンド入力周り修正。

★　概要　★

・敵キャラ・装備・ステートのメモ欄に
　「行動回数x[y]」 x : 行動回数 y : 確率(100%まで)
　と記載するとそのバトラーが指定回数行動を行います。
・確率100％で確実に複数回行動。それ以外は指定の確率で行動します。
・簡易汎用ATBシステムと併用できます。このままでも使えます。
・ターン制の場合のアクターの攻撃する順番は
　「最後の入力→1番目→2番目・・・」と行動します。
・ATB併用時は都度コマンド入力して即実行します。
・確率行動の場合は勝手に実行しなくなるのでエラーではありません。

#==============================================================================
#    ?VX RGSS2 「敵味方複数回数行動」?
#　　　　　　EnDlEss DREamER
#     URL:http://mitsu-evo.6.ql.bz/
#     製作者 mitsu-evo
#     Last:2013/3/5

#　　 ATBなどに対応した行動回数複数化素材。
#     ▼ 「MAIN」の近く。戦闘系素材より下。「精神コマンド再現」より下。
#==============================================================================
$ed_rgss2 = {} if $ed_rgss2 == nil
$ed_rgss2["ed_multi_act"] = true
=begin

3/5：ATB併用時の行動回数周りの挙動修正。

★　概要　★
      
    ・敵キャラ・装備・ステートのメモ欄に
    　「行動回数x[y]」  x : 行動回数  y : 確率(100%まで)
    　と記載するとそのバトラーが指定回数行動を行います。
    ・確率100％で確実に複数回行動。それ以外は指定の確率で行動します。
    ・簡易汎用ATBシステムと併用できます。このままでも使えます。
    ・ATB併用時は都度コマンド入力して即実行します。
    ・確率行動の場合は勝手に実行しなくなるのでエラーではありません。

=end
#==============================================================================
# ■ Game_Battler
#------------------------------------------------------------------------------
# 　バトラーを扱うクラスです。このクラスは Game_Actor クラスと Game_Enemy クラ
# スのスーパークラスとして使用されます。
#==============================================================================

class Game_Battler
  #--------------------------------------------------------------------------
  # ● 戦闘行動
  #--------------------------------------------------------------------------
  def action=(n)
    @action = n
  end
  #--------------------------------------------------------------------------
  # ● メモ欄から戦闘行動回数取得
  #--------------------------------------------------------------------------
  def get_note_act(obj)
    note = obj.note.scan(/行動回数(\d+)\[?(\d*)\]?/)
    note.flatten!
    array = []
    for i in note do array << i.to_i end
    if array != nil and not array.empty?
      return array
    else
      return [1,1]
    end
  end
  #--------------------------------------------------------------------------
  # ● 複数回行動可能判定(判定時)
  #--------------------------------------------------------------------------
  def multi_action?
    return false if max_act[0] == 1
    if multi_act > max_act[0]
      return false 
    end
    act = max_act
    return false if act[0] < 2
    return true
  end
  #--------------------------------------------------------------------------
  # ● 複数回行動可能判定(実行時)
  #--------------------------------------------------------------------------
  def execution_multi_action?
    return false if max_act[0] == 1
    if multi_act > max_act[0]
      @multi_act_end = true
      return false 
    end
    act = max_act
    return false if act[0] < 2
    prob = act[1]
    prob = 100 if prob == 0
    if rand(100) <= prob
      return true
    else
      # 確率で行動不可なら終了フラグ
      @multi_act_end = true
      return false
    end
  end
  #--------------------------------------------------------------------------
  # ● 最大行動回数の取得
  #--------------------------------------------------------------------------
  def max_act
    @max_act = [1,1]
    for i in self.states.compact
      a = get_note_act(i)[0]
      @max_act = get_note_act(i) if a > @max_act[0]
    end
    return @max_act
  end
  #--------------------------------------------------------------------------
  # ● 行動回数の設定と取得
  #--------------------------------------------------------------------------
  def multi_act
    @multi_act = 1 if @multi_act == nil
    return @multi_act
  end
  def multi_act=(value)
    @multi_act = 1 if @multi_act == nil
    @multi_act = value
  end
  #--------------------------------------------------------------------------
  # ● 複数行動終了フラグ
  #--------------------------------------------------------------------------
  def multi_act_end
    @multi_act_end = false if @multi_act_end == nil
    return @multi_act_end
  end
  def multi_act_end=(value)
    @multi_act_end = false if @multi_act_end == nil
    @multi_act_end = value
  end
  #--------------------------------------------------------------------------
  # ● アクターアクションリスト保存
  #--------------------------------------------------------------------------
  def multi_act_array
    @multi_act_array = [] if @multi_act_array == nil
    return @multi_act_array
  end
  def multi_act_array=(value)
    @multi_act_array = [] if @multi_act_array == nil
    @multi_act_array << value
  end
  def clear_multi_act_array
    @multi_act_array = []
  end
end
#==============================================================================
# ■ Game_Actor
#------------------------------------------------------------------------------
# 　アクターを扱うクラスです。このクラスは Game_Actors クラス ($game_actors)
# の内部で使用され、Game_Party クラス ($game_party) からも参照されます。
#==============================================================================

class Game_Actor < Game_Battler
  #--------------------------------------------------------------------------
  # ● 最大行動回数の取得
  #--------------------------------------------------------------------------
  def max_act
    temp = super
    b = temp.dup
    for i in equips
      next if i == nil
      a = get_note_act(i) 
      a = b if a[0] < b[0] 
      @max_act = temp[0] > a[0] ? temp : a
      b = @max_act
    end
    return @max_act
  end
end
#==============================================================================
# ■ Game_Enemy
#------------------------------------------------------------------------------
# 　敵キャラを扱うクラスです。このクラスは Game_Troop クラス ($game_troop) の
# 内部で使用されます。
#==============================================================================

class Game_Enemy
  #--------------------------------------------------------------------------
  # ● 最大行動回数の取得
  #--------------------------------------------------------------------------
  def max_act
    temp = super
    a = get_note_act(enemy)
    return temp[0] > a[0] ? temp : a
  end
end

#==============================================================================
# ■ Scene_Battle
#------------------------------------------------------------------------------
# 　バトル画面の処理を行うクラスです。
#==============================================================================

class Scene_Battle

#--------------------------------------------------------------------------
  # ● 開始後処理
  #--------------------------------------------------------------------------
  alias ed_multi_act_post_start post_start
  def post_start
    ed_multi_act_post_start
    format_multi_action
  end
  #--------------------------------------------------------------------------
  # ● 初期化
  #--------------------------------------------------------------------------
  def format_multi_action
    for enemy in $game_troop.members
      next if enemy.multi_act < enemy.max_act[0]
      enemy.multi_act = 1
      enemy.clear_multi_act_array
      enemy.multi_act_end = false
    end
    for actor in $game_party.members
      next if actor == nil or actor == 0
      next if actor.multi_act < actor.max_act[0]
      actor.multi_act = 1
      actor.clear_multi_act_array
      actor.multi_act_end = false
    end
  end
  #--------------------------------------------------------------------------
  # ● 前のアクターのコマンド入力へ
  #--------------------------------------------------------------------------
  alias ed_multi_act_prior_actor prior_actor
  def prior_actor
    if $ed_rgss2["ed_active_time_battle"]
      unless @active_battler == nil
        if @active_battler.multi_action? and not @active_battler.multi_act_end
          @active_battler.action.subtraction_speed_action unless @active_battler == nil
          ed_multi_act_prior_actor
          return
        else
          ed_multi_act_prior_actor
        end
      end
    else
      actor_format
      ed_multi_act_prior_actor
    end
  end
  #--------------------------------------------------------------------------
  # ● コマンド入力時のアクター初期化処理
  #--------------------------------------------------------------------------
  def actor_format(prior=true)
    size = $game_party.members.size - 1
    i = @actor_index == 0 ? 0 : @actor_index - 1 if prior      # 先頭なら0
    i = @actor_index + 1 unless prior# 末尾なら最大
    
    unless prior
      # コマンド入力時に次のアクターの場合は前のアクターの値を初期化
      battler = $game_party.members[i - 1]
      battler.multi_act = 1
    end
    
    return if @actor_index == size and not prior # 末尾のアクターなら初期化しない
    
    # アクターの初期化処理
    battler = $game_party.members[i]
    battler.multi_act = 1
    battler.multi_act_end = false
    battler.clear_multi_act_array
  end
  #--------------------------------------------------------------------------
  # ● ターン終了
  #--------------------------------------------------------------------------
  alias ed_multi_act_turn_end turn_end
  def turn_end
    if $ed_rgss2["ed_active_time_battle"]
      if @active_battler.multi_act < @active_battler.max_act[0]
        # アクティブバトラーの行動を初期化＆nil代入して無効化
        unless @active_battler == nil
          @active_battler.action.turn_end
          @active_battler.add_action_battler_list = false
          if $imported["CooperationSkill"] == true
            if @active_battler.is_a?(Game_CooperationBattler)
              init_cooperation_skill
            end
          end
        end
        # 複数行動の処理
        @enter_action = false
        atb_command
        
        @active_battler.multi_act += 1 unless @sp_command_effect
        return
      end
      # 以下は複数行動終了後などの処理
      unless @active_battler == nil
        @active_battler.multi_act = 1
        @active_battler.multi_act_end = false
      end
      ed_multi_act_turn_end
    else
      # 通常
      format_multi_action
      ed_multi_act_turn_end
    end
  end
unless $ed_rgss2["ed_active_time_battle"] 
  #--------------------------------------------------------------------------
  # ● 次に行動するべきバトラーの設定 (追加定義)
  #--------------------------------------------------------------------------
  alias ed_multi_act_set_next_active_battler set_next_active_battler
  def set_next_active_battler
    if $ed_rgss2["ed_spirit_command"] and @sp_command_effect
      # 精神コマンド併用時の精神スキル使用時処理
      ed_multi_act_set_next_active_battler
      return
    end
    flag = @active_battler == nil ? true : false
    flag2 = $game_troop.forcing_battler != nil ? true : false
    
    if not flag and @active_battler.execution_multi_action?
      # 複数行動可能なバトラーを事前にアクションバトラーに追加。
      @action_battlers.unshift(@active_battler) 
    end
    # ここでアクションバトラー先頭が削除し@active_battlerに代入
    ed_multi_act_set_next_active_battler
    
    return if flag2 # 戦闘行動の強制があれば複数回行動は行わない。
    
    unless @active_battler == nil
      if @active_battler.execution_multi_action?
        # set_next_active_battlerで設定されたactionを設定し直す。
        @active_battler.multi_act += 1
        if @active_battler.is_a?(Game_Enemy)
          @active_battler.make_action
        elsif @active_battler.is_a?(Game_Actor)
          unless @active_battler.multi_act_array.empty?
            @active_battler.action = @active_battler.multi_act_array.shift
          end
        end
      end
    end
    # process_actionをループしてset_next_active_battlerを処理(ターン制)
  end
  #--------------------------------------------------------------------------
  # ● 次のアクターのコマンド入力へ
  #--------------------------------------------------------------------------
  alias ed_multi_act_next_actor next_actor
  def next_actor
    if $ed_rgss2["ed_spirit_command"] and @sp_command_effect
      return
    end
    if @actor_index == -1
      ed_multi_act_next_actor
      return
    end
    unless @active_battler == nil
      if @active_battler.multi_act <= @active_battler.max_act[0]
        @active_battler.multi_act += 1
        @active_battler.multi_act_array = @active_battler.action.clone
        return unless @active_battler.multi_act > @active_battler.max_act[0]
      end
    end
    actor_format(false)
    ed_multi_act_next_actor
  end
end#unless $ed_rgss2["ed_active_time_battle"] 
end

テンプレートのpondt