#==============================================================================
# ■ パーティ非参加のメンバーに経験値分配 ver 1.01
#------------------------------------------------------------------------------
# 　配布元:
#     白の魔 http://www12.plala.or.jp/izumiizayoi/tkool/
#
# 　利用規約:
#     RPGツクールVXの正規の登録者のみご利用になれます。
#     利用報告・著作権表示とかは必要ありません。
#     改造もご自由にどうぞ。
#     何か問題が発生しても責任は持ちません。
#==============================================================================

#--------------------------------------------------------------------------
# ★ 初期設定。
#    分配される経験値の割合と、
#    分配される条件をアクターごとにスイッチで指定します。
#--------------------------------------------------------------------------
module WD_expextramembers_ini
 Extra_percentage = 50 #パーティ非参加のメンバーに分配される経験値の割合(％)。
 Extra_message = true #パーティ非参加のメンバーのレベルアップメッセージの表示。
 #以下、アクターに経験値が分配される条件をスイッチで指定します。
 All_switch = 1      #スイッチ1がONの時、全てのアクターに経験値が分配される。
                     #但し、名前が空白のキャラには分配されません。
 Extra_switch = []   #この行は消さないこと。
 Extra_switch[1] = 2 #スイッチ2がONの時、1番のアクターに経験値が分配される。
 Extra_switch[7] = 5 #スイッチ5がONの時、7番のアクターに経験値が分配される。
 Extra_switch[8] = 4 #スイッチ4がONの時、8番のアクターに経験値が分配される。
end
#--------------------------------------------------------------------------
# ★ 初期設定おわり
#--------------------------------------------------------------------------

class Scene_Battle < Scene_Base
  #--------------------------------------------------------------------------
  # ● レベルアップの表示
  #--------------------------------------------------------------------------
  def display_level_up
    exp = $game_troop.exp_total
    for actor in $game_party.existing_members
      last_level = actor.level
      last_skills = actor.skills
      actor.gain_exp(exp, true)
    end
    if exp > 0
      exp2 = [exp*WD_expextramembers_ini::Extra_percentage/100,1].max
    elsif exp == 0
      exp2 = 0
    end
    i = 0
    for i in 1...$data_actors.size
      expsw = WD_expextramembers_ini::Extra_switch[i]
      exphantei = false
      if expsw != nil
        if $game_switches[expsw] or $game_switches[WD_expextramembers_ini::All_switch]
          exphantei = true
        end
      else
        if $game_switches[WD_expextramembers_ini::All_switch]
          exphantei = true
        end
      end
      if exphantei and ($game_party.members.include?($game_actors[i])) == false
        if $game_actors[i].name.size > 0 #名前が空白のキャラには分配しない
          last_level = $game_actors[i].level
          last_skills = $game_actors[i].skills
          $game_actors[i].gain_exp(exp2, WD_expextramembers_ini::Extra_message)
        end
      end
      i = i + 1
    end
    wait_for_message
  end
end