MM風パーティーシステム

MM風パーティーシステム

コンセプト	メタルマックス風なパーティーシステムを再現する。
挿入位置	▼ バトルレイアウト変更よりも下。他の素材よりも上の方に。
完成すると	隊列歩行や戦車に乗り降り、牽引、戦闘での人間・戦車切替が出来てメタルマックスっぽくなる。
更新履歴	9/6：ゲームスイッチのON・OFFで隊列仲間の表示・非表示機能を追加。 8/31：ゲーム開始時に主人公が一人の時に発生するエラー修正。　　　仲間がイベントで増減したときの動作を修正。

ＭＭ風パーティーシステムサンプルプロジェクト

　　　　★　概要　★

　　・メタルマックス風な戦車乗降及びパーティ編成システムを再現します。
　　・当然、マップ上で戦車に乗って戦闘はその戦車での戦闘になり
　　　戦車が破壊されると中の搭乗者が脱出して戦いに参加したりします。
　　・仲間は「隊列歩行」でＤＱ風にプレイヤーの後ろにくっついてきます。
　　・ゲームスイッチに乗車状態を反映しますので、ショップの処理や
　　　戦車を仲間に加えるときなどイベントも作りやすいです。

　　　　★　使い方　★

　　・「各種設定項目」を説明書きを読んでから設定を行う。
　　・マップ上「Ｒボタン」でプレイヤーパーティ直下の戦車に乗降します。
　　　「Ｌボタン」で「乗降メニュー」が表示されて個別の乗降が可能です。
　　　仲間が重なっている場合は乗降できませんので注意。
　　・戦車に乗った状態で先頭キャラが戦車に重なり「Ｃボタン」で調べると
　　　「牽引」して連れて行くことが出来ます。
　　　　一度に牽引できる戦車は１台だけです。
　　　牽引を外すには乗降メニューから「牽引」を選択すると外せます。
　　・戦車が「戦闘不能」になるとマップ上での乗車時の移動が出来ません。
　　　戦車から降りて「牽引」して移動するなどして下さい。
　　・牽引中の戦車は戦闘に参加出来ませんがメニュー上での行動は可能です。
　　・人間でも戦車でも乗物に乗車できます。
　　・戦車はそのマップ・その座標に乗り物と同様に放置されます。
　　　「ナマリタケ」や「とりのふん」は付かないです。
　　・戦闘中にアクターコマンド表示状態で「左キー」を押せば
　　　「戦車乗車状態」での戦闘突入なら降りて人間で戦闘可能です。
　　　人間で戦闘に突入した場合は乗降できません。
　　　乗降メニューは「右キー」を押すことでアクターコマンドに戻れます。
　　　バトルレイアウト変更併用時はアクターコマンドにコマンドが追加されます。
　　・ゲームスイッチに現在の乗降状態が反映。乗車中はON。人間ならOFF。
　　・ゲームスイッチをON・OFFして隊列仲間を表示・非表示出来ます。

　　　　★　キー配置　★

　　　Ｃボタン　：　戦車の上で押すと「牽引」できる。
　　　Ｒボタン　：　戦車の上で押すと「全員乗降」できる。
　　　Ｌボタン　：　戦車乗降メニューを表示する。

　　　　★　イベントスクリプト　★

　　　・recall_tank(actor_id)　　：　プレイヤーの近くに戦車を呼び寄せる。

　　　　　　　actor_id : 戦車に指定しているアクターＩＤ

　　　　　　・move_to_tank(actor_id, x, y)　：　現在マップの指定座標に戦車を配置。

　　　　　　　actor_id : 戦車に指定しているアクターＩＤ
　　　　x y : Ｘ座標とＹ座標

　　　　★　その他　★

　　・ＭＭ風パーティーシステムと銘打っていますが別に戦車でなくてもおｋ。
　　・戦闘に関しては戦車アクターの入れ替え以外いじってないので
　　　戦闘系素材とは競合しにくいと思われます。
　　・うちで公開中のスクリプトを併用すればシステム周りはそれとなく
　　　メタルマックスっぽくなるはず。
　　　「っぽくなる」だけ(^^ゞ
　　・ＭＭ風システムのＦＦ風戦闘とか訳分らんのにもなる。
　　・誰かクローンゲーとか作って下さいm(__)m
　　　mitsu-evoが泣いて喜びます♪

#==============================================================================
#    ☆VX RGSS2 「MM風パーティーシステム」☆
#　　　　　　EnDlEss DREamER
#     URL:http://mitsu-evo.6.ql.bz/
#     製作者 mitsu-evo
#     Last:2011/9/6
#　　 MMのようにマップ上・戦闘中の戦車乗降＆パーティーシステム。
#     ▼ バトルレイアウト変更よりも下。他の素材よりも上の方に。
#==============================================================================
$ed_rgss2 = {} if $ed_rgss2 == nil
$ed_rgss2["ed_mm_party_system"] = true
$imported = {} if $imported == nil
=begin

8/31：ゲーム開始時に主人公が一人の時に発生するエラー修正。
仲間がイベントで増減したときの動作を修正。
9/6：ゲームスイッチのON・OFFで隊列仲間の表示・非表示機能を追加。

★　概要　★

・メタルマックス風な戦車乗降及びパーティ編成システムを再現します。
　　・当然、マップ上で戦車に乗って戦闘はその戦車での戦闘になり
　　　戦車が破壊されると中の搭乗者が脱出して戦いに参加したりします。
　　・仲間は「隊列歩行」でＤＱ風にプレイヤーの後ろにくっついてきます。
　　・ゲームスイッチに乗車状態を反映しますので、ショップの処理や
　　　戦車を仲間に加えるときなどイベントも作りやすいです。

★　使い方　★

・「各種設定項目」を説明書きを読んでから設定を行う。
　　・マップ上「Ｒボタン」でプレイヤーパーティ直下の戦車に乗降します。
　　　「Ｌボタン」で「乗降メニュー」が表示されて個別の乗降が可能です。
　　　仲間が重なっている場合は乗降できませんので注意。
　　・戦車に乗った状態で先頭キャラが戦車に重なり「Ｃボタン」で調べると
　　　「牽引」して連れて行くことが出来ます。
　　　　一度に牽引できる戦車は１台だけです。
　　　牽引を外すには乗降メニューから「牽引」を選択すると外せます。
　　・戦車が「戦闘不能」になるとマップ上での乗車時の移動が出来ません。
　　　戦車から降りて「牽引」して移動するなどして下さい。
　　・牽引中の戦車は戦闘に参加出来ませんがメニュー上での行動は可能です。
　　・人間でも戦車でも乗物に乗車できます。
　　・戦車はそのマップ・その座標に乗り物と同様に放置されます。
　　　「ナマリタケ」や「とりのふん」は付かないです。
　　・戦闘中にアクターコマンド表示状態で「左キー」を押せば
　　　「戦車乗車状態」での戦闘突入なら降りて人間で戦闘可能です。
　　　人間で戦闘に突入した場合は乗降できません。
　　　乗降メニューは「右キー」を押すことでアクターコマンドに戻れます。
　　　バトルレイアウト変更併用時はアクターコマンドにコマンドが追加されます。
　　・ゲームスイッチに現在の乗降状態が反映。乗車中はON。人間ならOFF。
　　・ゲームスイッチをON・OFFして隊列仲間を表示・非表示出来ます。

★　キー配置　★

Ｃボタン　：　戦車の上で押すと「牽引」できる。
　　　Ｒボタン　：　戦車の上で押すと「全員乗降」できる。
　　　Ｌボタン　：　戦車乗降メニューを表示する。

★　イベントスクリプト　★

・recall_tank(actor_id)　　：　プレイヤーの近くに戦車を呼び寄せる。
　　　
　　　　actor_id : 戦車に指定しているアクターＩＤ
　　　
　　　・move_to_tank(actor_id, x, y)　：　現在マップの指定座標に戦車を配置。
　　　
　　　　actor_id : 戦車に指定しているアクターＩＤ
　　　　x y      : Ｘ座標とＹ座標

★　その他　★

・ＭＭ風パーティーシステムと銘打っていますが別に戦車でなくてもおｋ。
　　・戦闘に関しては戦車アクターの入れ替え以外いじってないので
　　　戦闘系素材とは競合しにくいと思われます。
　　・うちで公開中のスクリプトを併用すればシステム周りはそれとなく
　　　メタルマックスっぽくなるはず。
　　　「っぽくなる」だけ(^^ゞ
　　・ＭＭ風システムのＦＦ風戦闘とか訳分らんのにもなる。
　　・誰かクローンゲーとか作って下さいm(__)m
　　　mitsu-evoが泣いて喜びます♪

=end

# ★★★★★★★★★★★　各種設定項目　★★★★★★★★★★★★

# ★　戦車の設定　★

# 戦車にするアクターＩＤと戦車の初期位置
Tank_start_settings ={

# 戦車アクターID => [マップID,X座標,Y座標]
    9 => [1,0,0],
    10 => [1,1,0],
    11 => [1,2,0],
    12 => [1,3,0],
    13 => [2,0,0],
    14 => [2,1,0],
    15 => [2,2,0],
    
}

# 戦闘参加可能な仲間の数
MAX_PARTY_MEMBER = 4

# 戦車が破壊された時のアニメーションID
BREAK_ANIMATION_ID = 79

# 戦車アクターは不死身にするかどうか
# 「装備破壊システム」「個別装備アイテム」スクリプト導入時)
TANK_IMMORAL = false

# 戦車が戦闘不能になった時に搭乗者を戦車の代わりに戦わせるかどうか
RIDING_ACTOR_IN_BATTLE = true

# 戦車アクターの経験値を増加させるかどうか。trueで通常通り加算。falseで加算なし
TANK_EXP = false

# 搭乗者の能力を戦車に反映させるかどうか。
# trueで搭乗者の攻撃・防御・精神・敏捷を戦車の能力に加算する。
RIDE_TANK_PARAM = true

# 戦車乗車・降車管理のスイッチ番号
RIDE_TANK = 2

# 隊列歩行仲間の表示・非表示スイッチ番号
RANK_PARTY_VISIBLE = 3

# ★　メッセージ表示・効果音設定　★

# 戦車破壊時のメッセージ
VOCAB_BREAK_TANK_TEXT = "%sが破壊された！%sは脱出した！"

# 大破戦車での移動不能メッセージ
VOCAB_BREAK_MOVE_TEXT = "%sが行動不能です。状態を確認して下さい。"

# 戦車乗降メニューでの全員乗降表示テキスト
VOCAB_MENU_RIDE_TEXT  = "全員乗降"

# 戦車乗降メニューでの牽引表示テキスト
VOCAB_MENU_TRACT_TEXT = "牽引"

# 戦闘時の乗降コマンドテキスト
VOCAB_BATTLE_RIDE_TEXT = "乗降"

# 牽引するときの効果音
TRACTION_SE = "Audio/SE/Close2"

# ★　装備拡張：武器拡張追加併用時　及び　純正装備破壊時の死亡処理設定　★
# 指定の装備が破壊されたら戦車の死亡処理に移る。(装備破壊システム導入時)

# (例：装備拡張：武器拡張追加での設定項目)あくまで例です。
# WEAPON_TYPE　|　　　EQUIP_TYPE
# [0, 1, 2]　　|   [0, 4, 1, 2, 5, 3, 3]  ：  「Ａ」equipsメソッド格納値
#  0  1  2     |    3  4  5  6  7  8  9　 ：  「Ｂ」equips配列のインデックス
# 「Ｂ」の値を以下の設定に使用します。

# 純正の場合は「0：武器」「1：盾　2：頭　3：身体　4：装飾」なので
# 0～4の値を入れて下さい。
BREAK_EQUIP_COLLAPSE = 3

# ★　ＫＧＣ様「タイルセット拡張」で設定した地形ＩＤ進入不可設定　★
# タイルセット拡張併用時に使用。戦車乗車中は指定の地形タグを進めない
STOP_WARK_TILE_ID = [2,4,6,8]

# ===========================ここまで==========================================

#==============================================================================
# ■ Game_Interpreter
#------------------------------------------------------------------------------
# 　イベントコマンドを実行するインタプリタです。このクラスは Game_Map クラス、
# Game_Troop クラス、Game_Event クラスの内部で使用されます。
#==============================================================================
class Game_Interpreter
  # イベントコマンド「スクリプト」
  
  #--------------------------------------------------------------------------
  # ● プレイヤーの近くに戦車を呼び寄せる。
  #--------------------------------------------------------------------------
  def recall_tank(actor_id)
    return unless Tank_start_settings.include?(actor_id)
    x = $game_player.x
    y = $game_player.y
    ix = -2
    iy = -2
    move_flag = false
    loop do
      if (ix + x) < x
        # プレイヤーより左
        x_direction = 4# 左
      else
        x_direction = 6# 右
      end
      if (iy + y) < y
        # プレイヤーより上
        y_direction = 8# 上
      else
        y_direction = 2# 下
      end
      # 指定座標を取得
      tx = x + ix     #$game_map.x_with_direction(x, x_direction)
      ty = y + iy     #$game_map.y_with_direction(y, y_direction)
      # 指定座標が戦車通行可能か？
      if $game_map.tank_passable?(tx, ty)
        # 指定座標に戦車があるかどうか？
        leave_tank = $game_map.tanks_xy(tx, ty)
        if leave_tank.empty?
          # 戦車の配列がなければ、乗車していない戦車リストから
          # 引数と一致する戦車アクターIDの戦車を取得
          for tank in $game_map.vehicles
            # 乗物が戦車クラスでないなら次へ
            next unless tank.is_a?(Game_Tank)
            tank_id = tank.tank_data.id
            # 戦車データから戦車のアクターデータを取得
            if tank_id == actor_id
              # 一致すれば指定位置に移動。
              tank.set_location($game_map.map_id,tx, ty)
              move_flag = true
              break
            end
          end
        end
      end
      # 移動完了した場合は終了
      break if move_flag
      # プレイヤーから-2,-2から始めて2の座標ずつ処理終了したら終了
      break if ix == 2 and iy == 2
      
      # ixが2なら初期化＆iy加算
      if ix == 2
        ix = -2
        iy += 1
      else
        # それ以外はix加算
        ix += 1
      end
    end
    
  end
  #--------------------------------------------------------------------------
  # ● 指定位置に戦車を配置する。
  #--------------------------------------------------------------------------
  def move_to_tank(actor_id, x, y)
    return unless Tank_start_settings.include?(actor_id)
    for tank in $game_map.vehicles
      # 乗物が戦車クラスでないなら次へ
      next unless tank.is_a?(Game_Tank)
      tank_id = tank.tank_data.id
      # 戦車データから戦車のアクターデータを取得
      if tank_id == actor_id
        # 一致すれば指定位置に移動。
        tank.set_location($game_map.map_id, x, y)
        move_flag = true
        break
      end
    end
  end
end

#==============================================================================
# ■ Game_Actor
#------------------------------------------------------------------------------
# 　アクターを扱うクラスです。このクラスは Game_Actors クラス ($game_actors)
# の内部で使用され、Game_Party クラス ($game_party) からも参照されます。
#==============================================================================

class Game_Actor < Game_Battler
  #--------------------------------------------------------------------------
  # ● セットアップ
  #     actor_id : アクター ID
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_setup setup
  def setup(actor_id)
    ed_mm_party_system_setup(actor_id)
    # 指定したTank_start_settingsとアクターIDが同じなら不死身フラグ
    if Tank_start_settings.include?(@actor_id)
      if $ed_rgss2["ed_break_equip"]
        #$ed_rgss2["ed_equip_extension"] and $ed_rgss2["ed_break_equip"]
        # 装備拡張：武器拡張追加　と　装備破壊システム　が導入済みなら不死身に
        @immortal = TANK_IMMORAL
      else
        @immortal = false
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 戦闘不能判定
  #--------------------------------------------------------------------------
  #alias ed_mm_party_system_dead? dead?
  def dead?
    if Tank_start_settings.include?(@actor_id)
      return (not @hidden and @hp == 0)
    else
      return super
    end
  end
  #--------------------------------------------------------------------------
  # ● パーティ内インデックス取得
  #--------------------------------------------------------------------------
  def party_index
    # 以下追加
    all_index = $game_party.all_battlers
    battle_index = $game_party.battle_members
    all_index -= battle_index
    p_index = battle_index + all_index
    return p_index.index(self)#$game_party.all_members.index(self)
  end
  #--------------------------------------------------------------------------
  # ● 乗車中アクターの取得
  #--------------------------------------------------------------------------
  def riding_actor(tank=false)
    # 戦車のアクターでないなら戻る
    #return nil unless Tank_start_settings.include?(@actor_id)
    if Tank_start_settings.include?(@actor_id)
      # アクターを返す
      member = $game_party.actors_id
      tank_member = $game_party.tanks_id
      index = tank_member.index(@actor_id)
      # 算出した index が nil でないならそこの index の人間メンバーを代入
      ride_actor = member[index] unless index == nil
    elsif tank
      # 戦車アクターを返す
      member = $game_party.actors_id
      index = member.index(@actor_id)
      tank_member = $game_party.tanks_id
      # 算出した index が nil でないならそこの index の人間メンバーを代入
      ride_actor = tank_member[index] unless index == nil
    end
    unless ride_actor == nil
      return $game_actors[ride_actor]
    else
      return nil
    end
  end
#=begin
  #--------------------------------------------------------------------------
  # ● 経験値の変更
  #     exp  : 新しい経験値
  #     show : レベルアップ表示フラグ
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_change_exp change_exp
  def change_exp(exp, show)
    riding_actor_change_exp(exp, show)
    ed_mm_party_system_change_exp(exp, show)
    @exp = 0 if TANK_EXP
  end
  #--------------------------------------------------------------------------
  # ● 戦車搭乗者の経験値の変更
  #     exp  : 新しい経験値
  #     show : レベルアップ表示フラグ
  #--------------------------------------------------------------------------
  def riding_actor_change_exp(exp, show)
    if Tank_start_settings.include?(@actor_id)
      # 戦車の戦闘メンバーの何番目かを算出
      unless riding_actor == nil
        exp2 = double_exp_gain ? exp * 2 : exp
        riding_actor.change_exp(exp2, show) unless $ed_rgss2["ed_result_window"]
      end
    end
  end
#=end
if RIDE_TANK_PARAM
  #--------------------------------------------------------------------------
  # ● 基本攻撃力の取得
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_base_atk base_atk
  def base_atk
    param = ed_mm_party_system_base_atk
    
    # 戦車の戦闘メンバーの何番目かを算出
    index = $game_party.tank_members.index(self)
    unless riding_actor == nil
      a = riding_actor.base_atk
      return param + a
    else
      return ed_mm_party_system_base_atk
    end
  end
  #--------------------------------------------------------------------------
  # ● 基本防御力の取得
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_base_def base_def
  def base_def
    param = ed_mm_party_system_base_def
    
    # 戦車の戦闘メンバーの何番目かを算出
    index = $game_party.tank_members.index(self)
    unless riding_actor == nil
      a = riding_actor.base_def
      return param + a
    else
      return ed_mm_party_system_base_def
    end
  end
  #--------------------------------------------------------------------------
  # ● 基本精神力の取得
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_base_spi base_spi
  def base_spi 
    param = ed_mm_party_system_base_spi
    
    # 戦車の戦闘メンバーの何番目かを算出
    index = $game_party.tank_members.index(self)
    unless riding_actor == nil
      a = riding_actor.base_spi
      return param + a
    else
      return ed_mm_party_system_base_spi
    end
  end
  #--------------------------------------------------------------------------
  # ● 基本敏捷性の取得
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_base_agi base_agi
  def base_agi
    param = ed_mm_party_system_base_agi
    
    # 戦車の戦闘メンバーの何番目かを算出
    index = $game_party.tank_members.index(self)
    unless riding_actor == nil
      a = riding_actor.base_agi
      return param + a
    else
      return ed_mm_party_system_base_agi
    end
  end
end#if RIDE_TANK_PARAM
end
#==============================================================================
# ■ Game_Temp
#------------------------------------------------------------------------------
# 　セーブデータに含まれない、一時的なデータを扱うクラスです。このクラスのイン
# スタンスは $game_temp で参照されます。
#==============================================================================

class Game_Temp
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_initialize initialize
  def initialize
    # 仲間の移動に関するプレイヤーの仲間分歩数前の向き保存配列。
    @line_walk = []
    ed_mm_party_system_initialize
  end
  #--------------------------------------------------------------------------
  # ● プレイヤー過去の向きを取得
  #--------------------------------------------------------------------------
  def line_walk
    return @line_walk
  end
  #--------------------------------------------------------------------------
  # ● プレイヤー過去の向きを設定
  #--------------------------------------------------------------------------
  def line_walk=(value)
    @line_walk = value
  end
  #--------------------------------------------------------------------------
  # ● プレイヤー過去の向きを初期化
  #--------------------------------------------------------------------------
  def format_line_walk
    @line_walk = []
    for i in 0...$game_party.map_members.size
      @line_walk << 0
    end
  end
end
#==============================================================================
# ■ Game_Map
#------------------------------------------------------------------------------
# 　マップを扱うクラスです。スクロールや通行可能判定などの機能を持っています。
# このクラスのインスタンスは $game_map で参照されます。
#==============================================================================

class Game_Map
  #--------------------------------------------------------------------------
  # ● 通行可能判定
  #     x    : X 座標
  #     y    : Y 座標
  #     flag : 調べる通行禁止ビット (通常 0x01、乗り物の場合のみ変更)
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_passable? passable?
  def passable?(x, y, flag = 0x01)
    if $imported["TilesetExtension"]
      # タイルセット拡張導入済みなら設定地形タグを戦車乗車中は不可にする。
      tag = terrain_tag(x, y)
      for tank_tag in STOP_WARK_TILE_ID
        return false if tag == tank_tag and $game_switches[RIDE_TANK]
      end
    end
    ed_mm_party_system_passable?(x, y, flag)
  end
  #--------------------------------------------------------------------------
  # ● 仲間のスプライト更新設定
  #--------------------------------------------------------------------------  
  def party_graphic_refresh=(value)
    @party_graphic_refresh = value
  end
  #--------------------------------------------------------------------------
  # ● 仲間のスプライト更新取得
  #--------------------------------------------------------------------------
  def party_graphic_refresh
    return @party_graphic_refresh
  end
  #--------------------------------------------------------------------------
  # ● 戦車通行可能判定(回収時使用)
  #     x    : X 座標
  #     y    : Y 座標
  #     flag : 調べる通行禁止ビット (通常 0x01、乗り物の場合のみ変更)
  #--------------------------------------------------------------------------
  def tank_passable?(x, y, flag = 0x01)
    if $imported["TilesetExtension"]
      # タイルセット拡張導入済みなら設定地形タグを戦車乗車中は不可にする。
      tag = terrain_tag(x, y)
      for tank_tag in STOP_WARK_TILE_ID
        return false if tag == tank_tag
      end
    end
    ed_mm_party_system_passable?(x, y, flag)
  end
  #--------------------------------------------------------------------------
  # ● 指定座標に存在する戦車の配列取得
  #     x : X 座標
  #     y : Y 座標
  #--------------------------------------------------------------------------
  def tanks_xy(x, y)
    result = []
    for event in @tanks
      result.push(event) if event.pos?(x, y)
    end
    return result
  end
  #--------------------------------------------------------------------------
  # ● 乗降時の歩行終了設定
  #--------------------------------------------------------------------------  
  def get_on_walk=(value)
    @get_on_walk = value
  end
  #--------------------------------------------------------------------------
  # ● 乗降時の歩行終了取得
  #--------------------------------------------------------------------------
  def get_on_walk
    return @get_on_walk
  end
  #--------------------------------------------------------------------------
  # ● 乗り物の作成
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_create_vehicles create_vehicles
  def create_vehicles
    ed_mm_party_system_create_vehicles
    # 戦車のキャラを作る。
    @tanks = []
    for i in Tank_start_settings.keys
      @tanks << Game_Tank.new(i)
    end
    @vehicles += @tanks
  end
  #--------------------------------------------------------------------------
  # ● イベントのセットアップ
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_setup_events setup_events
  def setup_events
    @riding_tank = false if @riding_tank == nil
    @temp_members = []
    setup_friends
    ed_mm_party_system_setup_events
  end
  #--------------------------------------------------------------------------
  # ● 仲間のセットアップ
  #--------------------------------------------------------------------------
  def setup_friends(new_map=true)
    # マップイベント・コモンイベントの前に仲間のイベントを作成。
    @actors = {}
    $game_temp.format_line_walk if new_map
    i = 0
    unless new_map
      # 末尾の仲間の向きから次の座標を取得する。
      @temp_members = Marshal.load(Marshal.dump(members)) if @temp_members.empty?
      size = @temp_members.size - 1
      tx = @temp_members[size][1]
      ty = @temp_members[size][2]
      td = @temp_members[size][3]
      case td
      when 2
        ty -= 1
      when 4
        tx += 1
      when 6
        tx -= 1
      when 8
        ty += 1
      end
    end

for actor in $game_party.map_members
      if i == 0
        # 先頭のキャラは作成しない。
        i += 1
        @actors[i] = nil
        next
      end
      # 仲間イベントの作成。
      event = RPG::Event.new($game_player.x, $game_player.y) if new_map
      unless new_map
        unless @temp_members[i] == nil
          event = RPG::Event.new(@temp_members[i][1],@temp_members[i][2]) 
        else
          # 恐らく牽引時用の処理
          event = RPG::Event.new(tx, ty)
        end
      end
      event.id = actor.id
      event.name = actor.name
      event.pages[0].graphic.character_name = actor.character_name
      event.pages[0].graphic.character_index = actor.character_index
      event.pages[0].graphic.direction = $game_player.direction if new_map
      unless new_map
        unless @temp_members[i] == nil
          event.pages[0].graphic.direction = @temp_members[i][3]
        else
          event.pages[0].graphic.direction = td
        end
      end
      
      # 実際にイベントを作成。
      @actors[i] = Game_Event.new(@map_id, event)
      @actors[i].priority_type = $game_player.priority_type
      @actors[i].move_speed = $game_player.move_speed
      i += 1
    end
    $game_player.refresh
    referesh_vehicles
  end
  #--------------------------------------------------------------------------
  # ● 場所移動後などの位置設定
  #--------------------------------------------------------------------------
  def set_party_place
    i = 0
    for actor in $game_party.map_members
      if @actors[i] == nil
        i += 1
        next
      end
      @actors[i].moveto($game_player.x, $game_player.y)
      @actors[i].move_speed = $game_player.move_speed
      @actors[i].update
      i += 1
    end
  end
  #--------------------------------------------------------------------------
  # ● 仲間イベントの取得
  #--------------------------------------------------------------------------
  def actors
    return @actors
  end
  #--------------------------------------------------------------------------
  # ● 戦車キャラの取得
  #--------------------------------------------------------------------------
  def tanks
    result = []
    for tank in @tanks
      # 乗車中の戦車は除外する
      next if tank.driving
      result << tank
    end
    return result
  end
  #--------------------------------------------------------------------------
  # ● マップ上の仲間のデータと位置を取得
  #    [アクター, キャラＸ座標, キャラＹ座標, キャラ向き]
  #--------------------------------------------------------------------------
  def members
    i = 0
    result = []
    for actor in $game_party.map_members
      if @actors[i] == nil
        result << [actor, $game_player.x, $game_player.y, $game_player.direction]
        i += 1
        next
      end
      result << [actor, @actors[i].x, @actors[i].y, @actors[i].direction]
      i += 1
    end
    return result
  end
  #--------------------------------------------------------------------------
  # ● 乗車中戦車の座標重複チェック
  #--------------------------------------------------------------------------
  def pile_up_tanks
    result = []
    # 乗車中の戦車リストを取得
    for tank in @tanks
      result << tank if tank.driving
    end
    i = 0
    j = 0
    loop do
      # ベースとなるキャラの座標j
      break if result[j] == nil
      x = result[j].x
      y = result[j].y
      # 比較対象i
      break if result[i] == nil
      # ベースと比較が一緒の戦車なら次へ。
      if result[j] == result [i]
        # ベースが戦車リスト最大数と一致すれば比較を終了。
        break if j == (result.size - 1)
        if i == (result.size - 1)
          # 比較対象が戦車リスト最大数と一致すればベースを加算。
          j += 1
          i = 0
        else
          i += 1
        end
        next
      end
      # ベースと比較対象が同じ座標なら重複一致trueを返す。
      return true if x == result[i].x and y == result[i].y
      # ベースが戦車リスト最大数と一致すれば比較を終了。
      break if j == (result.size - 1)
      if i == (result.size - 1)
        # 比較対象が戦車リスト最大数と一致すればベースを加算。
        j += 1
        i = 0
      else
        # それ以外は比較対象を加算。
        i += 1
      end
    end
    return false
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_refresh refresh
  def refresh
    if @map_id > 0
      i = 0
      getting_on_and_off_tank_dead_check
      for actor in $game_party.map_members
        if i == 0
          # 先頭のキャラは作成しない。
          i += 1
          next
        end
        if @actors[i] == nil
          i += 1
          next
        end
        # 仲間イベントの作成。
        @actors[i].character_name = actor.character_name
        @actors[i].character_index = actor.character_index
        @actors[i].refresh
        i += 1
      end
    end
    ed_mm_party_system_refresh
  end
  #--------------------------------------------------------------------------
  # ● 仲間イベントの歩行状態取得
  #--------------------------------------------------------------------------
  def friend_moving?
    for i in 1...$game_party.map_members.size
      return true if @actors[i].moving?
    end
    return false
  end
  #--------------------------------------------------------------------------
  # ● 仲間イベントの歩行
  #--------------------------------------------------------------------------
  def actors_walk(auto=false)
    # プレイヤーの移動可能判定
    unless auto     # 自動移動でない
    px = $game_player.x
    py = $game_player.y
    unless $game_player.moving?
      case $game_player.direction
      when 2
        return unless $game_player.passable?(px,py + 1)
      when 4
        return unless $game_player.passable?(px - 1,py)
      when 6
        return unless $game_player.passable?(px + 1,py)
      when 8
        return unless $game_player.passable?(px,py - 1)
      end
    end
    end
    # キー入力されたか、自動なら移動実行。
    if $game_player.moving? or auto
    #if Input.dir4 != 0 or auto
    # 移動可能なら仲間の移動を行う。
    if auto
      unless friend_moving?
        if not $game_player.in_bort_ship? or 
          $game_temp.line_walk.size == $game_party.map_members.size
          # 船でないか、船でもプレイヤーの自動移動後の処理の場合
          $game_temp.line_walk.unshift(@temp_direction) 
        end
        # 末尾を削除
        $game_temp.line_walk.pop
      end
    else
      # 普通のキー入力時
      #$game_map.actors_dash($game_player.dash?)
      $game_temp.line_walk.unshift($game_player.direction)
      $game_temp.line_walk.pop
    end
    
    for i in 1...$game_party.map_members.size
      if auto
        flag = @actors[i].moving? ? false : true
      else
        flag = true unless @actors[i].moving?
      end
      # 移動時はすり抜けONにしてプレイヤーとの衝突を避ける。
      @actors[i].through = flag ? true : false
      
      case $game_temp.line_walk[i]
      when 2
        @actors[i].move_down if flag
      when 4
        @actors[i].move_left if flag
      when 6
        @actors[i].move_right if flag
      when 8
        @actors[i].move_up if flag
      end
    end
    end
  end
  #--------------------------------------------------------------------------
  # ● プレイヤーキャラに仲間キャラを集める。
  #--------------------------------------------------------------------------
  def gather_actors_walk
    if @actors[0] == nil
      @get_on_walk = true
      return
    end
    end_flag = []
    unless $game_player.moving?
      @temp_direction = 0   # 船に乗ったら移動しないように向きを0に。
      for actor in members
        # プレイヤーとメンバーの座標取得
        vx = $game_player.x
        vy = $game_player.y
        px = actor[1]
        py = actor[2]
        # 座標比較
        if vx == px and vy == py
          # 座標一致したら終了フラグをtrue
          end_flag << true
          # 終了フラグが全員立ったかどうか？
          end_flag.delete(true) if end_flag.size == members.size
          if end_flag.empty?
            # フラグが立てば移動終了。
            @get_on_walk = true
            @temp_direction = nil
            return @get_on_walk
          end
        else 
          @get_on_walk = false
        end
      end
      # フラグが立っていないときは自動移動する。
      actors_walk(true)
    end
    # 自動移動フラグ返す
    return @get_on_walk
  end
  #--------------------------------------------------------------------------
  # ● 戦車乗降処理(死亡時)
  #--------------------------------------------------------------------------
  def getting_on_and_off_tank_dead_check
    # 戦闘敗北直後など、戦闘終了直後のマップシーンではまだtrueのまま。
    # その後、falseになるので、falseならこの処理を行わない。
    return unless $battle_scene_switch_map
    #return if pile_up_tanks
    result = []
    result2 = []
    result3 = []
    # 降車時牽引を外す。
    #$game_player.slip_traction_tank unless value
    # 降車・乗車戦車を取得
    @tanks.each{|tank|
    result2 << tank unless tank.driving
    result3 << tank if tank.driving
    }
    i = 0
    result3.each{|tank|
    actor = $game_party.tank_members[i]
    if actor == 0 or actor == nil
      result << 0
      tank.get_off
    else
      tank.sync_index = i
      result << actor
      tank.get_on
    end
    i += 1
    }
    a = result.clone
    b = a.delete(0)
    # 戦車メンバーから乗っていない「0」を削除したときに内容がないなら全員降車済み。
    if a.empty?
      # 既に降車中なら乗車フラグをＯＦＦ
      @riding_tank = false
    end
    # 戦車パーティに戦車を反映。
    $game_party.set_tank(result)
    @temp_members = Marshal.load(Marshal.dump(members))
    # 戦車乗降ゲームスイッチ
    $game_switches[RIDE_TANK] = @riding_tank
    if @riding_tank
      setup_friends(false)
    else
      setup_friends(true)
    end
  end
  #--------------------------------------------------------------------------
  # ● 戦車乗降処理(個人)
  #--------------------------------------------------------------------------
  def getting_on_and_off_tank_single(value,index)
    return if pile_up_tanks
    result = []
    result2 = []
    
    @tanks.each{|tank|result2 << tank unless tank.driving}
    i = 0
    self.members.each{|array|
      # 処理したいindexと一致しないメンバーは処理しない。
      unless i == index
        result << $game_party.tank_members[i]
        i += 1
        next
      end
      if value
        @riding_tank = true
      else
        # 個別降車の乗車フラグ管理
        a = $game_party.tank_members.clone
        b = a.delete(0)
        # 戦車メンバーから乗っていない「0」を削除したときに内容がないなら全員降車済み。
        if a.empty?
          @riding_tank = false
        else
          @riding_tank = true
        end
      end
      add_tank = false
      px = array[1]
      py = array[2]
      
      for vehicle in @vehicles
        # 乗物が戦車クラスでないなら次へ
        next unless vehicle.is_a?(Game_Tank)
        if px == vehicle.x and py == vehicle.y and 
          @map_id == vehicle.map_id and not add_tank
          # ＸＹ座標とマップＩＤが一致
          if value
            # 戦車アクターを追加。
            result << vehicle.tank_data
            vehicle.sync_index = index
            vehicle.get_on   # 戦車クラスの乗車処理
            add_tank = true
          else#if vehicle.driving
            # 戦車アクターを削除
            
            
            not_ride = false
            result2.each{|t|
            # 乗っていない戦車リストに一致するか？
            if t.x == vehicle.x and t.y == vehicle.y and 
              t.map_id == vehicle.map_id
              not_ride = true
              break
            end
            }
            return if not_ride # 乗っていない戦車と合致しての降車は処理しない。
            
            
            
            result << 0
            vehicle.get_off  # 戦車クラスの降車処理
            add_tank = true
          end
        end
      end
      if value
        result << 0 unless add_tank   # 戦車追加フラグがないなら乗っていない処理
      end
      i += 1
      }
    # 戦車パーティに戦車を反映。
    $game_party.set_tank(result)
    # 戦車乗降ゲームスイッチ
    $game_switches[RIDE_TANK] = @riding_tank
  end
  #--------------------------------------------------------------------------
  # ● 戦車乗降処理(全員)
  #--------------------------------------------------------------------------
  def getting_on_and_off_tank_all(value)
    return if pile_up_tanks
    result = []
    result2 = []
    result3 = []
    i = 0
    tmp_x = nil
    tmp_y = nil
    # 降車時牽引を外す。
    $game_player.slip_traction_tank unless value
    # 降車・乗車戦車を取得
    @tanks.each{|tank|
    result2 << tank unless tank.driving
    result3 << tank if tank.driving
    }
    
    self.members.each{|array|
      add_tank = false
      px = array[1]
      py = array[2]
      for vehicle in @vehicles
        # 乗物が戦車クラスでないなら次へ
        next unless vehicle.is_a?(Game_Tank)
        
        if px == vehicle.x and py == vehicle.y and 
          @map_id == vehicle.map_id and not add_tank and 
          (tmp_x != px or tmp_y != py)# 前の仲間の座標と違う場合
          not_ride = false
          # ＸＹ座標とマップＩＤが一致
          if value
            result3.each{|t|
            # 乗ってる戦車リストに一致するか？
            if t.x == vehicle.x and t.y == vehicle.y and 
              t.map_id == vehicle.map_id
              # 既に乗っている場合は乗車処理を行わないフラグ
              not_ride = true
              break
            end
            }
            unless not_ride
              # 戦車アクターを追加。
              result << vehicle.tank_data
              vehicle.sync_index = i
              vehicle.get_on   # 戦車クラスの乗車処理
              add_tank = true
              break
            else
              # 既に乗車中なら元の戦車アクターを追加。
              if @riding_tank
                result << $game_party.tank_members[i]
                add_tank = true
              end
            end
            
          else
            
            result2.each{|t|
            # 乗っていない戦車リストに一致するか？
            if t.x == vehicle.x and t.y == vehicle.y and 
              t.map_id == vehicle.map_id
              not_ride = true
              break
            end
            }
            if not_ride # 乗っていない戦車と合致しての降車は処理しない。
              result << $game_party.tank_members[i]
              break
            end
            
            # 戦車アクターを削除
            result << 0
            vehicle.get_off  # 戦車クラスの降車処理
            add_tank = true
          end
        end
      end
      # 仲間の座標を保存
      tmp_x = px
      tmp_y = py
      if value
        result << 0 unless add_tank   # 戦車追加フラグがないなら乗っていない処理
      end
      i += 1
      }
    a = result.clone
    b = a.delete(0)
    # 戦車メンバーから乗っていない「0」を削除したときに内容がないなら全員降車済み。
    if a.empty?
      # 既に降車中なら乗車フラグをＯＦＦ
      @riding_tank = false
    end
    # 戦車パーティに戦車を反映。
    $game_party.set_tank(result)
    # 戦車乗降ゲームスイッチ
    $game_switches[RIDE_TANK] = @riding_tank
  end
  #--------------------------------------------------------------------------
  # ● 乗り物の更新
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_update_vehicles update_vehicles
  def update_vehicles
    # Ｒボタンによる簡易乗降処理。
    if Input.trigger?(Input::R) and not $game_player.in_vehicle?
      if @riding_tank
        # 現在乗車中：降りる
        temp_members_dump(members)
        # 牽引を外す
        #$game_player.slip_traction_tank
        getting_on_and_off_tank_all(false)
        setup_friends(false)
        @riding_tank = false
      else
        # 現在降車中：乗る
        @riding_tank = true
        temp_members_dump(members)
        getting_on_and_off_tank_all(true)
        setup_friends(false)
      end
    end
    
    ed_mm_party_system_update_vehicles
  end
  #--------------------------------------------------------------------------
  # ● 作業用メンバーの保存
  #--------------------------------------------------------------------------
  def temp_members_dump(copy_members)
    @temp_members = Marshal.load(Marshal.dump(copy_members))
  end
  #--------------------------------------------------------------------------
  # ● 乗降メニュー画面からの処理。
  #--------------------------------------------------------------------------
  def menu_riding_tank(value,index=-1)
    @temp_members = Marshal.load(Marshal.dump(members))
    if index == -1
      # 全員乗降
      if @riding_tank
        # 現在乗車中：降りる
        getting_on_and_off_tank_all(false)
        setup_friends(false)
        @riding_tank = false
      else
        # 現在降車中：乗る
        @riding_tank = true
        getting_on_and_off_tank_all(true)
        setup_friends(false)
      end
    else
      # 個別乗降
      getting_on_and_off_tank_single(value,index)
      setup_friends(false)
      @riding_tank = value
    end
  end
  #--------------------------------------------------------------------------
  # ● 仲間のダッシュ状態反映

#--------------------------------------------------------------------------
  def actors_dash(value)
    vehicle = $game_map.vehicles[$game_player.vehicle_type]
    for event in @actors.values
      # 表示優先度をプレイヤーと一緒にする。
      event.priority_type = $game_player.priority_type
      # 移動スピードの設定。
      if $game_player.in_vehicle?
        # 乗り物に乗っているとき
        event.dash = false
        event.move_speed = vehicle.move_speed
      else
        # 歩いているとき
        # ダッシュの設定
        event.dash = value
        event.move_speed = $game_player.move_speed
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● イベントの更新
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_update_events update_events
  def update_events
    if @get_on_walk
      # 乗り終わったら仲間の座標や透明度を変更
      for event in @actors.values
        next if event == nil
        event.transparent = true if $game_player.transparent
        event.moveto($game_player.x, $game_player.y) 
      end
      @get_on_walk = false unless $game_player.vehicle_getting_on
    elsif $game_player.vehicle_getting_on
      # 乗っているときの仲間の動き
      gather_actors_walk
    #elsif $game_player.vehicle_getting_off
      # 降りたときの処理はGame_Player内で記述。
    end

vehicle = $game_map.vehicles[$game_player.vehicle_type]
    for event in @actors.values
      next if event == nil
      # 表示優先度をプレイヤーと一緒にする。
      event.priority_type = $game_player.priority_type
      # ダッシュの設定
      event.dash = $game_player.dash?
      # 移動スピードの設定。
      if $game_player.in_vehicle?
        # 乗り物に乗っているとき
        event.move_speed = vehicle.move_speed
      else
        # 歩いているとき
        event.move_speed = $game_player.move_speed
        # ゲームスイッチがONなら透明化。OFFで解除。
        if $game_switches[RANK_PARTY_VISIBLE]
          event.transparent = true
        else
          event.transparent = false
        end
      end
      # アクターイベントの更新。
      event.update
    end
    
    ed_mm_party_system_update_events
    
  end

end

#==============================================================================
# ■ Game_Character
#------------------------------------------------------------------------------
# 　キャラクターを扱うクラスです。このクラスは Game_Player クラスと Game_Event
# クラスのスーパークラスとして使用されます。
#==============================================================================

class Game_Character
  #--------------------------------------------------------------------------
  # ● すり抜けの設定
  #--------------------------------------------------------------------------  
  def through=(value)
    @through = value
  end
  #--------------------------------------------------------------------------
  # ● 移動速度の取得
  #--------------------------------------------------------------------------
  def move_speed
    return @move_speed
  end
  #--------------------------------------------------------------------------
  # ● 移動速度の設定
  #--------------------------------------------------------------------------
  def move_speed=(value)
    @move_speed = value
  end
  #--------------------------------------------------------------------------
  # ● 歩行グラフィック ファイル名
  #--------------------------------------------------------------------------
  def character_name=(value)
    @character_name = value
  end
  #--------------------------------------------------------------------------
  # ● 歩行グラフィック インデックス
  #--------------------------------------------------------------------------
  def character_index=(value)
    @character_index = value
  end
  #--------------------------------------------------------------------------
  # ● 表示優先度の変更(0:通常より下 1:通常と重ならない 2:通常より上)
  #--------------------------------------------------------------------------
  def priority_type=(value=1)
    @priority_type = value
  end
  #--------------------------------------------------------------------------
  # ● ダッシュ状態判定
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_dash? dash?
  def dash?
    if @dash
      return @dash
    else
      return ed_mm_party_system_dash?
    end
  end
  #--------------------------------------------------------------------------
  # ● ダッシュの設定
  #--------------------------------------------------------------------------
  def dash=(value=false)
    @dash = value
  end
  
end
#==============================================================================
# ■ Game_Tank
#------------------------------------------------------------------------------
# 　戦車を扱うクラスです。このクラスは Game_Map クラスの内部で使用されます。
#==============================================================================

class Game_Tank < Game_Character
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #     map_id : マップ ID
  #     actor_id  : 戦車アクターのＩＤ
  #--------------------------------------------------------------------------
  def initialize(actor_id)
    super()
    @sync_index = 0
    @driving = false
    @walk_anime = false
    @step_anime = false
    @actor = $game_actors[actor_id]
    @tank_setting = Tank_start_settings[actor_id]
    @priority_type = 0
    load_system_settings
  end
  #--------------------------------------------------------------------------
  # ● 乗車状態の取得
  #--------------------------------------------------------------------------
  def driving
    return @driving
  end
  #--------------------------------------------------------------------------
  # ● 仲間のインデックスと同期
  #--------------------------------------------------------------------------
  def sync_index
    return @sync_index
  end
  #--------------------------------------------------------------------------
  # ● 仲間のインデックスと同期
  #--------------------------------------------------------------------------
  def sync_index=(value)
    @sync_index = value
  end
  #--------------------------------------------------------------------------
  # ● 戦車アクターの取得
  #--------------------------------------------------------------------------
  def tank_data
    return @actor
  end
  #--------------------------------------------------------------------------
  # ● 戦車の存在するマップＩＤ取得
  #--------------------------------------------------------------------------
  def map_id
    return @map_id
  end
  #--------------------------------------------------------------------------
  # ● システム設定のロード
  #--------------------------------------------------------------------------
  def load_system_settings
    # 戦車の時はアクターや戦車設定から取得
    @character_name = @actor.character_name
    @character_index = @actor.character_index
    @bgm = RPG::BGM.new
    @map_id = @tank_setting[0]
    @x = @tank_setting[1]
    @y = @tank_setting[2]
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  def update
    # 移動速度をプレイヤーと同期
    self.move_speed = $game_player.move_speed
    self.dash = $game_player.dash?
    sync_with_player if @driving
    super
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  def refresh
    if @driving
      @map_id = $game_map.map_id
      sync_with_player
    elsif @map_id == $game_map.map_id
      moveto(@x, @y)
    end
    @walk_anime = @driving
    #@step_anime = @driving
  end
  #--------------------------------------------------------------------------
  # ● プレイヤーとの同期
  #--------------------------------------------------------------------------
  def sync_with_player
    data = $game_map.members[sync_index] # パーティの座標データなど
    return if data == nil
    # パーティのマップイベントデータ
    if sync_index == 0
      event_data = $game_player
    else
      event_data = $game_map.actors[sync_index]
    end
    
    # 座標をシンクロ
    @x = data[1]
    @y = data[2]
    @real_x = event_data.real_x#@x * 256
    @real_y = event_data.real_y#@y * 256
    @direction = data[3]
    # プレイヤーが乗り物に乗っていると透明にする。
    if $game_player.in_vehicle?
      @transparent = true
    else
      @transparent = false
      # ゲームスイッチがONなら透明化。OFFで解除。
      if @driving
        if $game_switches[RANK_PARTY_VISIBLE]
          @transparent = true
        else
          @transparent = false
        end
      end
    end
    update_bush_depth
  end
  #--------------------------------------------------------------------------
  # ● 位置の変更
  #     map_id : マップ ID
  #     x      : X 座標
  #     y      : Y 座標
  #--------------------------------------------------------------------------
  def set_location(map_id, x, y)
    @map_id = map_id
    @x = x
    @y = y
    refresh
  end
  #--------------------------------------------------------------------------
  # ● 乗り物に乗る
  #--------------------------------------------------------------------------
  def get_on
    @driving = true
    @walk_anime = true
    @priority_type = 1
    #@step_anime = true
    #@transparent = true # 戦車乗車中は透明状態にして仲間と共に移動。
  end
  #--------------------------------------------------------------------------
  # ● 乗り物から降りる
  #--------------------------------------------------------------------------
  def get_off
    @driving = false
    @walk_anime = false
    @priority_type = 0
    #@step_anime = false
    #@transparent = false # 戦車降車中はマップ上に表示するために透明解除
  end
  #--------------------------------------------------------------------------
  # ● 座標一致判定
  #     x : X 座標
  #     y : Y 座標
  #--------------------------------------------------------------------------
  def pos?(x, y)
    return (@map_id == $game_map.map_id and super(x, y))
  end
  #--------------------------------------------------------------------------
  # ● 透明判定
  #--------------------------------------------------------------------------
  def transparent
    return (@map_id != $game_map.map_id or super)
  end
end
#==============================================================================
# ■ Game_Player
#------------------------------------------------------------------------------
# 　プレイヤーを扱うクラスです。イベントの起動判定や、マップのスクロールなどの
# 機能を持っています。このクラスのインスタンスは $game_player で参照されます。
#==============================================================================

class Game_Player < Game_Character
  #--------------------------------------------------------------------------
  # ● 場所移動の実行
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_perform_transfer perform_transfer
  def perform_transfer
    return unless @transferring
    ed_mm_party_system_perform_transfer
    $game_map.set_party_place
    $game_map.update
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  def refresh
    if $game_party.battle_members.size == 0
      @character_name = ""
      @character_index = 0
    else
      actor = $game_party.battle_members[0]   # 先頭のアクターを取得
      @character_name = actor.character_name
      @character_index = actor.character_index
    end
  end
  #--------------------------------------------------------------------------
  # ● 指定位置に移動
  #     x : X 座標
  #     y : Y 座標
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_moveto moveto
  def moveto(x, y)
    @start_party_place = false if @start_party_place == nil
    ed_mm_party_system_moveto(x, y)
    # 初期位置と同じマップで座標なら場所移動後の位置設定を行う。
    if x == $data_system.start_x and y == $data_system.start_y and 
      @map_id == nil and not @start_party_place
      $game_map.set_party_place
      $game_map.update
      @start_party_place = true
    end
  end
  #--------------------------------------------------------------------------
  # ● 方向ボタン入力による移動処理
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_move_by_input move_by_input
  def move_by_input
    return unless movable?
    return if $game_map.interpreter.running?
    if $game_switches[RIDE_TANK]
      # 戦車乗車中で戦車パーティで戦闘不能がいれば移動できなくする。
      if Input.dir4 != 0
        if $game_message.texts.empty?
          for tank in $game_party.tank_members
            next if tank == 0 or tank == nil
            next if tank.exist?
            text = sprintf(VOCAB_BREAK_MOVE_TEXT,tank.name)
            $game_message.texts.push(text)
          end
        end
        return unless $game_party.tank_break_check?
      end
    end
    
    ed_mm_party_system_move_by_input
    
    $game_map.actors_walk
    
  end
  
  #--------------------------------------------------------------------------
  # ● 移動中でない場合の処理
  #     last_moving : 直前に移動中だったか
  #--------------------------------------------------------------------------
  def update_nonmoving(last_moving)
    return if $game_map.interpreter.running?
    return if moving?
    return if check_touch_event if last_moving
    if not $game_message.visible and Input.trigger?(Input::C)
      return if check_traction_tank # 牽引処理
      return if get_on_off_vehicle
      return if check_action_event
    end
    update_encounter if last_moving
  end
  #--------------------------------------------------------------------------
  # ● 同座標の戦車牽引処理
  #--------------------------------------------------------------------------
  def check_traction_tank
    map_id = $game_map.map_id
    result = []
    if $game_switches[RIDE_TANK]
      for tank in $game_map.tanks
        next if tank == nil
        if tank.map_id == map_id and self.x == tank.x and self.y == tank.y
          Audio.se_play(TRACTION_SE, 80, 100)
          # 同じマップで同じ座標
          if $game_party.stand_by_members.empty?
            # 現在のマップメンバー保存
            $game_map.temp_members_dump($game_map.members)
            # 待機メンバーに加算
            $game_party.add_stand_by_members = tank.tank_data.id
            # 牽引アクターを追加したらマップ上のキャラに反映
            $game_map.setup_friends(false)
            # 反映したらマップ上の戦車キャラを仲間の位置へ移動
            size = $game_party.map_members.size - 1
            tank.moveto($game_map.members[size][1],$game_map.members[size][2])
            # 移動したら乗車処理を行う
            $game_map.menu_riding_tank(true, $game_party.map_members.size - 1)
            # 乗車処理で牽引車が登録されるので削除して重複を防ぐ。
            $game_party.remove_tank_members(size)
            # 戦車キャラをアクターマップメンバーの位置と同期
            # 歩行履歴追加
            $game_temp.line_walk[size,0] = 0
            return true
          end
        end
      end
    end
    return false
  end
  #--------------------------------------------------------------------------
  # ● 牽引を外す
  #--------------------------------------------------------------------------
  def slip_traction_tank
    if $game_switches[RIDE_TANK] and not $game_party.stand_by_members.empty?
      # 戦車乗車中で待機メンバー(牽引)がある場合
      Audio.se_play(TRACTION_SE, 80, 100)
      # マップ上メンバーの末尾の牽引車取得
      size = $game_party.map_members.size - 1
      actor = $game_party.map_members[size]
      # 現在のメンバー座標の保存
      $game_map.temp_members_dump($game_map.members)
      # 牽引アクターの降車処理により戦車の隊列歩行から削除
      $game_map.menu_riding_tank(false, $game_party.map_members.size - 1)
      # メンバーから削除する
      $game_party.del_stand_by_members(actor.id)
      # 隊列歩行の再設定
      $game_map.setup_friends(false)
      # 末尾の歩行保存配列を削除。
      $game_temp.line_walk.pop
      return true
    end
    return false
  end
  #--------------------------------------------------------------------------
  # ● 乗り込み中フラグ
  #--------------------------------------------------------------------------
  def vehicle_getting_on
    return @vehicle_getting_on
  end
  #--------------------------------------------------------------------------
  # ● 降りる動作の開始
  #--------------------------------------------------------------------------
  def vehicle_getting_off
    return @vehicle_getting_off
  end
  #--------------------------------------------------------------------------
  # ● 小型船に乗る
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_get_on_boat get_on_boat
  def get_on_boat
    ed_mm_party_system_get_on_boat
    $game_temp.line_walk.unshift(@direction)
  end
  #--------------------------------------------------------------------------
  # ● 大型船に乗る
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_get_on_ship get_on_ship
  def get_on_ship
    ed_mm_party_system_get_on_ship
    $game_temp.line_walk.unshift(@direction)
  end
  #--------------------------------------------------------------------------
  # ● 船に乗っている状態の判定
  #--------------------------------------------------------------------------
  def in_bort_ship?
    return (@vehicle_type >= 0 and @vehicle_type <= 1) 
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  def update
    last_real_x = @real_x
    last_real_y = @real_y
    last_moving = moving?
    super
    move_by_input
    update_scroll(last_real_x, last_real_y)
    update_vehicle
    update_nonmoving(last_moving)
  end
  #--------------------------------------------------------------------------
  # ● 乗り物の処理
  #--------------------------------------------------------------------------
  def update_vehicle
    return unless in_vehicle?
    vehicle = $game_map.vehicles[@vehicle_type]
    if @vehicle_getting_on                    # 乗る途中？
      if not moving?
        # 後ろの仲間もプレイヤーまで移動したら乗る
        if $game_map.get_on_walk or $game_party.map_members.size == 1
          @direction = vehicle.direction        # 向きを変更
          @move_speed = vehicle.speed           # 移動速度を変更
          @vehicle_getting_on = false           # 乗る動作終了
          @transparent = true                   # 透明化
        end
      end
    elsif @vehicle_getting_off                # 降りる途中？
      if not moving? and vehicle.altitude == 0
        @vehicle_getting_off = false          # 降りる動作終了
        @vehicle_type = -1                    # 乗り物タイプ消去
        @transparent = false                  # 透明を解除
        
        # 降りたときもプレイヤーと同じ座標。
        $game_temp.format_line_walk
        for event in $game_map.actors.values
          next if event == nil
          event.moveto($game_player.x, $game_player.y)
          event.set_direction($game_player.direction)
          event.transparent = false
          event.through = false
        end
      end
    else                                      # 乗り物に乗っている
      vehicle.sync_with_player                # プレイヤーと同時に動かす
    end
  end
end
#==============================================================================
# ■ Game_Unit
#------------------------------------------------------------------------------
# 　ユニットを扱うクラスです。このクラスは Game_Party クラスと Game_Troop クラ
# スのスーパークラスとして使用されます。
#==============================================================================

class Game_Unit
  #--------------------------------------------------------------------------
  # ● 生存しているメンバーの配列取得
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_existing_members existing_members
  def existing_members
    result = []
    i = -1
    for battler in members
      i += 1
      if battler.is_a?(Game_Actor)
        if $game_switches[RIDE_TANK]
          # 戦車乗車中パーティ
          if Tank_start_settings.include?(battler.id)
            # 戦車の場合
            if battler.exist?
              # 戦車の生存を確認
              result.push(battler)
            elsif RIDING_ACTOR_IN_BATTLE
              actor = true
              # 生存していなければ搭乗者を生存者に加算
              result.push($game_actors[@actors[i]])
            end
          else
            # 戦車でない場合は通常処理
            next unless battler.exist?
            result.push(battler)
          end
        else
          # 戦車地域でも戦車乗車でもない
          next unless battler.exist?
          result.push(battler)
        end
      else
        # 敵の場合
        next unless battler.exist?
        result.push(battler)
      end
      
    end
    if actor
      dead_change_battle_members
    end
    return result
  end
end
#==============================================================================
# ■ Game_Party
#------------------------------------------------------------------------------
# 　パーティを扱うクラスです。ゴールドやアイテムなどの情報が含まれます。このク
# ラスのインスタンスは $game_party で参照されます。
#==============================================================================

class Game_Party < Game_Unit
  
  #--------------------------------------------------------------------------
  # ● 定数
  #--------------------------------------------------------------------------
  MAX_MEMBERS = MAX_PARTY_MEMBER                # 最大パーティ人数
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_initialize initialize
  def initialize
    ed_mm_party_system_initialize

@tank_members = []
    @battle_members = []
    @stand_by_members = []
    MAX_MEMBERS.times{|array|@tank_members << 0}
  end
  #--------------------------------------------------------------------------
  # ● アクターを加える
  #     actor_id : アクター ID
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_add_actor add_actor
  def add_actor(actor_id)
    ed_mm_party_system_add_actor(actor_id)
    $game_map.setup_friends(true)
    $game_map.party_graphic_refresh = true
  end
  #--------------------------------------------------------------------------
  # ● アクターを外す
  #     actor_id : アクター ID
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_remove_actor remove_actor
  def remove_actor(actor_id)
    ed_mm_party_system_remove_actor(actor_id)
    $game_map.setup_friends(true)
    $game_map.party_graphic_refresh = true
  end
  #--------------------------------------------------------------------------
  # ● メンバーの取得
  #--------------------------------------------------------------------------
  def members
    if $game_temp.in_battle
      return battle_members
    else
      return all_battlers
    end
  end
  #--------------------------------------------------------------------------
  # ● マップ表示用メンバーの取得
  #--------------------------------------------------------------------------
  def map_members
    if $game_switches[RIDE_TANK]
      # 戦車乗降時は牽引(待機)メンバーを追加
      return battle_members + stand_by_members
    else
      # 戦車に乗っていなければ普通
      return battle_members
    end
  end
  #--------------------------------------------------------------------------
  # ● 戦車が戦闘不能なら移動不能の確認
  #--------------------------------------------------------------------------
  def tank_break_check?
    result = []
    for tank in tank_members
      if tank == 0 or tank == nil
        result << tank if tank == 0
        next
      end
      next unless tank.exist?
      result << tank
    end
    return (tank_members == result)
  end
  #--------------------------------------------------------------------------
  # ● 戦闘メンバーの取得
  #--------------------------------------------------------------------------
  def battle_members
    # 以下追加
    result = []
    result_tank = []
    members = []
    size = @actors.size

#MAX_MEMBERS.times { |i|
    size.times{ |i|
    next if @actors[i] == nil
    result << $game_actors[@actors[i]]
    #unless @tank_members[i] == 0 or @tank_members[i] == nil
    if @tank_members[i] == 0 or @tank_members[i] == nil
      result_tank << 0 
    else
      result_tank << $game_actors[@tank_members[i]] 
    end
    }
    
    if $game_switches[RIDE_TANK]
      # 戦車乗車中パーティ
      for i in 0...result.size
        actor = result[i] == nil ? nil : result[i]
        tank = result_tank[i] == nil ? nil : result_tank[i]
        if tank != 0 and actor != nil
          members << tank
        else
          members << actor
        end
      end
    else
      # 戦車降車人間パーティ
      members = result
    end
    members.delete(nil)
    return members.compact
  end
  #--------------------------------------------------------------------------
  # ● 戦闘メンバーの取得
  #--------------------------------------------------------------------------
  def dead_change_battle_members
    # 以下追加
    result = []
    result_tank = []
    result_dead_tank = []
    members = []
    size = @actors.size

# 事前にnil要素をなくす(戦闘中のみの使用なので問題ないはず)
    @actors.delete(nil)
    @tank_members.delete(nil)
    
    #MAX_MEMBERS.times { |i|
    size.times{ |i|
    next if @actors[i] == nil
    result << $game_actors[@actors[i]]
    if @tank_members[i] == 0 or @tank_members[i] == nil
      result_tank << 0 
    else
      a = $game_actors[@tank_members[i]] 
      if a.dead? and RIDING_ACTOR_IN_BATTLE
        # 戦車が戦闘不能の場合は降車状態にする。
        result_dead_tank << 0
        result_tank << 0#a
      else
        result_dead_tank << a
        result_tank << a
      end
    end
    }
    
    if $game_switches[RIDE_TANK]
      # 戦車乗車中パーティ
      for i in 0...result.size
        actor = result[i] == nil ? nil : result[i]
        tank = result_tank[i] == nil ? nil : result_tank[i]
        if tank != 0 and actor != nil
          if tank.dead? and RIDING_ACTOR_IN_BATTLE
            members << actor
          else
            members << tank
          end
        else
          members << actor
        end
      end
    else
      # 戦車降車人間パーティ
      members = result
    end
    members.delete(nil)
    #unless result_tank == result_dead_tank
      # 戦車メンバーを死亡状態のメンバーに反映。
      set_tank(result_tank)#(result_dead_tank)
    #end
    return members
  end
  #--------------------------------------------------------------------------
  # ● 待機メンバーの取得
  #--------------------------------------------------------------------------
  def stand_by_members
    result = []
    @stand_by_members.uniq!#重複した要素を取る
    for actor_id in @stand_by_members.compact
      result.push($game_actors[actor_id])
    end
    return result
  end
  #--------------------------------------------------------------------------
  # ● 待機メンバーの直接追加 actor_id
  #--------------------------------------------------------------------------
  def add_stand_by_members=(actor_id)
    @stand_by_members.push(actor_id)
    
  end
  #--------------------------------------------------------------------------
  # ● 待機メンバーの削除
  #--------------------------------------------------------------------------
  def del_stand_by_members(actor_id)
    @stand_by_members.delete(actor_id)
  end
  #--------------------------------------------------------------------------
  # ● 待機メンバーの代入
  #--------------------------------------------------------------------------
  def stand_by_members=(members)
    result = []
    for i in members.compact
      result.push(i.id)
    end
    result.uniq!
    @stand_by_members = result
  end
  #--------------------------------------------------------------------------
  # ● アクターや戦車のＩＤ取得
  #--------------------------------------------------------------------------
  def actors_id
    return @actors
  end
  def tanks_id
    return @tank_members
  end
  #--------------------------------------------------------------------------
  # ● アクター戦闘メンバーの取得
  #--------------------------------------------------------------------------
  def actor_battle_members
    result = []
    for i in @actors.compact
      result.push($game_actors[i])
    end
    return result
  end
  #--------------------------------------------------------------------------
  # ● 戦車メンバーの新規設定
  #     new_member : 新しいメンバー
  #--------------------------------------------------------------------------
  def set_tank(new_member)
    @tank_members = []
    new_member.each { |actor| 
    if actor == 0 or not actor.is_a?(Game_Actor)
      # nil の場合
      @tank_members << 0 
    elsif actor.is_a?(Game_Actor)
      @tank_members << actor.id 
    end
    }
  end
  #--------------------------------------------------------------------------
  # ● 戦車の取得
  #--------------------------------------------------------------------------
  def tank_members
    result = []
    @tank_members.delete(nil)
    for i in @tank_members.compact
      result.push($game_actors[i]) unless i == 0
      result.push(0) if i == 0 # i が nil の場合
    end
    return result
  end
  #--------------------------------------------------------------------------
  # ● 戦車メンバーの直接削除 index
  #--------------------------------------------------------------------------
  def add_tank_members(index,tank_id)
    @tank_members[index] = tank_id
  end
  #--------------------------------------------------------------------------
  # ● 戦車メンバーの直接削除 index
  #--------------------------------------------------------------------------
  def remove_tank_members(index)
    @tank_members.delete_at(index)
  end
  #--------------------------------------------------------------------------
  # ● 人間＆戦車の取得(全体)
  #--------------------------------------------------------------------------
  def all_battlers
    result = actor_battle_members + tank_members + stand_by_members  
    result.delete(0)
    result.compact!
    return result
  end
  
  
end

#==============================================================================
# ■ Window_MenuStatus
#------------------------------------------------------------------------------
# 　メニュー画面でパーティメンバーのステータスを表示するウィンドウです。
#==============================================================================

class Window_MenuStatus < Window_Selectable
  #--------------------------------------------------------------------------
  # ● 定数
  #--------------------------------------------------------------------------
  STATUS_HEIGHT = 96  # ステータス一人分の高さ
  #--------------------------------------------------------------------------
  # ● ウィンドウ内容の作成
  #--------------------------------------------------------------------------
  def create_contents
    self.contents.dispose
    self.contents = Bitmap.new(width - 32,
      [height - 32, row_max * STATUS_HEIGHT].max)
  end
  #--------------------------------------------------------------------------
  # ● 先頭の行の取得
  #--------------------------------------------------------------------------
  def top_row
    return self.oy / STATUS_HEIGHT
  end
  #--------------------------------------------------------------------------
  # ● 先頭の行の設定
  #     row : 先頭に表示する行
  #--------------------------------------------------------------------------
  def top_row=(row)
    super(row)
    self.oy = self.oy / WLH * STATUS_HEIGHT
  end
  #--------------------------------------------------------------------------
  # ● 1 ページに表示できる行数の取得
  #--------------------------------------------------------------------------
  def page_row_max
    return (self.height - 32) / STATUS_HEIGHT
  end
  #--------------------------------------------------------------------------
  # ● 項目を描画する矩形の取得
  #     index : 項目番号
  #--------------------------------------------------------------------------
  def item_rect(index)
    rect = super(index)
    rect.height = STATUS_HEIGHT
    rect.y = index / @column_max * STATUS_HEIGHT
    return rect
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  def refresh
    @item_max = $game_party.members.size
    create_contents
    fill_stand_by_background
    draw_member
  end
  #--------------------------------------------------------------------------
  # ● パーティメンバー描画
  #--------------------------------------------------------------------------
  def draw_member
    for actor in $game_party.members
      draw_actor_face(actor, 2, actor.index * 96 + 2, 92)
      x = 104
      y = actor.index * 96 + WLH / 2
      draw_actor_name(actor, x, y)
      draw_actor_class(actor, x + 120, y)
      draw_actor_level(actor, x, y + WLH * 1)
      draw_actor_state(actor, x, y + WLH * 2)
      draw_actor_hp(actor, x + 120, y + WLH * 1)
      draw_actor_mp(actor, x + 120, y + WLH * 2)
    end
  end
  #--------------------------------------------------------------------------
  # ● 待機メンバーの背景色を塗る
  #--------------------------------------------------------------------------
  def fill_stand_by_background
    color = Color.new(0, 0, 0, 128)
    members = $game_party.members - $game_party.stand_by_members
    dy = STATUS_HEIGHT * members.size
    dh = STATUS_HEIGHT * $game_party.stand_by_members.size
    if dh > 0
      self.contents.fill_rect(0, dy, self.width - 32, dh, color)
    end
  end
  #--------------------------------------------------------------------------
  # ● カーソルの更新
  #--------------------------------------------------------------------------
  def update_cursor
    if @index < 0               # カーソルなし
      self.cursor_rect.empty
    elsif @index < @item_max    # 通常
      super
    elsif @index >= 100         # 自分
      self.cursor_rect.set(0, (@index - 100) * STATUS_HEIGHT,
        contents.width, STATUS_HEIGHT)
    else                        # 全体
      self.cursor_rect.set(0, 0, contents.width, @item_max * STATUS_HEIGHT)
    end
  end
end

#==============================================================================
# ■ Window_ActorCommand
#------------------------------------------------------------------------------
# 　バトル画面で、戦うか逃げるかを選択するウィンドウです。
#==============================================================================

class Window_ActorCommand < Window_Command
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_initialize initialize
  def initialize
    if $ed_rgss2["ed_battle_scene"] and not $ed_rgss2["ed_battle_scene_ff_edit"]
      super(416, [], 5, 1)
      self.active = false
    else
      ed_mm_party_system_initialize
    end
  end
  #--------------------------------------------------------------------------
  # ● セットアップ
  #     actor : アクター
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_setup setup
  def setup(actor)
    if $ed_rgss2["ed_battle_scene"] and not $ed_rgss2["ed_battle_scene_ff_edit"]
      s1 = Vocab::attack
      s2 = Vocab::skill
      s3 = Vocab::guard
      s4 = Vocab::item
      s5 = VOCAB_BATTLE_RIDE_TEXT
    
      if actor.class.skill_name_valid     # スキルのコマンド名が有効？
        s2 = actor.class.skill_name       # コマンド名を置き換える
      end
      @commands = [s1, s2, s3, s4, s5]
      @item_max = 5
      refresh
      self.index = 0
    else
      ed_mm_party_system_setup(actor)
    end
  end
end
#==============================================================================
# ■ Window_ShopStatus
#------------------------------------------------------------------------------
# 　ショップ画面で、アイテムの所持数やアクターの装備を表示するウィンドウです。
#==============================================================================

class Window_ShopStatus < Window_Base
  #--------------------------------------------------------------------------
  # ● ウィンドウ内容の作成
  #--------------------------------------------------------------------------
  def create_contents
    self.contents.dispose
    self.contents = Bitmap.new(width - 32,
      WLH * ($game_party.members.size + 1) * 2)
  end
end

#==============================================================================
# ■ Window_BattleStatus
#------------------------------------------------------------------------------
# 　バトル画面でパーティメンバーのステータスを表示するウィンドウです。
#==============================================================================

class Window_BattleStatus < Window_Selectable
  #--------------------------------------------------------------------------
  # ● ウィンドウ内容の作成
  #--------------------------------------------------------------------------
  def create_contents
    self.contents.dispose
    self.contents = Bitmap.new(width - 32,
      [WLH * $game_party.members.size, height - 32].max)
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_refresh refresh
  def refresh
    create_contents unless $ed_rgss2["ed_battle_scene"]

ed_mm_party_system_refresh
  end
end

#==============================================================================
# ■ Sprite_Battler
#------------------------------------------------------------------------------
# 　バトラー表示用のスプライトです。Game_Battler クラスのインスタンスを監視し、
# スプライトの状態を自動的に変化させます。
#==============================================================================

class Sprite_Battler < Sprite_Base
  #--------------------------------------------------------------------------
  # ● 新しいエフェクトの設定
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_setup_new_effect setup_new_effect
  def setup_new_effect
    unless @battler.actor?
      ed_mm_party_system_setup_new_effect
      return
    end
    # 戦車が戦闘不能の場合はアニメーション表示してコラプスする。
    if @battler.collapse and Tank_start_settings.include?(@battler.id) and 
      RIDING_ACTOR_IN_BATTLE
      
      @battler.animation_id = BREAK_ANIMATION_ID
      @tank_break_anime = true
      @effect_type = COLLAPSE unless animation?
      @effect_duration = 48 unless animation?
      @battler.collapse = false unless animation?
      @battler_visible = false unless animation?
      #start_animation($data_animations[BREAK_ANIMATION_ID])
    end
    ed_mm_party_system_setup_new_effect
  end
end
#==============================================================================
# ■ Spriteset_Map
#------------------------------------------------------------------------------
# 　マップ画面のスプライトやタイルマップなどをまとめたクラスです。このクラスは
# Scene_Map クラスの内部で使用されます。

#==============================================================================

class Spriteset_Map
  
  #--------------------------------------------------------------------------
  # ● キャラクタースプライトの作成
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_create_characters create_characters
  def create_characters
    ed_mm_party_system_create_characters
    @character_sprites += create_actor_party
  end
  #--------------------------------------------------------------------------
  # ● アクター仲間スプライトの作成
  #--------------------------------------------------------------------------
  def create_actor_party
    dispose_actor_party
    
    @actor_party = []
    for i in $game_map.actors.keys.sort
      next if $game_map.actors[i] == nil
      sprite = Sprite_Character.new(@viewport1, $game_map.actors[i])
      @actor_party << sprite
    end
    return @actor_party
  end
  #--------------------------------------------------------------------------
  # ● アクター仲間スプライトの解放
  #--------------------------------------------------------------------------
  def dispose_actor_party
    return if @actor_party == nil
    for sprite in @actor_party
      sprite.dispose
    end
  end
  #--------------------------------------------------------------------------
  # ● キャラクタースプライトの更新
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_update_characters update_characters
  def update_characters
    if $game_map.party_graphic_refresh
      @character_sprites -= @actor_party
      dispose_actor_party
      @character_sprites += create_actor_party
      $game_map.party_graphic_refresh = false
    end
      
    for sprite in @character_sprites
      # 現在のスプライトのcharacterデータ取得
      if @actor_party.include?(sprite)
        character = sprite.character
        # アクタースプライトとキャラスプライトが一致した場合
        for i in $game_map.actors.keys.sort
          actor = $game_map.actors[i]
          # game_map内のcharacterデータとスプライトのデータが一致しない場合再作成
          unless character == actor
            @character_sprites -= @actor_party
            @character_sprites += create_actor_party
          end
        end
      end
    end
    ed_mm_party_system_update_characters
  end
end

#==============================================================================
# ■ Scene_Shop
#------------------------------------------------------------------------------
# 　ショップ画面の処理を行うクラスです。
#==============================================================================

unless $imported["HelpExtension"]
class Scene_Shop < Scene_Base
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_update update
  def update
    # スクロール判定
    if !@command_window.active &&
        Input.press?(Input::A)
      super
      update_menu_background
      update_scroll_status
      return
    else
      @status_window.cursor_rect.empty
    end

ed_mm_party_system_update
  end
  #--------------------------------------------------------------------------
  # ● ステータスウィンドウのスクロール処理
  #--------------------------------------------------------------------------
  def update_scroll_status
    # ステータスウィンドウにカーソルを表示
    @status_window.cursor_rect.width = @status_window.contents.width
    @status_window.cursor_rect.height = @status_window.height - 32
    @status_window.update

if Input.press?(Input::UP)
      @status_window.oy = [@status_window.oy - 4, 0].max
    elsif Input.press?(Input::DOWN)
      max_pos = [@status_window.contents.height -
        (@status_window.height - 32), 0].max
      @status_window.oy = [@status_window.oy + 4, max_pos].min
    end
  end
end
end
#==============================================================================
# ■ Scene_Map
#------------------------------------------------------------------------------
# 　マップ画面の処理を行うクラスです。
#==============================================================================

class Scene_Map < Scene_Base
  
  #--------------------------------------------------------------------------
  # ● マップクラス作成処理
  #--------------------------------------------------------------------------
  def initialize
    if $game_temp.in_battle
      $battle_scene_switch_map = true
    else
      $battle_scene_switch_map = false
    end
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_update update
  def update
    if @get_on_off_window == nil

ed_mm_party_system_update 
      
      if Input.trigger?(Input::L) and not $game_player.in_vehicle?
        Sound.play_decision
        create_get_on_off_menu
      end
    else
      super
      update_basic
      update_get_on_off_menu
    end
  end  
  #--------------------------------------------------------------------------
  # ● 戦車乗降メニューの作成
  #--------------------------------------------------------------------------
  def create_get_on_off_menu
    str = []
    str << VOCAB_MENU_RIDE_TEXT
    for actor in $game_party.actor_battle_members
      str << actor.name
    end
    str << VOCAB_MENU_TRACT_TEXT
    @get_on_off_window = Window_Command.new(172,str)
    @get_on_off_window.x = 544 - 172
    @get_on_off_window.y = 416 - @get_on_off_window.height
    @get_on_off_window.active = true
    @get_on_off_window.visible = true
    @get_on_off_window.index = 0
    @get_on_off_window.update
  end
  #--------------------------------------------------------------------------
  # ● 戦車乗降メニューの更新
  #--------------------------------------------------------------------------
  def update_get_on_off_menu
    unless @get_on_off_window == nil
      @get_on_off_window.update
      if Input.trigger?(Input::C)
        Sound.play_decision
        index = @get_on_off_window.index
        case index
        when 0
          # 全員乗降
          flag = $game_switches[RIDE_TANK] ? false : true # 乗車中なら降車。逆も。
          $game_map.menu_riding_tank(flag, index - 1)
          
        when @get_on_off_window.commands.size - 1
          # 牽引
          if $game_switches[RIDE_TANK]
            if $game_party.stand_by_members.empty?
              $game_player.check_traction_tank
            else
              $game_player.slip_traction_tank
            end
          else
            Sound.play_buzzer
          end
        else
          # 個別乗降
          actor = $game_party.actor_battle_members[index - 1]
          tanks = $game_party.tank_members
          tanks.delete(0)
          # 人間メンバー取得、搭乗戦車アクターがnilなら人間のまま
          tank = actor.riding_actor(true)
          if tank == nil
            # 戦車アクターがnil、人間なので乗車処理
            $game_map.menu_riding_tank(true, index - 1)
          else
            # 戦車アクターがnilではないので降車処理
            $game_map.menu_riding_tank(false, index - 1)
            if tanks.size == 1
              # 仲間が１人なら牽引を外す。
              $game_player.slip_traction_tank
            end
          end
        end
        
        
      elsif Input.trigger?(Input::B)
        Sound.play_cancel
        dispose_get_on_off_menu
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 戦車乗降メニューの解放
  #--------------------------------------------------------------------------
  def dispose_get_on_off_menu
    unless @get_on_off_window == nil
      @get_on_off_window.dispose
      @get_on_off_window = nil
    end
  end
end
#==============================================================================
# ■ Scene_Battle
#------------------------------------------------------------------------------
# 　バトル画面の処理を行うクラスです。
#==============================================================================

class Scene_Battle < Scene_Base
  #--------------------------------------------------------------------------
  # ● 情報表示ビューポートの作成
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_create_info_viewport create_info_viewport
  def create_info_viewport
    ed_mm_party_system_create_info_viewport
    create_side_actor_command
    
  end
  #--------------------------------------------------------------------------
  # ● 乗降ウィンドウ及びコマンド作成
  #--------------------------------------------------------------------------
  def create_side_actor_command
    if $ed_rgss2["ed_battle_scene_ff_edit"]
      @side_window = true
    elsif $ed_rgss2["ed_battle_scene"]
      @side_window = false
    else
      @side_window = true
    end
    
    if @side_window
      @side_actor_command = Window_Command.new(128,[VOCAB_BATTLE_RIDE_TEXT])
      @side_actor_command.viewport = @actor_command_window.viewport
      @side_actor_command.x = @actor_command_window.x - 128
      @side_actor_command.y = @actor_command_window.y
      @side_actor_command.visible = false
      @side_actor_command.active = false
    end
    # 戦闘開始時の戦車メンバーを保存
    @tank_members = Marshal.load(Marshal.dump($game_party.tanks_id))
  end
  #--------------------------------------------------------------------------
  # ● 情報表示ビューポートの更新
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_update_info_viewport update_info_viewport
  def update_info_viewport
    @side_actor_command.update if @side_window
    ed_mm_party_system_update_info_viewport
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_update update
  def update
    unless @side_window
      # バトルレイアウト変更導入の場合
      ed_mm_party_system_update
      return
    end
    # 純正の処理
    unless $game_message.visible          # メッセージ表示中以外
      if @side_actor_command.active
        # 乗降コマンド表示中の場合
        super
        update_basic(true)
        update_info_viewport                  # 情報表示ビューポートを更新
        update_side_actor_command
      end
    end
    ed_mm_party_system_update unless @side_actor_command.active
  end
  #--------------------------------------------------------------------------
  # ● アクターコマンド選択の更新
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_update_actor_command_selection update_actor_command_selection
  def update_actor_command_selection
    unless @side_window
      # バトルレイアウト変更導入済みの場合はアクターコマンドに組み込み済み
      if Input.trigger?(Input::C)
        case @actor_command_window.index
        when 4
          # 乗降コマンド
          get_on_off_command
        end
      end
      # 純正の処理。
      ed_mm_party_system_update_actor_command_selection
    else
      # 純正メニューの場合、アクターコマンド表示中に左キーで乗降メニュー
      # 乗降メニュー表示中は右キーでアクターコマンドに戻る。
      if Input.trigger?(Input::LEFT) and @actor_command_window.active
        Sound.play_cursor
        @side_actor_command.active = true
        @side_actor_command.visible = true
        @actor_command_window.active = false
      else
        ed_mm_party_system_update_actor_command_selection
      end
    end#$ed_rgss2["ed_battle_scene"]
  end
  #--------------------------------------------------------------------------
  # ● 乗降コマンドの更新
  #--------------------------------------------------------------------------
  def update_side_actor_command
    if Input.trigger?(Input::RIGHT) and @side_actor_command.active
      Sound.play_cursor
      @side_actor_command.active = false
      @side_actor_command.visible = false
      @actor_command_window.active = true
    end
    
    if @side_actor_command.active
      # そうでないなら、決定キー押しで乗降処理
      case @side_actor_command.index
      when 0
        get_on_off_command
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 乗降コマンド処理
  #--------------------------------------------------------------------------
  def get_on_off_command
    if Input.trigger?(Input::C)
      unless @active_battler.riding_actor == nil
        # 戦車アクターの場合
        index = $game_party.tank_members.index(@active_battler)
        get_on_off_actor(index, false)
      else
        # 人間の場合
        index = $game_party.actor_battle_members.index(@active_battler)
        get_on_off_actor(index, true)
      end
      if @side_window
        @side_actor_command.active = false
        @side_actor_command.visible = false
        @actor_command_window.active = true
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 戦車乗降処理
  #     index : アクターパーティのindex
  #     ride  : trueで乗車。falseで降車
  #--------------------------------------------------------------------------
  def get_on_off_actor(index,ride=true)
    # 戦闘開始時に仲間が降車状態なら戻る  @actor_index
    if @tank_members[index] == 0
      Sound.play_buzzer
      return
    end
    
    if ride and $game_party.tank_members[index] == 0
      # 乗車で、戦車アクターが0、つまり降車状態
      unless $game_actors[@tank_members[index]].dead?
        Sound.play_decision
        $game_party.add_tank_members(index, @tank_members[index])
        # 乗車するので戦車アクターを代入する。
        @active_battler = $game_party.tank_members[index]
        if $ed_rgss2["ed_active_time_battle"]
          @active_battler.action.speed = COUNT_MAX
        end
        # 戦闘画面を更新する。
        simple_refresh
      else
        Sound.play_buzzer
      end
      
    elsif not ride and $game_party.tank_members[index] != 0
      # 降車で、戦車アクターが戦闘状態。
      Sound.play_decision
      $game_party.add_tank_members(index, 0)
      # 降車するので乗員を代入。
      @active_battler = $game_party.actor_battle_members[index]
      if $ed_rgss2["ed_active_time_battle"]
        @active_battler.action.speed = COUNT_MAX
      end
      # 戦闘画面を更新する。
      simple_refresh
    end
    
  end
  #--------------------------------------------------------------------------
  # ● 戦闘画面のリフレッシュ$ed_rgss2["ed_mm_party_system"]
  #--------------------------------------------------------------------------
  def simple_refresh
    if $ed_rgss2["ed_battle_scene"]
      format_battler
    else
      @status_window.refresh
      @status_window.update
    end
    update_basic
  end
  #--------------------------------------------------------------------------
  # ● 戦車アクター死亡→乗車アクター出撃の表示
  #     target : 対象者 (アクター)
  #--------------------------------------------------------------------------
  def dead_tank_launch(target)
    if target.is_a?(Game_Actor) and target.dead? and 
      Tank_start_settings.include?(target.id)
      # アクターで死亡で不死身で戦車の場合
      @message_window.clear
      @message_window.update
      text = sprintf(VOCAB_BREAK_TANK_TEXT, target.name, target.riding_actor.name)
      @message_window.add_instant_text(text)
      wait(40)
      wait_for_animation
      $game_party.dead_change_battle_members
      if $ed_rgss2["ed_battle_scene"] == true
        format_battler
        enemy_hp_gauge
        wait(1)
      end
      
    end
  end
  #--------------------------------------------------------------------------
  # ● 付加されたステートの表示
  #     target : 対象者
  #     obj    : スキルまたはアイテム
  #--------------------------------------------------------------------------
  alias ed_mm_party_system_display_added_states display_added_states
  def display_added_states(target, obj = nil)
    ed_mm_party_system_display_added_states(target, obj)
    dead_tank_launch(target) if RIDING_ACTOR_IN_BATTLE
  end
end

テンプレートのpondt