Project1

标题: 怎么增加伙伴和替补功能？ [打印本页]

---

作者: lcj582856013    时间: 2014-4-12 17:50
标题: 怎么增加伙伴和替补功能？
不知道大家有没有这样一个脚本，就是突破四个人的限制，多余的人放在替补整容中，战斗的时候也是四个人战斗，在不战斗时可以随时把主力放替补里，也可以把替补里的角色放到主力里，可以随意调整，有的话给我一个，好急啊！

---

作者: jilei    时间: 2014-4-13 08:46
你是rm什么的，如果是xp的，记得修改最大人数，换人脚本其实就可以实现

RUBY 代码复制

module LimBattlePlug
 
# 队伍最大人数
MaxPartySize = 8      #自己修改最大人数
 
# 出战人数
MaxBattlerSize = 4
 
# 换人语句
WordChangeBattler = "换人"
 
# 换人时播放的动画
AnimationChangeBattler = 26
 
end
 
class Game_BattleAction
  attr_accessor :change_to_battler
  # 初始化
  alias lbp_initialize initialize
  def initialize
    lbp_initialize
    @change_to_battler = 0
  end
  # 欲更换角色编号
  def set_change_battler
    @kind = 3
  end
  # 判断行动是否为更换角色
  def is_change_battler?
    return (@kind == 3)
  end
end
 
class Game_Party
  include LimBattlePlug
  attr_reader :actors2
  alias lpb_initialize initialize
  def initialize
    lpb_initialize
    @actors2 = []
  end
  # 角色加入
  def add_actor(actor_id)
    actor = $game_actors[actor_id]
    if @actors.size < MaxPartySize and not @actors.include?(actor)
      @actors.push(actor)
      $game_player.refresh
    end
  end
  # 设置战斗的角色
  def set_actor_to_battle
    @actors2 = []
    @actors.each do |actor|
      @actors2.push(actor)
    end
    @actors = []
    @actors2.each do |actor|
      @actors.push(actor)
      break if @actors.size == MaxBattlerSize
    end
  end
  # 还原战斗的角色
  def set_actor_to_normal
    @actors = []
    @actors2.each do |actor|
      @actors.push(actor)
    end
  end
  # 获取角色id数组
  def get_actors_id
    id = []
    @actors.each{|actor|id.push(actor.id)}
    return id
  end
  # 获取角色id数组
  def get_actors2_id
    id = []
    @actors2.each{|actor|id.push(actor.id)}
    return id
  end
  # 兑换角色
  def change_actor(index,id)
    @actors[index] = $game_actors[id]
  end
  # 全灭判定
  def all_dead?
    # 同伴人数为 0 的情况下
    if $game_party.actors.size == 0
      return false
    end
    # 同伴中无人 HP 在 0 以上
    for actor in @actors2
      if actor.hp > 0
        return false
      end
    end
    for actor in @actors
      if actor.hp > 0
        return false
      end
    end
    # 全灭
    return true
  end
  # 其他角色
  def other_actors
    actors = []
    @actors2.each{|actor|actors.push(actor) if !@actors.include?(actor)}
    return actors
  end
  # 角色位置互换
  def change_actor_pos(id1,id2)
    actor_id = []
    @actors.each do |actor|
      actor_id.push(actor.id)
    end
    return if !actor_id.include?(id1) and !actor_id.include?(id2)
    id1_index = id2_index = -1
    (0...actor_id.size).each do |i|
      if actor_id[i] == id1
        id1_index = i
      elsif actor_id[i] == id2
        id2_index = i
      end
    end
    temp_actor = @actors[id1_index]
    @actors[id1_index] = @actors[id2_index]
    @actors[id2_index] = temp_actor
  end
end
 
class Window_Actor < Window_Selectable
  # 初始化
  def initialize
    super(0,64,640,256)
    self.back_opacity = 160
    refresh
    self.index = -1
    self.active = false
  end
  # 刷新
  def refresh
    @item_max = $game_party.actors2.size
    @data = []
    $game_party.actors.each do |actor|
      @data.push(actor)
    end
    $game_party.actors2.each do |actor|
      @data.push(actor) if !@data.include?(actor)
    end
    if self.contents != nil
      self.contents.clear
      self.contents = nil
    end
    self.contents = Bitmap.new(608,@data.size*32)
    x = 4
    y = 0
    @data.each do |actor|
      bitmap = RPG::Cache.character(actor.character_name,actor.character_hue)
      rect = Rect.new(0,0,bitmap.width/4,31)
      self.contents.blt(x+16-bitmap.width/8,y,bitmap,rect)
      draw_actor_name(actor,x+36,y)
      draw_actor_state(actor,156,y)
      draw_actor_hp(actor,x+256,y,96)
      draw_actor_sp(actor,x+376,y,96)
      if $game_party.actors.include?(actor)
        self.contents.font.color = text_color(1)
        cword = "出战"
      else
        self.contents.font.color = text_color(0)
        cword = "待战"
      end
      self.contents.draw_text(x+496,y,60,32,cword)
      y += 32
    end
  end
  # 获取当前角色编号
  def actor_id
    return @data[self.index].id
  end
  # 刷新帮助
  def update_help
    @help_window.set_text(@data[self.index] == nil ?\
                          "" : @data[self.index].name)
  end
end
 
class Scene_Battle
  include LimBattlePlug
  # 初始化
  def initialize
    $game_party.set_actor_to_battle
  end
  # 主处理
  def main
    # 初始化战斗用的各种暂时数据
    $game_temp.in_battle = true
    $game_temp.battle_turn = 0
    $game_temp.battle_event_flags.clear
    $game_temp.battle_abort = false
    $game_temp.battle_main_phase = false
    $game_temp.battleback_name = $game_map.battleback_name
    $game_temp.forcing_battler = nil
    # 初始化战斗用事件解释器
    $game_system.battle_interpreter.setup(nil, 0)
    # 准备队伍
    @troop_id = $game_temp.battle_troop_id
    $game_troop.setup(@troop_id)
    # 生成角色命令窗口
    s1 = $data_system.words.attack
    s2 = $data_system.words.skill
    s3 = $data_system.words.guard
    s4 = $data_system.words.item
    s5 = WordChangeBattler
    @actor_command_window = Window_Command.new(160, [s1, s2, s3, s4,s5])
    @actor_command_window.y = 128
    @actor_command_window.back_opacity = 160
    @actor_command_window.active = false
    @actor_command_window.visible = false
    # 生成其它窗口
    @party_command_window = Window_PartyCommand.new
    @help_window = Window_Help.new
    @help_window.back_opacity = 160
    @help_window.visible = false
    @status_window = Window_BattleStatus.new
    @message_window = Window_Message.new
    # 生成活动块
    @spriteset = Spriteset_Battle.new
    # 初始化等待计数
    @wait_count = 0
    # 执行过渡
    if $data_system.battle_transition == ""
      Graphics.transition(20)
    else
      Graphics.transition(40, "Graphics/Transitions/" +
        $data_system.battle_transition)
    end
    # 开始自由战斗回合
    start_phase1
    # 主循环
    loop do
      # 刷新游戏画面
      Graphics.update
      # 刷新输入信息
      Input.update
      # 刷新画面
      update
      # 如果画面切换的话就中断循环
      if $scene != self
        break
      end
    end
    # 刷新地图
    $game_map.refresh
    # 准备过渡
    Graphics.freeze
    # 释放窗口
    @actor_command_window.dispose
    @party_command_window.dispose
    @help_window.dispose
    @status_window.dispose
    @message_window.dispose
    if @skill_window != nil
      @skill_window.dispose
    end
    if @item_window != nil
      @item_window.dispose
    end
    if @actor_window != nil
      @actor_window.dispose
    end
    if @result_window != nil
      @result_window.dispose
    end
    # 释放活动块
    @spriteset.dispose
    # 标题画面切换中的情况
    if $scene.is_a?(Scene_Title)
      # 淡入淡出画面
      Graphics.transition
      Graphics.freeze
    end
    # 战斗测试或者游戏结束以外的画面切换中的情况
    if $BTEST and not $scene.is_a?(Scene_Gameover)
      $scene = nil
    end
  end
  # 战斗结束
  alias lpb_battle_end battle_end
  def battle_end(n)
    lpb_battle_end(n)
    $game_party.set_actor_to_normal
  end
  # 开始回合3
  alias lbp_start_phase3 start_phase3
  def start_phase3
    @changed_battler_id = []
    lbp_start_phase3
  end
  # 刷新角色命令回合画面
  def update_phase3
    # 敌人光标有效的情况下
    if @enemy_arrow != nil
      update_phase3_enemy_select
    # 角色光标有效的情况下
    elsif @actor_arrow != nil
      update_phase3_actor_select
    # 特技窗口有效的情况下
    elsif @skill_window != nil
      update_phase3_skill_select
    # 物品窗口有效的情况下
    elsif @item_window != nil
      update_phase3_item_select
    elsif @actor_window != nil
      update_phase3_battler_select
    # 角色指令窗口有效的情况下
    elsif @actor_command_window.active
      update_phase3_basic_command
    end
  end
  # 角色基本命令
  def update_phase3_basic_command
    # 按下 B 键的情况下
    if Input.trigger?(Input::B)
      # 演奏取消 SE
      $game_system.se_play($data_system.cancel_se)
      # 转向前一个角色的指令输入
      phase3_prior_actor
      return
    end
    # 按下 C 键的情况下
    if Input.trigger?(Input::C)
      # 角色指令窗口光标位置分之
      case @actor_command_window.index
      when 0  # 攻击
        # 演奏确定 SE
        $game_system.se_play($data_system.decision_se)
        # 设置行动
        @active_battler.current_action.kind = 0
        @active_battler.current_action.basic = 0
        # 开始选择敌人
        start_enemy_select
      when 1  # 特技
        # 演奏确定 SE
        $game_system.se_play($data_system.decision_se)
        # 设置行动
        @active_battler.current_action.kind = 1
        # 开始选择特技
        start_skill_select
      when 2  # 防御
        # 演奏确定 SE
        $game_system.se_play($data_system.decision_se)
        # 设置行动
        @active_battler.current_action.kind = 0
        @active_battler.current_action.basic = 1
        # 转向下一位角色的指令输入
        phase3_next_actor
      when 3  # 物品
        # 演奏确定 SE
        $game_system.se_play($data_system.decision_se)
        # 设置行动
        @active_battler.current_action.kind = 2
        # 开始选择物品
        start_item_select
      when 4 # 换人
        $game_system.se_play($data_system.decision_se)
        @active_battler.current_action.set_change_battler
        start_battler_select
      end
      return
    end
  end
  # 开始角色选择
  def start_battler_select
    @actor_window = Window_Actor.new
    @actor_window.active = true
    @actor_window.index = 0
    @actor_window.help_window = @help_window
    @actor_command_window.active = false
    @actor_command_window.visible = false
  end
  # 结束角色选择
  def end_battler_select
    @actor_window.dispose
    @actor_window = nil
    @help_window.visible = false
    @actor_command_window.active = true
    @actor_command_window.visible = true
  end
  # 刷新角色选择
  def update_phase3_battler_select
    @actor_window.visible = true
    @actor_window.update
    if Input.trigger?(Input::B)
      $game_system.se_play($data_system.cancel_se)
      end_battler_select
      return
    end
    if Input.trigger?(Input::C)
      actor_id = @actor_window.actor_id
      if $game_party.get_actors_id.include?(actor_id) or
         $game_actors[actor_id].dead? or 
         @changed_battler_id.include?(actor_id)
        $game_system.se_play($data_system.buzzer_se)
        return
      end
      $game_system.se_play($data_system.decision_se)
      @active_battler.current_action.change_to_battler = actor_id
      @changed_battler_id.push(actor_id)
      end_battler_select
      phase3_next_actor
      return
    end
  end
  # 行动方动画
  def update_phase4_step3
    if @active_battler.current_action.is_change_battler?
      @animation1_id = AnimationChangeBattler
      @target_battlers = []
    end
    # 行动方动画 (ID 为 0 的情况下是白色闪烁)
    if @animation1_id == 0
      @active_battler.white_flash = true
    else
      @active_battler.animation_id = @animation1_id
      @active_battler.animation_hit = true
    end
    # 移至步骤 4
    @phase4_step = 4
  end
  # 对象方动画
  def update_phase4_step4
    if @active_battler.current_action.is_change_battler?
      actor1_id = @active_battler.current_action.change_to_battler
      actor2_id = @active_battler.id
      (0...$game_party.actors.size).each do |i|
        if $game_party.actors[i].id == actor2_id
          $game_party.change_actor(i,actor1_id)
          @active_battler = $game_actors[actor1_id]
          @status_window.refresh
        end
      end
    end
    # 对像方动画
    for target in @target_battlers
      target.animation_id = @animation2_id
      target.animation_hit = (target.damage != "Miss")
    end
    # 限制动画长度、最低 8 帧
    @wait_count = 8
    # 移至步骤 5
    @phase4_step = 5
  end
  # 公共事件
  def update_phase4_step6
    @target_battlers.each do |target|
      if target.is_a?(Game_Actor) and target.dead? and
         !$game_party.other_actors.all?{|actor|actor.dead?}
        @actor_window = Window_Actor.new
        @actor_window.index = 0
        @actor_window.active = true
        @actor_window.help_window = @help_window
        actor_id = -1
        loop do
          Graphics.update
          Input.update
          @actor_window.update
          if Input.trigger?(Input::C)
            actor = $game_actors[@actor_window.actor_id]
            if actor.dead? or
               (@changed_battler_id.include?(actor.id) and 
                target.current_action.change_to_battler != actor.id) or
               $game_party.actors.include?(actor)
              $game_system.se_play($data_system.buzzer_se)
            else
              actor_id = actor.id
            end
          end
          break if actor_id >= 0
        end
        @actor_window.visible = false
        @actor_window.dispose
        @actor_window = nil
        @help_window.visible = false
        (0...$game_party.actors.size).each do |i|
          if $game_party.actors[i].id == target.id
            $game_party.change_actor(i,actor_id)
            @status_window.refresh
          end
        end
      end
    end
    # 清除强制行动对像的战斗者
    $game_temp.forcing_battler = nil
    # 公共事件 ID 有效的情况下
    if @common_event_id > 0
      # 设置事件
      common_event = $data_common_events[@common_event_id]
      $game_system.battle_interpreter.setup(common_event.list, 0)
    end
    # 移至步骤 1
    @phase4_step = 1
  end
end
 
class Window_MenuStatus
  def refresh
    self.contents.clear
    @item_max = $game_party.actors.size
    for i in 0...$game_party.actors.size
      x = 4
      y = i * 32
      actor = $game_party.actors[i]
      bitmap = RPG::Cache.character(actor.character_name,actor.character_hue)
      rect = Rect.new(0,0,bitmap.width/4,31)
      self.contents.blt(x+16-bitmap.width/8,y,bitmap,rect)
      draw_actor_name(actor, x+36, y)
      draw_actor_state(actor, x + 136,y)
      draw_actor_hp(actor, x + 236, y,96)
      draw_actor_sp(actor, x + 336, y,96)
    end
  end
  def update_cursor_rect
    super
  end
end

module LimBattlePlug


 


# 队伍最大人数


MaxPartySize = 8      #自己修改最大人数


 


# 出战人数


MaxBattlerSize = 4


 


# 换人语句


WordChangeBattler = "换人"


 


# 换人时播放的动画


AnimationChangeBattler = 26


 


end


 


class Game_BattleAction


  attr_accessor :change_to_battler


  # 初始化


  alias lbp_initialize initialize


  def initialize


    lbp_initialize


    @change_to_battler = 0


  end


  # 欲更换角色编号


  def set_change_battler


    @kind = 3


  end


  # 判断行动是否为更换角色


  def is_change_battler?


    return (@kind == 3)


  end


end


 


class Game_Party


  include LimBattlePlug


  attr_reader :actors2


  alias lpb_initialize initialize


  def initialize


    lpb_initialize


    @actors2 = []


  end


  # 角色加入


  def add_actor(actor_id)


    actor = $game_actors[actor_id]


    if @actors.size < MaxPartySize and not @actors.include?(actor)


      @actors.push(actor)


      $game_player.refresh


    end


  end


  # 设置战斗的角色


  def set_actor_to_battle


    @actors2 = []


    @actors.each do |actor|


      @actors2.push(actor)


    end


    @actors = []


    @actors2.each do |actor|


      @actors.push(actor)


      break if @actors.size == MaxBattlerSize


    end


  end


  # 还原战斗的角色


  def set_actor_to_normal


    @actors = []


    @actors2.each do |actor|


      @actors.push(actor)


    end


  end


  # 获取角色id数组


  def get_actors_id


    id = []


    @actors.each{|actor|id.push(actor.id)}


    return id


  end


  # 获取角色id数组


  def get_actors2_id


    id = []


    @actors2.each{|actor|id.push(actor.id)}


    return id


  end


  # 兑换角色


  def change_actor(index,id)


    @actors[index] = $game_actors[id]


  end


  # 全灭判定


  def all_dead?


    # 同伴人数为 0 的情况下


    if $game_party.actors.size == 0


      return false


    end


    # 同伴中无人 HP 在 0 以上


    for actor in @actors2


      if actor.hp > 0


        return false


      end


    end


    for actor in @actors


      if actor.hp > 0


        return false


      end


    end


    # 全灭


    return true


  end


  # 其他角色


  def other_actors


    actors = []


    @actors2.each{|actor|actors.push(actor) if !@actors.include?(actor)}


    return actors


  end


  # 角色位置互换


  def change_actor_pos(id1,id2)


    actor_id = []


    @actors.each do |actor|


      actor_id.push(actor.id)


    end


    return if !actor_id.include?(id1) and !actor_id.include?(id2)


    id1_index = id2_index = -1


    (0...actor_id.size).each do |i|


      if actor_id[i] == id1


        id1_index = i


      elsif actor_id[i] == id2


        id2_index = i


      end


    end


    temp_actor = @actors[id1_index]


    @actors[id1_index] = @actors[id2_index]


    @actors[id2_index] = temp_actor


  end


end


 


class Window_Actor < Window_Selectable


  # 初始化


  def initialize


    super(0,64,640,256)


    self.back_opacity = 160


    refresh


    self.index = -1


    self.active = false


  end


  # 刷新


  def refresh


    @item_max = $game_party.actors2.size


    @data = []


    $game_party.actors.each do |actor|


      @data.push(actor)


    end


    $game_party.actors2.each do |actor|


      @data.push(actor) if !@data.include?(actor)


    end


    if self.contents != nil


      self.contents.clear


      self.contents = nil


    end


    self.contents = Bitmap.new(608,@data.size*32)


    x = 4


    y = 0


    @data.each do |actor|


      bitmap = RPG::Cache.character(actor.character_name,actor.character_hue)


      rect = Rect.new(0,0,bitmap.width/4,31)


      self.contents.blt(x+16-bitmap.width/8,y,bitmap,rect)


      draw_actor_name(actor,x+36,y)


      draw_actor_state(actor,156,y)


      draw_actor_hp(actor,x+256,y,96)


      draw_actor_sp(actor,x+376,y,96)


      if $game_party.actors.include?(actor)


        self.contents.font.color = text_color(1)


        cword = "出战"


      else


        self.contents.font.color = text_color(0)


        cword = "待战"


      end


      self.contents.draw_text(x+496,y,60,32,cword)


      y += 32


    end


  end


  # 获取当前角色编号


  def actor_id


    return @data[self.index].id


  end


  # 刷新帮助


  def update_help


    @help_window.set_text(@data[self.index] == nil ?\


                          "" : @data[self.index].name)


  end


end


 


class Scene_Battle


  include LimBattlePlug


  # 初始化


  def initialize


    $game_party.set_actor_to_battle


  end


  # 主处理


  def main


    # 初始化战斗用的各种暂时数据


    $game_temp.in_battle = true


    $game_temp.battle_turn = 0


    $game_temp.battle_event_flags.clear


    $game_temp.battle_abort = false


    $game_temp.battle_main_phase = false


    $game_temp.battleback_name = $game_map.battleback_name


    $game_temp.forcing_battler = nil


    # 初始化战斗用事件解释器


    $game_system.battle_interpreter.setup(nil, 0)


    # 准备队伍


    @troop_id = $game_temp.battle_troop_id


    $game_troop.setup(@troop_id)


    # 生成角色命令窗口


    s1 = $data_system.words.attack


    s2 = $data_system.words.skill


    s3 = $data_system.words.guard


    s4 = $data_system.words.item


    s5 = WordChangeBattler


    @actor_command_window = Window_Command.new(160, [s1, s2, s3, s4,s5])


    @actor_command_window.y = 128


    @actor_command_window.back_opacity = 160


    @actor_command_window.active = false


    @actor_command_window.visible = false


    # 生成其它窗口


    @party_command_window = Window_PartyCommand.new


    @help_window = Window_Help.new


    @help_window.back_opacity = 160


    @help_window.visible = false


    @status_window = Window_BattleStatus.new


    @message_window = Window_Message.new


    # 生成活动块


    @spriteset = Spriteset_Battle.new


    # 初始化等待计数


    @wait_count = 0


    # 执行过渡


    if $data_system.battle_transition == ""


      Graphics.transition(20)


    else


      Graphics.transition(40, "Graphics/Transitions/" +


        $data_system.battle_transition)


    end


    # 开始自由战斗回合


    start_phase1


    # 主循环


    loop do


      # 刷新游戏画面


      Graphics.update


      # 刷新输入信息


      Input.update


      # 刷新画面


      update


      # 如果画面切换的话就中断循环


      if $scene != self


        break


      end


    end


    # 刷新地图


    $game_map.refresh


    # 准备过渡


    Graphics.freeze


    # 释放窗口


    @actor_command_window.dispose


    @party_command_window.dispose


    @help_window.dispose


    @status_window.dispose


    @message_window.dispose


    if @skill_window != nil


      @skill_window.dispose


    end


    if @item_window != nil


      @item_window.dispose


    end


    if @actor_window != nil


      @actor_window.dispose


    end


    if @result_window != nil


      @result_window.dispose


    end


    # 释放活动块


    @spriteset.dispose


    # 标题画面切换中的情况


    if $scene.is_a?(Scene_Title)


      # 淡入淡出画面


      Graphics.transition


      Graphics.freeze


    end


    # 战斗测试或者游戏结束以外的画面切换中的情况


    if $BTEST and not $scene.is_a?(Scene_Gameover)


      $scene = nil


    end


  end


  # 战斗结束


  alias lpb_battle_end battle_end


  def battle_end(n)


    lpb_battle_end(n)


    $game_party.set_actor_to_normal


  end


  # 开始回合3


  alias lbp_start_phase3 start_phase3


  def start_phase3


    @changed_battler_id = []


    lbp_start_phase3


  end


  # 刷新角色命令回合画面


  def update_phase3


    # 敌人光标有效的情况下


    if @enemy_arrow != nil


      update_phase3_enemy_select


    # 角色光标有效的情况下


    elsif @actor_arrow != nil


      update_phase3_actor_select


    # 特技窗口有效的情况下


    elsif @skill_window != nil


      update_phase3_skill_select


    # 物品窗口有效的情况下


    elsif @item_window != nil


      update_phase3_item_select


    elsif @actor_window != nil


      update_phase3_battler_select


    # 角色指令窗口有效的情况下


    elsif @actor_command_window.active


      update_phase3_basic_command


    end


  end


  # 角色基本命令


  def update_phase3_basic_command


    # 按下 B 键的情况下


    if Input.trigger?(Input::B)


      # 演奏取消 SE


      $game_system.se_play($data_system.cancel_se)


      # 转向前一个角色的指令输入


      phase3_prior_actor


      return


    end


    # 按下 C 键的情况下


    if Input.trigger?(Input::C)


      # 角色指令窗口光标位置分之


      case @actor_command_window.index


      when 0  # 攻击


        # 演奏确定 SE


        $game_system.se_play($data_system.decision_se)


        # 设置行动


        @active_battler.current_action.kind = 0


        @active_battler.current_action.basic = 0


        # 开始选择敌人


        start_enemy_select


      when 1  # 特技


        # 演奏确定 SE


        $game_system.se_play($data_system.decision_se)


        # 设置行动


        @active_battler.current_action.kind = 1


        # 开始选择特技


        start_skill_select


      when 2  # 防御


        # 演奏确定 SE


        $game_system.se_play($data_system.decision_se)


        # 设置行动


        @active_battler.current_action.kind = 0


        @active_battler.current_action.basic = 1


        # 转向下一位角色的指令输入


        phase3_next_actor


      when 3  # 物品


        # 演奏确定 SE


        $game_system.se_play($data_system.decision_se)


        # 设置行动


        @active_battler.current_action.kind = 2


        # 开始选择物品


        start_item_select


      when 4 # 换人


        $game_system.se_play($data_system.decision_se)


        @active_battler.current_action.set_change_battler


        start_battler_select


      end


      return


    end


  end


  # 开始角色选择


  def start_battler_select


    @actor_window = Window_Actor.new


    @actor_window.active = true


    @actor_window.index = 0


    @actor_window.help_window = @help_window


    @actor_command_window.active = false


    @actor_command_window.visible = false


  end


  # 结束角色选择


  def end_battler_select


    @actor_window.dispose


    @actor_window = nil


    @help_window.visible = false


    @actor_command_window.active = true


    @actor_command_window.visible = true


  end


  # 刷新角色选择


  def update_phase3_battler_select


    @actor_window.visible = true


    @actor_window.update


    if Input.trigger?(Input::B)


      $game_system.se_play($data_system.cancel_se)


      end_battler_select


      return


    end


    if Input.trigger?(Input::C)


      actor_id = @actor_window.actor_id


      if $game_party.get_actors_id.include?(actor_id) or


         $game_actors[actor_id].dead? or 


         @changed_battler_id.include?(actor_id)


        $game_system.se_play($data_system.buzzer_se)


        return


      end


      $game_system.se_play($data_system.decision_se)


      @active_battler.current_action.change_to_battler = actor_id


      @changed_battler_id.push(actor_id)


      end_battler_select


      phase3_next_actor


      return


    end


  end


  # 行动方动画


  def update_phase4_step3


    if @active_battler.current_action.is_change_battler?


      @animation1_id = AnimationChangeBattler


      @target_battlers = []


    end


    # 行动方动画 (ID 为 0 的情况下是白色闪烁)


    if @animation1_id == 0


      @active_battler.white_flash = true


    else


      @active_battler.animation_id = @animation1_id


      @active_battler.animation_hit = true


    end


    # 移至步骤 4


    @phase4_step = 4


  end


  # 对象方动画


  def update_phase4_step4


    if @active_battler.current_action.is_change_battler?


      actor1_id = @active_battler.current_action.change_to_battler


      actor2_id = @active_battler.id


      (0...$game_party.actors.size).each do |i|


        if $game_party.actors[i].id == actor2_id


          $game_party.change_actor(i,actor1_id)


          @active_battler = $game_actors[actor1_id]


          @status_window.refresh


        end


      end


    end


    # 对像方动画


    for target in @target_battlers


      target.animation_id = @animation2_id


      target.animation_hit = (target.damage != "Miss")


    end


    # 限制动画长度、最低 8 帧


    @wait_count = 8


    # 移至步骤 5


    @phase4_step = 5


  end


  # 公共事件


  def update_phase4_step6


    @target_battlers.each do |target|


      if target.is_a?(Game_Actor) and target.dead? and


         !$game_party.other_actors.all?{|actor|actor.dead?}


        @actor_window = Window_Actor.new


        @actor_window.index = 0


        @actor_window.active = true


        @actor_window.help_window = @help_window


        actor_id = -1


        loop do


          Graphics.update


          Input.update


          @actor_window.update


          if Input.trigger?(Input::C)


            actor = $game_actors[@actor_window.actor_id]


            if actor.dead? or


               (@changed_battler_id.include?(actor.id) and 


                target.current_action.change_to_battler != actor.id) or


               $game_party.actors.include?(actor)


              $game_system.se_play($data_system.buzzer_se)


            else


              actor_id = actor.id


            end


          end


          break if actor_id >= 0


        end


        @actor_window.visible = false


        @actor_window.dispose


        @actor_window = nil


        @help_window.visible = false


        (0...$game_party.actors.size).each do |i|


          if $game_party.actors[i].id == target.id


            $game_party.change_actor(i,actor_id)


            @status_window.refresh


          end


        end


      end


    end


    # 清除强制行动对像的战斗者


    $game_temp.forcing_battler = nil


    # 公共事件 ID 有效的情况下


    if @common_event_id > 0


      # 设置事件


      common_event = $data_common_events[@common_event_id]


      $game_system.battle_interpreter.setup(common_event.list, 0)


    end


    # 移至步骤 1


    @phase4_step = 1


  end


end


 


class Window_MenuStatus


  def refresh


    self.contents.clear


    @item_max = $game_party.actors.size


    for i in 0...$game_party.actors.size


      x = 4


      y = i * 32


      actor = $game_party.actors[i]


      bitmap = RPG::Cache.character(actor.character_name,actor.character_hue)


      rect = Rect.new(0,0,bitmap.width/4,31)


      self.contents.blt(x+16-bitmap.width/8,y,bitmap,rect)


      draw_actor_name(actor, x+36, y)


      draw_actor_state(actor, x + 136,y)


      draw_actor_hp(actor, x + 236, y,96)


      draw_actor_sp(actor, x + 336, y,96)


    end


  end


  def update_cursor_rect


    super


  end


end

---

作者: lcj582856013    时间: 2014-4-13 09:22

jilei 发表于 2014-4-13 08:46
你是rm什么的，如果是xp的，记得修改最大人数，换人脚本其实就可以实现module LimBattlePlug

# 队伍最大人 ...

太感谢了，我去试试！

---

作者: guoyq1988    时间: 2014-4-13 12:33

1. #-----------------------------------------------------------------------------
   
2. # 队伍系统 Ver 1.0 （附带整合游戏主菜单）
   
3. #-----------------------------------------------------------------------------
   
4. # 类似于Aveyond的队伍系统（根据阿月系列的游戏产生的灵感）
   
5. # 作者：RyanBern
   
6. #-----------------------------------------------------------------------------
   
7. # 功能特色：
   
8. #-----------------------------------------------------------------------------
   
9. # 1.更改队伍中成员的最大数量，有四名出战队员，但是替补队员可以有很多个。
   
10. # 2.改编自默认脚本，极大程度上和原来脚本兼容，应该没有很严重的冲突。
    
11. # 3.为队伍增加“领队”角色，作为“领队”的成员在地图上显示他的图形，“领队”必须出战。
    
12. # 4.只有出战队员才能获得经验奖励，替补队员不能获得作战奖励。
    
13. # 5.如果队伍的出战队员全部阵亡，则直接判定玩家全灭，不管有无替补队员。
    
14. # 6.事件编译器中，对全体同伴的处理均包括对替补队员的处理。
    
15. #-----------------------------------------------------------------------------
    
16. # 使用方法：
    
17. #-----------------------------------------------------------------------------
    
18. # 1.粘贴到默认脚本后面，Main组前面即可。
    
19. # 2.作为leader的成员必须是作战队员，如果想替换下该队员，请先改变leader。
    
20. # 3.被换下的成员会自动成为替补队员名单的最后一名。
    
21. # 4.游戏系统因人而异，如果你改过Scene_Menu，可能会和你更改的脚本冲突。
    
22. #   这个我没有办法做成放到每一个游戏系统都合适的脚本，还请自行修改。
    
23. #   如果没改过太多的脚本，没有问题。
    
24. #-----------------------------------------------------------------------------
    
25. class Game_Party
    
26.   attr_accessor :leader
    
27.   attr_accessor :reserved_actors
    
28.   alias old_ini initialize
    
29.   def initialize
    
30.     @leader = nil
    
31.     @reserved_actors = []
    
32.     old_ini
    
33.   end
    
34.   # 重置@reserved_actors
    
35.   def adjust
    
36.     if @reserved_actors == nil
    
37.       @reserved_actors = []
    
38.     end
    
39.   end
    
40.   #--------------------------------------------------------------------------
    
41.   # 设置领队
    
42.   #   index : 角色在@actors中的序号，注意并非角色在数据库中的id
    
43.   #--------------------------------------------------------------------------
    
44.   def set_leader(index)
    
45.     @leader = @actors[index]
    
46.   end
    
47.   #--------------------------------------------------------------------------
    
48.   # 获取领队在@actors的index
    
49.   #--------------------------------------------------------------------------
    
50.   def leader_judge
    
51.     for i in [email protected]
    
52.       if @leader.id == @actors[i].id
    
53.         return i
    
54.       end
    
55.     end
    
56.   end
    
57.   #--------------------------------------------------------------------------
    
58.   # ● 加入同伴
    
59.   #     actor_id : 角色 ID
    
60.   #--------------------------------------------------------------------------
    
61.   def add_actor(actor_id)
    
62.     adjust
    
63.     # 获取角色
    
64.     actor = $game_actors[actor_id]
    
65.     # 除非本角色不在队伍中
    
66.     unless @actors.include?(actor) or @reserved_actors.include?(actor)
    
67.       # 添加角色
    
68.       if @actors.size < 4
    
69.         # 人数未满就放到@actors中
    
70.         @actors.push(actor)
    
71.       else
    
72.         # 人数满了就放到@reserved_actors中
    
73.         @reserved_actors.push(actor)
    
74.       end
    
75.       # 设置领队（队伍从无人变有人）
    
76.       if @actors.size == 1
    
77.         @leader = @actors[0]
    
78.       end
    
79.       # 还原主角
    
80.       $game_player.refresh
    
81.     end
    
82.   end
    
83.   #--------------------------------------------------------------------------
    
84.   # ● 角色离开
    
85.   #     actor_id : 角色 ID
    
86.   #--------------------------------------------------------------------------
    
87.   def remove_actor(actor_id)
    
88.     adjust
    
89.     # 判定角色是否是领队
    
90.     lead = $game_party.leader_judge
    
91.     flag = false
    
92.     if $game_party.actors[lead].id == actor_id
    
93.       flag = true
    
94.     end
    
95.     # 删除角色
    
96.     @actors.delete($game_actors[actor_id])
    
97.     # 如果领队离开
    
98.     if flag
    
99.       # 如果删除之后出现无人出战的情况
    
100.       if @actors.size == 0
     
101.         # 替补队员名单有人的情况下
     
102.         if @reserved_actors.size > 0
     
103.           # 将@reserved_actors中的第一个移动到@actors中
     
104.           @actors.push(@reserved_actors.shift)
     
105.           # 设置领队
     
106.           @leader = @actors[0]
     
107.         else
     
108.           @leader = nil
     
109.         end
     
110.       else
     
111.         @leader = @actors[0]
     
112.       end
     
113.     end
     
114.     # 还原主角
     
115.     $game_player.refresh
     
116.   end
     
117.   #--------------------------------------------------------------------------
     
118.   # ● 设置初期同伴
     
119.   #--------------------------------------------------------------------------
     
120.   def setup_starting_members
     
121.     @actors = []
     
122.     for i in $data_system.party_members
     
123.       @actors.push($game_actors[i])
     
124.     end
     
125.     unless @actors.empty?
     
126.       set_leader(0)
     
127.     end
     
128.   end
     
129.   #--------------------------------------------------------------------------
     
130.   # ● 全灭判定
     
131.   #--------------------------------------------------------------------------
     
132.   def all_dead?
     
133.     # 同伴人数为 0 的情况下
     
134.     if $game_party.actors.size == 0
     
135.       return false
     
136.     end
     
137.     # 同伴中无人 HP 在 0 以上
     
138.     for actor in @actors
     
139.       if actor.hp > 0
     
140.         return false
     
141.       end
     
142.     end
     
143.     # 全灭
     
144.     return true
     
145.   end
     
146.   #--------------------------------------------------------------------------
     
147.   # ● 检查连续伤害 (地图用)
     
148.   #--------------------------------------------------------------------------
     
149.   def check_map_slip_damage
     
150.     for actor in @actors + @reserved_actors
     
151.       if actor.hp > 0 and actor.slip_damage?
     
152.         actor.hp -= [actor.maxhp / 100, 1].max
     
153.         if actor.hp == 0
     
154.           $game_system.se_play($data_system.actor_collapse_se)
     
155.         end
     
156.         $game_screen.start_flash(Color.new(255,0,0,128), 4)
     
157.         $game_temp.gameover = $game_party.all_dead?
     
158.       end
     
159.     end
     
160.   end
     
161. end
     
162. 
     
163. class Game_Player
     
164.   #--------------------------------------------------------------------------
     
165.   # ● 刷新
     
166.   #--------------------------------------------------------------------------
     
167.   def refresh
     
168.     # 同伴人数为 0 的情况下
     
169.     if $game_party.actors.size == 0 or $game_party.leader == nil
     
170.       # 清除角色的文件名及对像
     
171.       @character_name = ""
     
172.       @character_hue = 0
     
173.       # 分支结束
     
174.       return
     
175.     end
     
176.     # 获取带头的角色
     
177.     if $game_party.leader != nil
     
178.       actor = $game_party.leader
     
179.       # 设置角色的文件名及对像
     
180.       @character_name = actor.character_name
     
181.       @character_hue = actor.character_hue
     
182.       # 初始化不透明度和合成方式子
     
183.       [url=home.php?mod=space&uid=316553]@opacity[/url] = 255
     
184.       @blend_type = 0
     
185.     end
     
186.   end
     
187. end
     
188. 
     
189. class Window_Base < Window
     
190.   def draw_actor_leader(x, y)
     
191.     if $game_party.leader == nil
     
192.       return
     
193.     end
     
194.     a = $game_party.leader_judge
     
195.     self.contents.font.color = normal_color
     
196.     self.contents.draw_text(x-50, y + a * 116, 64, 32, "领队",2)
     
197.   end
     
198. end
     
199. 
     
200. class Window_MenuStatus < Window_Selectable
     
201.   alias old_refresh refresh
     
202.   def refresh
     
203.     old_refresh
     
204.     draw_actor_leader(384,0)
     
205.   end
     
206. end
     
207. 
     
208. #==============================================================================
     
209. # ■ Window_Selectable
     
210. #------------------------------------------------------------------------------
     
211. # 　拥有光标的移动以及滚动功能的窗口类。
     
212. #==============================================================================
     
213. 
     
214. class Window_Selectable < Window_Base
     
215.   #--------------------------------------------------------------------------
     
216.   # ● 定义实例变量
     
217.   #--------------------------------------------------------------------------
     
218.   attr_reader   :index                    # 光标位置
     
219.   attr_reader   :help_window              # 帮助窗口
     
220.   attr_accessor :row_height               # 行高
     
221.   #--------------------------------------------------------------------------
     
222.   # ● 初始画对像
     
223.   #     x      : 窗口的 X 坐标
     
224.   #     y      : 窗口的 Y 坐标
     
225.   #     width  : 窗口的宽
     
226.   #     height : 窗口的高
     
227.   #     row_height : 行高 默认是32
     
228.   #--------------------------------------------------------------------------
     
229.   def initialize(x, y, width, height, row_height=32)
     
230.     super(x, y, width, height)
     
231.     @item_max = 1
     
232.     @column_max = 1
     
233.     [url=home.php?mod=space&uid=370741]@Index[/url] = -1
     
234.     @row_height = row_height
     
235.   end
     
236.   #--------------------------------------------------------------------------
     
237.   # ● 设置光标的位置
     
238.   #     index : 新的光标位置
     
239.   #--------------------------------------------------------------------------
     
240.   def index=(index)
     
241.     @index = index
     
242.     # 刷新帮助文本 (update_help 定义了继承目标)
     
243.     if self.active and @help_window != nil
     
244.       update_help
     
245.     end
     
246.     # 刷新光标矩形
     
247.     update_cursor_rect
     
248.   end
     
249.   #--------------------------------------------------------------------------
     
250.   # ● 获取行数
     
251.   #--------------------------------------------------------------------------
     
252.   def row_max
     
253.     # 由项目数和列数计算出行数
     
254.     return (@item_max + @column_max - 1) / @column_max
     
255.   end
     
256.   #--------------------------------------------------------------------------
     
257.   # ● 获取开头行
     
258.   #--------------------------------------------------------------------------
     
259.   def top_row
     
260.     # 将窗口内容的传送源 Y 坐标、1 行的高 row_height 等分
     
261.     return self.oy / @row_height
     
262.   end
     
263.   #--------------------------------------------------------------------------
     
264.   # ● 设置开头行
     
265.   #     row : 显示开头的行
     
266.   #--------------------------------------------------------------------------
     
267.   def top_row=(row)
     
268.     # row 未满 0 的场合更正为 0
     
269.     if row < 0
     
270.       row = 0
     
271.     end
     
272.     # row 超过 row_max - 1 的情况下更正为 row_max - 1
     
273.     if row > row_max - 1
     
274.       row = row_max - 1
     
275.     end
     
276.     # row 1 行高的 32 倍、窗口内容的传送源 Y 坐标
     
277.     self.oy = row * @row_height
     
278.   end
     
279.   #--------------------------------------------------------------------------
     
280.   # ● 获取 1 页可以显示的行数
     
281.   #--------------------------------------------------------------------------
     
282.   def page_row_max
     
283.     # 窗口的高度，设置画面的高度减去 32 ，除以 1 行的高度 row_height
     
284.     return (self.height - 32) / @row_height
     
285.   end
     
286.   #--------------------------------------------------------------------------
     
287.   # ● 获取 1 页可以显示的项目数
     
288.   #--------------------------------------------------------------------------
     
289.   def page_item_max
     
290.     # 将行数 page_row_max 乘上列数 @column_max
     
291.     return page_row_max * @column_max
     
292.   end
     
293.   #--------------------------------------------------------------------------
     
294.   # ● 帮助窗口的设置
     
295.   #     help_window : 新的帮助窗口
     
296.   #--------------------------------------------------------------------------
     
297.   def help_window=(help_window)
     
298.     @help_window = help_window
     
299.     # 刷新帮助文本 (update_help 定义了继承目标)
     
300.     if self.active and @help_window != nil
     
301.       update_help
     
302.     end
     
303.   end
     
304.   #--------------------------------------------------------------------------
     
305.   # ● 更新光标举行
     
306.   #--------------------------------------------------------------------------
     
307.   def update_cursor_rect
     
308.     # 光标位置不满 0 的情况下
     
309.     if @index < 0
     
310.       self.cursor_rect.empty
     
311.       return
     
312.     end
     
313.     # 获取当前的行
     
314.     row = @index / @column_max
     
315.     # 当前行被显示开头行前面的情况下
     
316.     if row < self.top_row
     
317.       # 从当前行向开头行滚动
     
318.       self.top_row = row
     
319.     end
     
320.     # 当前行被显示末尾行之后的情况下
     
321.     if row > self.top_row + (self.page_row_max - 1)
     
322.       # 从当前行向末尾滚动
     
323.       self.top_row = row - (self.page_row_max - 1)
     
324.     end
     
325.     # 计算光标的宽
     
326.     cursor_width = self.width / @column_max - 32
     
327.     # 计算光标坐标
     
328.     x = @index % @column_max * (cursor_width + 32)
     
329.     y = @index / @column_max * @row_height - self.oy
     
330.     # 更新国标矩形
     
331.     self.cursor_rect.set(x, y, cursor_width, @row_height)
     
332.   end
     
333.   #--------------------------------------------------------------------------
     
334.   # ● 刷新画面
     
335.   #--------------------------------------------------------------------------
     
336.   def update
     
337.     super
     
338.     # 可以移动光标的情况下
     
339.     if self.active and @item_max > 0 and @index >= 0
     
340.       # 方向键下被按下的情况下
     
341.       if Input.repeat?(Input::DOWN)
     
342.         # 列数不是 1 并且方向键的下的按下状态不是重复的情况、
     
343.         # 或光标位置在(项目数-列数)之前的情况下
     
344.         if (@column_max == 1 and Input.trigger?(Input::DOWN)) or
     
345.            @index < @item_max - @column_max
     
346.           # 光标向下移动
     
347.           $game_system.se_play($data_system.cursor_se)
     
348.           @index = (@index + @column_max) % @item_max
     
349.         end
     
350.       end
     
351.       # 方向键上被按下的情况下
     
352.       if Input.repeat?(Input::UP)
     
353.         # 列数不是 1 并且方向键的下的按下状态不是重复的情况、
     
354.         # 或光标位置在列之后的情况下
     
355.         if (@column_max == 1 and Input.trigger?(Input::UP)) or
     
356.            @index >= @column_max
     
357.           # 光标向上移动
     
358.           $game_system.se_play($data_system.cursor_se)
     
359.           @index = (@index - @column_max + @item_max) % @item_max
     
360.         end
     
361.       end
     
362.       # 方向键右被按下的情况下
     
363.       if Input.repeat?(Input::RIGHT)
     
364.         # 列数为 2 以上并且、光标位置在(项目数 - 1)之前的情况下
     
365.         if @column_max >= 2 and @index < @item_max - 1
     
366.           # 光标向右移动
     
367.           $game_system.se_play($data_system.cursor_se)
     
368.           @index += 1
     
369.         end
     
370.       end
     
371.       # 方向键左被按下的情况下
     
372.       if Input.repeat?(Input::LEFT)
     
373.         # 列数为 2 以上并且、光标位置在 0 之后的情况下
     
374.         if @column_max >= 2 and @index > 0
     
375.           # 光标向左移动
     
376.           $game_system.se_play($data_system.cursor_se)
     
377.           @index -= 1
     
378.         end
     
379.       end
     
380.       # R 键被按下的情况下
     
381.       if Input.repeat?(Input::R)
     
382.         # 显示的最后行在数据中最后行上方的情况下
     
383.         if self.top_row + (self.page_row_max - 1) < (self.row_max - 1)
     
384.           # 光标向后移动一页
     
385.           $game_system.se_play($data_system.cursor_se)
     
386.           @index = [@index + self.page_item_max, @item_max - 1].min
     
387.           self.top_row += self.page_row_max
     
388.         end
     
389.       end
     
390.       # L 键被按下的情况下
     
391.       if Input.repeat?(Input::L)
     
392.         # 显示的开头行在位置 0 之后的情况下
     
393.         if self.top_row > 0
     
394.           # 光标向前移动一页
     
395.           $game_system.se_play($data_system.cursor_se)
     
396.           @index = [@index - self.page_item_max, 0].max
     
397.           self.top_row -= self.page_row_max
     
398.         end
     
399.       end
     
400.     end
     
401.     # 刷新帮助文本 (update_help 定义了继承目标)
     
402.     if self.active and @help_window != nil
     
403.       update_help
     
404.     end
     
405.     # 刷新光标矩形
     
406.     update_cursor_rect
     
407.   end
     
408. end
     
409. #==============================================================================
     
410. # ■ Window_PartyMembers
     
411. #------------------------------------------------------------------------------
     
412. # 　显示非领队队员概况的窗口。
     
413. #==============================================================================
     
414. 
     
415. class Window_PartyMembers < Window_Selectable
     
416.   #--------------------------------------------------------------------------
     
417.   # ● 初始化目标
     
418.   #--------------------------------------------------------------------------
     
419.   def initialize
     
420.     super(80, 0, 480, 480, 112)
     
421.     $game_party.adjust
     
422.     @item_max = $game_party.actors.size + $game_party.reserved_actors.size - 1
     
423.     @column_max  = 1
     
424.     self.contents = Bitmap.new(width - 32, @item_max == 0 ? height - 32 : @item_max * 112)
     
425.     self.contents.clear
     
426.     @data = $game_party.actors + $game_party.reserved_actors
     
427.     @data.sort!{ |a,b| a.id - b.id }
     
428.     a = $game_party.leader_judge
     
429.     @data.delete($game_party.actors[a])
     
430.     refresh
     
431.     self.index = 0
     
432.   end
     
433.   #--------------------------------------------------------------------------
     
434.   # ● 刷新
     
435.   #--------------------------------------------------------------------------
     
436.   def refresh
     
437.     self.contents.clear
     
438.     for i in 0...@item_max
     
439.       x = 64
     
440.       y = i * 112
     
441.       actor = @data[i]
     
442.       if $game_party.actors.include?(actor)
     
443.         self.contents.font.color = normal_color
     
444.         self.contents.draw_text(280, y, 128, 32, "战斗", 2)
     
445.       else
     
446.         self.contents.font.color = disabled_color
     
447.         self.contents.draw_text(280, y, 128, 32, "休战", 2)
     
448.       end
     
449.      # draw_actor_graphic(actor, x - 40, y + 80)
     
450.     bitmap = Bitmap.new("Graphics/Faces/" + actor.id. to_s + "_Z")#RPG::Cache.character(actor.character_name, actor.character_hue)
     
451.     cw = bitmap.width
     
452.     ch = bitmap.height
     
453.     src_rect = Rect.new(0, 0, cw, ch)
     
454.     self.contents.blt(x-60, y+30, bitmap, src_rect)
     
455.       draw_actor_name(actor, x, y)
     
456.       draw_actor_class(actor, x, y+25)
     
457.       draw_actor_level(actor, x+100, y)
     
458.       draw_actor_state(actor, x + 90, y + 95)
     
459.       draw_actor_exp(actor, x, y + 64)
     
460.       draw_actor_hp(actor, x + 236, y + 32)
     
461.       draw_actor_sp(actor, x + 236, y + 64)
     
462.     end
     
463.   end
     
464.   #--------------------------------------------------------------------------
     
465.   # 获取当前光标所指的角色
     
466.   #--------------------------------------------------------------------------
     
467.   def current_actor
     
468.     return @data[@index]
     
469.   end
     
470. end
     
471. 
     
472. class Interpreter
     
473.   #--------------------------------------------------------------------------
     
474.   # ● 角色用 iterate (考虑全体同伴)
     
475.   #     parameter : 1 以上为 ID、0 为全体
     
476.   #--------------------------------------------------------------------------
     
477.   def iterate_actor(parameter)
     
478.     # 全体同伴的情况下
     
479.     if parameter == 0
     
480.       # 同伴全体循环
     
481.       for actor in $game_party.actors + $game_party.reserved_actors
     
482.         # 评价块
     
483.         yield actor
     
484.       end
     
485.     # 单体角色的情况下
     
486.     else
     
487.       # 获取角色
     
488.       actor = $game_actors[parameter]
     
489.       # 获取角色
     
490.       yield actor if actor != nil
     
491.     end
     
492.   end
     
493. end
     
494. 
     
495. class Scene_Party
     
496.   def main
     
497.     $game_party.adjust
     
498.     @members_window = Window_PartyMembers.new
     
499.     # 执行过渡
     
500.     Graphics.transition
     
501.     # 主循环
     
502.     loop do
     
503.       # 刷新游戏画面
     
504.       Graphics.update
     
505.       # 刷新输入情报
     
506.       Input.update
     
507.       # 刷新画面
     
508.       update
     
509.       # 如果画面切换的话就中断循环
     
510.       if $scene != self
     
511.         break
     
512.       end
     
513.     end
     
514.     # 准备过渡
     
515.     Graphics.freeze
     
516.     # 释放窗口
     
517.     @members_window.dispose
     
518.   end
     
519.   
     
520.   def update
     
521.     @members_window.update
     
522.     if Input.trigger?(Input::B)
     
523.       # 演奏取消 SE
     
524.       $game_system.se_play($data_system.cancel_se)
     
525.       $scene = Scene_Menu.new(3)
     
526.       return
     
527.     end
     
528.     if Input.trigger?(Input::C)
     
529.       cur_actor = @members_window.current_actor
     
530.       if cur_actor == nil
     
531.         $game_system.se_play($data_system.buzzer_se)
     
532.         return
     
533.       end
     
534.       if($game_party.actors.include?(cur_actor))
     
535.         $game_system.se_play($data_system.decision_se)
     
536.         $game_party.reserved_actors.push(cur_actor)
     
537.         $game_party.actors.delete(cur_actor)
     
538.         @members_window.refresh
     
539.       else
     
540.         if $game_party.actors.size < 4
     
541.           $game_system.se_play($data_system.decision_se)
     
542.           $game_party.actors.push(cur_actor)
     
543.           $game_party.reserved_actors.delete(cur_actor)
     
544.           @members_window.refresh
     
545.         else
     
546.           $game_system.se_play($data_system.buzzer_se)
     
547.         end
     
548.       end
     
549.     end
     
550.   end
     
551. end
     
552. 
     
553. #==============================================================================
     
554. # ■ Scene_Menu
     
555. #------------------------------------------------------------------------------
     
556. # 　处理菜单画面的类。
     
557. #==============================================================================
     
558. 
     
559. class Scene_Menu
     
560.   #--------------------------------------------------------------------------
     
561.   # ● 初始化对像
     
562.   #     menu_index : 命令光标的初期位置
     
563.   #--------------------------------------------------------------------------
     
564.   def initialize(menu_index = 0)
     
565.     @menu_index = menu_index
     
566.   end
     
567.   #--------------------------------------------------------------------------
     
568.   # ● 主处理
     
569.   #--------------------------------------------------------------------------
     
570.   def main
     
571.     # 生成命令窗口
     
572.     s1 = $data_system.words.item
     
573.     s2 = $data_system.words.skill
     
574.     s3 = $data_system.words.equip
     
575.     s4 = "队伍"
     
576.     s5 = "领队"
     
577.     s6 = "状态"
     
578.     s7 = "存档"
     
579.     s8 = "读档"
     
580.     s9 = "退出"
     
581.     @command_window = Window_Command.new(160, [s1, s2, s3, s4, s5, s6, s7, s8, s9])
     
582.     @command_window.index = @menu_index
     
583.     # 同伴人数为 0 的情况下
     
584.     if $game_party.actors.size == 0
     
585.       # 物品、特技、装备、状态无效化
     
586.       @command_window.disable_item(0)
     
587.       @command_window.disable_item(1)
     
588.       @command_window.disable_item(2)
     
589.       @command_window.disable_item(3)      
     
590.       @command_window.disable_item(4)
     
591.       @command_window.disable_item(5)
     
592.     end
     
593.     # 禁止存档的情况下
     
594.     if $game_system.save_disabled
     
595.       # 存档无效
     
596.       @command_window.disable_item(6)
     
597.     end
     
598.     # 生成游戏时间窗口
     
599.     #@playtime_window = Window_PlayTime.new
     
600.     #@playtime_window.x = 0
     
601.     #@playtime_window.y = 430
     
602.     # 生成步数窗口
     
603.     @steps_window = Window_Steps.new
     
604.     @steps_window.x = 0
     
605.     @steps_window.y = 320
     
606.     # 生成金钱窗口
     
607.     @gold_window = Window_Gold.new
     
608.     @gold_window.x = 0
     
609.     @gold_window.y = 422
     
610.     # 生成状态窗口
     
611.     @status_window = Window_MenuStatus.new
     
612.     @status_window.x = 160
     
613.     @status_window.y = 0
     
614.     # 生成坐标窗口
     
615.     #@xy_window = Window_xy.new
     
616.     #@xy_window.x = 0
     
617.     #@xy_window.y = 380
     
618.     # 执行过渡
     
619.     Graphics.transition
     
620.     # 主循环
     
621.     loop do
     
622.       # 刷新游戏画面
     
623.       Graphics.update
     
624.       # 刷新输入信息
     
625.       Input.update
     
626.       # 刷新画面
     
627.       update
     
628.       # 如果切换画面就中断循环
     
629.       if $scene != self
     
630.         break
     
631.       end
     
632.     end
     
633.     # 准备过渡
     
634.     Graphics.freeze
     
635.     # 释放窗口
     
636.     @command_window.dispose
     
637. #    @playtime_window.dispose
     
638.     @steps_window.dispose
     
639.     @gold_window.dispose
     
640.     #@xy_window.dispose
     
641.     @status_window.dispose
     
642.   end
     
643.   #--------------------------------------------------------------------------
     
644.   # ● 刷新画面
     
645.   #--------------------------------------------------------------------------
     
646.   def update
     
647.     # 刷新窗口
     
648.     @command_window.update
     
649. #    @playtime_window.update
     
650.     @steps_window.update
     
651.     @gold_window.update
     
652.     #@xy_window.update
     
653.     @status_window.update
     
654.     # 命令窗口被激活的情况下: 调用 update_command
     
655.     if @command_window.active
     
656.       update_command
     
657.       return
     
658.     end
     
659.     # 状态窗口被激活的情况下: 调用 update_status
     
660.     if @status_window.active
     
661.       update_status
     
662.       return
     
663.     end
     
664.   end
     
665.   #--------------------------------------------------------------------------
     
666.   # ● 刷新画面 (命令窗口被激活的情况下)
     
667.   #--------------------------------------------------------------------------
     
668.   def update_command
     
669.     # 按下 B 键的情况下
     
670.     if Input.trigger?(Input::B)
     
671.       # 演奏取消 SE
     
672.       $game_system.se_play($data_system.cancel_se)
     
673.       # 切换的地图画面############
     
674.       $scene = Scene_Map.new
     
675.       return
     
676.     end
     
677.     # 按下 C 键的情况下
     
678.     if Input.trigger?(Input::C)
     
679.       # 同伴人数为 0、存档、游戏结束以外的场合
     
680.       if $game_party.actors.size == 0 and @command_window.index < 4
     
681.         # 演奏冻结 SE
     
682.         $game_system.se_play($data_system.buzzer_se)
     
683.         return
     
684.       end
     
685.       # 命令窗口的光标位置分支(修改)
     
686.       case @command_window.index
     
687.       when 0  # 物品
     
688.         # 演奏确定 SE
     
689.         $game_system.se_play($data_system.decision_se)
     
690.         # 切换到物品画面
     
691.         $scene = Scene_Item.new
     
692.       when 1  # 特技
     
693.         # 演奏确定 SE
     
694.         $game_system.se_play($data_system.decision_se)
     
695.         # 激活状态窗口
     
696.         @command_window.active = false
     
697.         @status_window.active = true
     
698.         @status_window.index = 0
     
699.       when 2  # 装备
     
700.         # 演奏确定 SE
     
701.         $game_system.se_play($data_system.decision_se)
     
702.         # 激活状态窗口
     
703.         @command_window.active = false
     
704.         @status_window.active = true
     
705.         @status_window.index = 0
     
706.       when 4  # 领队
     
707.         # 演奏确定 SE
     
708.         $game_system.se_play($data_system.decision_se)
     
709.         # 激活状态窗口
     
710.         @command_window.active = false
     
711.         @status_window.active = true
     
712.         @status_window.index = 0
     
713.        when 3  # 队伍
     
714.         # 演奏确定 SE
     
715.         $game_system.se_play($data_system.decision_se)
     
716.         # 切换到队员画面
     
717.         $scene = Scene_Party.new
     
718.        when 5  # 状态
     
719.         # 演奏确定 SE
     
720.         $game_system.se_play($data_system.decision_se)
     
721.         # 激活状态窗口
     
722.         @command_window.active = false
     
723.         @status_window.active = true
     
724.         @status_window.index = 0
     
725.        when 6  # 存档
     
726.          #禁止存档的情况下
     
727.         if $game_system.save_disabled
     
728.            #演奏冻结 SE
     
729.           $game_system.se_play($data_system.buzzer_se)
     
730.           return
     
731.        end
     
732.          #演奏确定 SE
     
733.         $game_system.se_play($data_system.decision_se)
     
734.          #切换到存档画面
     
735.         $scene = Scene_Loadsave.new#$scene = Scene_Save.new
     
736.        when 7  # 读档
     
737.         #演奏确定 SE
     
738.         $game_system.se_play($data_system.decision_se)
     
739.         $load_calling = true
     
740.         #切换到读档画面
     
741.         $scene = Scene_Load.new
     
742.        when 8  # 游戏结束
     
743.         # 演奏确定 SE
     
744.         $game_system.se_play($data_system.decision_se)
     
745.         # 切换到游戏结束画面
     
746.         $scene = Scene_End.new
     
747.       end
     
748.       return
     
749.     end
     
750.   end
     
751.   #--------------------------------------------------------------------------
     
752.   # ● 刷新画面 (状态窗口被激活的情况下)
     
753.   #--------------------------------------------------------------------------
     
754.   def update_status
     
755.     # 按下 B 键的情况下
     
756.     if Input.trigger?(Input::B)
     
757.       # 演奏取消 SE
     
758.       $game_system.se_play($data_system.cancel_se)
     
759.       # 激活命令窗口
     
760.       @command_window.active = true
     
761.       @status_window.active = false
     
762.       @status_window.index = -1
     
763.       return
     
764.     end
     
765.     # 按下 C 键的情况下
     
766.     if Input.trigger?(Input::C)
     
767.       # 命令窗口的光标位置分支
     
768.       case @command_window.index
     
769.       when 1  # 特技
     
770.         # 本角色的行动限制在 2 以上的情况下
     
771.         if $game_party.actors[@status_window.index].restriction >= 2
     
772.           # 演奏冻结 SE
     
773.           $game_system.se_play($data_system.buzzer_se)
     
774.           return
     
775.         end
     
776.         # 演奏确定 SE
     
777.         $game_system.se_play($data_system.decision_se)
     
778.         # 切换到特技画面
     
779.         $scene = Scene_Skill.new(@status_window.index)
     
780.       when 2  # 装备
     
781.         # 演奏确定 SE
     
782.         $game_system.se_play($data_system.decision_se)
     
783.         # 切换的装备画面
     
784.         $scene = Scene_Equip.new(@status_window.index)
     
785.       when 4  # 领队
     
786.         # 演奏确定 SE
     
787.         $game_system.se_play($data_system.decision_se)
     
788.         $game_party.set_leader(@status_window.index)
     
789.         $game_player.refresh
     
790.         @status_window.refresh
     
791.       when 5  # 状态
     
792.         # 演奏确定 SE
     
793.         $game_system.se_play($data_system.decision_se)
     
794.         # 切换到状态画面
     
795.         $scene = Scene_Status.new(@status_window.index)
     
796.       end
     
797.       return
     
798.     end
     
799.   end
     
800. end
     
801. 
     
802. class Scene_Status
     
803.   #--------------------------------------------------------------------------
     
804.   # ● 刷新画面
     
805.   #--------------------------------------------------------------------------
     
806.   def update
     
807.     # 按下 B 键的情况下
     
808.     if Input.trigger?(Input::B)
     
809.       # 演奏取消 SE
     
810.       $game_system.se_play($data_system.cancel_se)
     
811.       # 切换到菜单画面
     
812.       $scene = Scene_Menu.new(5)
     
813.       return
     
814.     end
     
815.     # 按下 R 键的情况下
     
816.     if Input.trigger?(Input::R)
     
817.       # 演奏光标 SE
     
818.       $game_system.se_play($data_system.cursor_se)
     
819.       # 移至下一位角色
     
820.       @actor_index += 1
     
821.       @actor_index %= $game_party.actors.size
     
822.       # 切换到别的状态画面
     
823.       $scene = Scene_Status.new(@actor_index)
     
824.       return
     
825.     end
     
826.     # 按下 L 键的情况下
     
827.     if Input.trigger?(Input::L)
     
828.       # 演奏光标 SE
     
829.       $game_system.se_play($data_system.cursor_se)
     
830.       # 移至上一位角色
     
831.       @actor_index += $game_party.actors.size - 1
     
832.       @actor_index %= $game_party.actors.size
     
833.       # 切换到别的状态画面
     
834.       $scene = Scene_Status.new(@actor_index)
     
835.       return
     
836.     end
     
837.   end
     
838. end
     
839. 
     
840. class Scene_Save
     
841.   #--------------------------------------------------------------------------
     
842.   # ● 取消时的处理
     
843.   #--------------------------------------------------------------------------
     
844.   def on_cancel
     
845.     # 演奏取消 SE
     
846.     $game_system.se_play($data_system.cancel_se)
     
847.     # 如果被事件调用
     
848.     if $game_temp.save_calling
     
849.       # 清除存档调用标志
     
850.       $game_temp.save_calling = false
     
851.       # 切换到地图画面
     
852.       $scene = Scene_Map.new
     
853.       return
     
854.     end
     
855.     # 切换到菜单画面
     
856.     $scene = Scene_Menu.new(6)
     
857.   end
     
858. end
     
859. 
     
860. class Scene_Load
     
861.   #--------------------------------------------------------------------------
     
862.   # ● 取消时的处理
     
863.   #--------------------------------------------------------------------------
     
864.   def on_cancel
     
865.     # 演奏取消 SE
     
866.     $game_system.se_play($data_system.cancel_se)
     
867.     # 切换到标题画面
     
868.     if $load_calling == true
     
869.       $load_calling = false
     
870.       $scene = Scene_Menu.new(7)
     
871.     else
     
872.       $scene = Scene_Title.new
     
873.     end
     
874.   end
     
875. end
     
876. 
     
877. class Scene_End
     
878.   #--------------------------------------------------------------------------
     
879.   # ● 刷新画面
     
880.   #--------------------------------------------------------------------------
     
881.   def update
     
882.     # 刷新命令窗口
     
883.     @command_window.update
     
884.     # 按下 B 键的情况下
     
885.     if Input.trigger?(Input::B)
     
886.       # 演奏取消 SE
     
887.       $game_system.se_play($data_system.cancel_se)
     
888.       # 切换到菜单画面
     
889.       $scene = Scene_Menu.new(8)
     
890.       return
     
891.     end
     
892.     # 按下 C 键的场合下
     
893.     if Input.trigger?(Input::C)
     
894.       # 命令窗口光标位置分支
     
895.       case @command_window.index
     
896.       when 0  # 返回标题画面
     
897.         command_to_title
     
898.       when 1  # 退出
     
899.         command_shutdown
     
900.       when 2  # 取消
     
901.         command_cancel
     
902.       end
     
903.       return
     
904.     end
     
905.   end
     
906.   #--------------------------------------------------------------------------
     
907.   # ● 选择命令 [取消] 时的处理
     
908.   #--------------------------------------------------------------------------
     
909.   def command_cancel
     
910.     # 演奏确定 SE
     
911.     $game_system.se_play($data_system.decision_se)
     
912.     # 切换到菜单画面
     
913.     $scene = Scene_Menu.new(8)
     
914.   end
     
915. end

复制代码

---

作者: lcj582856013    时间: 2014-4-14 23:11

jilei 发表于 2014-4-13 08:46
你是rm什么的，如果是xp的，记得修改最大人数，换人脚本其实就可以实现module LimBattlePlug

# 队伍最大人 ...

我想请问一下，怎样可以调整默认出战的角色，就是怎样把队伍中后面的角色调到前面来？需要脚本吗？

---

作者: jilei    时间: 2014-4-15 18:14

lcj582856013 发表于 2014-4-14 23:11
我想请问一下，怎样可以调整默认出战的角色，就是怎样把队伍中后面的角色调到前面来？需要脚本吗？ ...

表示需要脚本，不过不是电脑上网，发脚本不方便，还有似乎不可以一帖多问的哦

---

作者: yang1zhi    时间: 2014-4-15 20:03
用事件就能实现了啊，设置选项，设置替换队员

---

作者: jilei    时间: 2014-4-16 19:41
偷偷上电脑，给你弄来了脚本，你看看，替换队员位置在x键菜单里

1. #==============================================================================
   
2. # 本脚本来自www.66RPG.com，使用和转载请保留此信息
   
3. #==============================================================================
   
4. class Scene_Menu
   
5. # --------------------------------
   
6.   def initialize(menu_index = 0)
   
7.     @menu_index = menu_index
   
8.     @changer = 0
   
9.     @where = 0
   
10.     @checker = 0
    
11.   end
    
12. # --------------------------------
    
13.   def main
    
14.     s1 = $data_system.words.item
    
15.     s2 = $data_system.words.skill
    
16.     s3 = $data_system.words.equip
    
17.     s4 = "状态"
    
18.     s5 = "储存进度"
    
19.     s6 = "离开游戏"
    
20.     s7 = "调整队伍"
    
21.     @command_window = Window_Command.new(160, [s1, s2, s3, s4, s5, s6, s7])
    
22.     @command_window.index = @menu_index
    
23.     if $game_party.actors.size == 0
    
24.       @command_window.disable_item(0)
    
25.       @command_window.disable_item(1)
    
26.       @command_window.disable_item(2)
    
27.       @command_window.disable_item(3)
    
28.     end
    
29.     if $game_system.save_disabled
    
30.       @command_window.disable_item(4)
    
31.     end
    
32.     if $game_party.actors.size == 1
    
33.       @command_window.disable_item(6)
    
34.     end
    
35.     @playtime_window = Window_PlayTime.new
    
36.     @playtime_window.x = 0
    
37.     @playtime_window.y = 256
    
38.     @gold_window = Window_Gold.new
    
39.     @gold_window.x = 0
    
40.     @gold_window.y = 416
    
41.     @status_window = Window_MenuStatus.new
    
42.     @status_window.x = 160
    
43.     @status_window.y = 0
    
44.     Graphics.transition
    
45.     loop do
    
46.       Graphics.update
    
47.       Input.update
    
48.       update
    
49.       if $scene != self
    
50.         break
    
51.       end
    
52.     end
    
53.     Graphics.freeze
    
54.     @command_window.dispose
    
55.     @playtime_window.dispose
    
56.     @gold_window.dispose
    
57.     @status_window.dispose
    
58.   end
    
59. # --------------------------------
    
60.   def update
    
61.     @command_window.update
    
62.     @playtime_window.update
    
63.     @gold_window.update
    
64.     @status_window.update
    
65.     if @command_window.active
    
66.       update_command
    
67.       return
    
68.     end
    
69.     if @status_window.active
    
70.       update_status
    
71.       return
    
72.     end
    
73.   end
    
74. # --------------------------------
    
75.   def update_command
    
76.     if Input.trigger?(Input::B)
    
77.       $game_system.se_play($data_system.cancel_se)
    
78.       $scene = Scene_Map.new
    
79.       return
    
80.     end
    
81.     if Input.trigger?(Input::C)
    
82.       if $game_party.actors.size == 0 and @command_window.index < 4
    
83.         $game_system.se_play($data_system.buzzer_se)
    
84.         return
    
85.       end
    
86.       if $game_party.actors.size == 1 and @command_window.index ==6
    
87.         $game_system.se_play($data_system.buzzer_se)
    
88.         return
    
89.       end
    
90.       case @command_window.index
    
91.       when 0
    
92.         $game_system.se_play($data_system.decision_se)
    
93.         $scene = Scene_Item.new
    
94.       when 1
    
95.         $game_system.se_play($data_system.decision_se)
    
96.         @command_window.active = false
    
97.         @status_window.active = true
    
98.         @status_window.index = 0
    
99.       when 2
    
100.         $game_system.se_play($data_system.decision_se)
     
101.         @command_window.active = false
     
102.         @status_window.active = true
     
103.         @status_window.index = 0
     
104.       when 3
     
105.         $game_system.se_play($data_system.decision_se)
     
106.         @command_window.active = false
     
107.         @status_window.active = true
     
108.         @status_window.index = 0
     
109.       when 4
     
110.         if $game_system.save_disabled
     
111.           $game_system.se_play($data_system.buzzer_se)
     
112.           return
     
113.         end
     
114.         $game_system.se_play($data_system.decision_se)
     
115.         $scene = Scene_Save.new
     
116.       when 5
     
117.         $game_system.se_play($data_system.decision_se)
     
118.         $scene = Scene_End.new
     
119.       when 6
     
120.         $game_system.se_play($data_system.decision_se)
     
121.         @checker = 0
     
122.         @command_window.active = false
     
123.         @status_window.active = true
     
124.         @status_window.index = 0
     
125.       end
     
126.       return
     
127.     end
     
128.   end
     
129. # --------------------------------
     
130.   def update_status
     
131.     if Input.trigger?(Input::B)
     
132.       $game_system.se_play($data_system.cancel_se)
     
133.       @command_window.active = true
     
134.       @status_window.active = false
     
135.       @status_window.index = -1
     
136.       return
     
137.     end
     
138.     if Input.trigger?(Input::C)
     
139.       case @command_window.index
     
140.       when 1
     
141.         if $game_party.actors[@status_window.index].restriction >= 2
     
142.           $game_system.se_play($data_system.buzzer_se)
     
143.           return
     
144.         end
     
145.         $game_system.se_play($data_system.decision_se)
     
146.         $scene = Scene_Skill.new(@status_window.index)
     
147.       when 2
     
148.         $game_system.se_play($data_system.decision_se)
     
149.         $scene = Scene_Equip.new(@status_window.index)
     
150.       when 3
     
151.         $game_system.se_play($data_system.decision_se)
     
152.         $scene = Scene_Status.new(@status_window.index)
     
153.       when 6
     
154.         $game_system.se_play($data_system.decision_se)
     
155.         if @checker == 0
     
156.           @changer = $game_party.actors[@status_window.index]
     
157.           @where = @status_window.index
     
158.           @checker = 1
     
159.         else
     
160.           $game_party.actors[@where] = $game_party.actors[@status_window.index]
     
161.           $game_party.actors[@status_window.index] = @changer
     
162.           @checker = 0
     
163.           @status_window.refresh
     
164.         end
     
165.       end
     
166.       return
     
167.     end
     
168.   end
     
169. end
     
170. #==============================================================================
     
171. # 本脚本来自www.66RPG.com，使用和转载请保留此信息
     
172. #==============================================================================

复制代码

---

作者: yang1zhi    时间: 2014-4-16 20:43

yang1zhi 发表于 2014-4-15 20:03
用事件就能实现了啊，设置选项，设置替换队员

他说的是像空轨那样，不战斗的人集中在一个点，4个人出来剧情，想换人就回去那个点换人，再4个人出来剧情。

---

作者: yang1zhi    时间: 2014-4-16 21:04
想随时都能换的话就用这个图的效果。在每张地图上放上这样的事件，就有你想要的效果。
https://rpg.blue/forum.php?mod=attachment&aid=MjM5NjU4fDYwYjdhNGY4YmU3MTBkMmUwODAzYTU5MjExOGZmNTZhfDE3MzI0OTUwNzc%3D&request=yes&_f=.jpg

121.jpg (95.31 KB, 下载次数: 15)

下载附件  保存到相册

2014-4-16 21:03 上传

---

欢迎光临 Project1 (https://rpg.blue/)

Powered by Discuz! X3.1