关于龙皇兄的待机人物替补出场

卓越大白痴

可不可以实现替补出场后不改变菜单中的人物顺序 （无论如何不想让第一个脚色更改位置）
或者其他方法也行
比如如何用事件脚本更改角色排列顺序等等  谢谢了

1. #==============================================================================
   
2. # ■ 战斗人物死亡后待机人物替补出场
   
3. #
   
4. # §§  注意：本版本只適合 => RTAB战斗系统
   
5. #------------------------------------------------------------------------------
   
6. # 作者：TERENCE (龙皇)
   
7. #
   
8. # 本脚本请配合：自定义战斗、待机人数，附赠菜单界面
   
9. #  http://rpg.blue/web/htm/news101.htm
   
10. #
    
11. # 战斗本脚本请配合：RTAB战斗系统原生版 Ver1.16
    
12. #  http://rpg.blue/web/htm/news49.htm
    
13. #==============================================================================
    
14. 
    
15. 
    
16. #==============================================================================
    
17. # ■ Game_Party
    
18. #------------------------------------------------------------------------------
    
19. # 　追加後補判定方法。
    
20. #==============================================================================
    
21. 
    
22. class Game_Party
    
23.   #--------------------------------------------------------------------------
    
24.   # ● 後補判定
    
25.   #--------------------------------------------------------------------------
    
26.   def replacement_need?
    
27.     # 同伴中無人 HP 在 0 以上
    
28.     for actor in @actors
    
29.       if actor.rest_hp > 0
    
30.         return false
    
31.       end
    
32.     end
    
33.     # 後補
    
34.     return true
    
35.   end
    
36. end
    
37. 
    
38. #==============================================================================
    
39. # ■ Scene_Battle
    
40. #------------------------------------------------------------------------------
    
41. # 　追加後補動作。
    
42. #==============================================================================
    
43. class Scene_Battle
    
44.   alias replacement_judge judge
    
45.   def judge
    
46.     # 判斷战斗人物死亡后是否使待机人物替补出场
    
47.     if $game_party.replacement_need?
    
48.       # 待命成員復帰
    
49.       $game_party.actors[$game_party.actors.size,0] = $game_party.backword_actors
    
50.       $game_party.backword_actors.clear
    
51.       #--------------------------------------------------------------------------
    
52.       # ● 泡沫式排序法
    
53.       #--------------------------------------------------------------------------
    
54.       for i in 1..$game_party.actors.size
    
55.         for j in 1..$game_party.actors.size
    
56.             if $game_party.actors[i-1].hp > $game_party.actors[j-1].hp
    
57.               temp = $game_party.actors[i-1]
    
58.               $game_party.actors[i-1] = $game_party.actors[j-1]
    
59.               $game_party.actors[j-1] = temp
    
60.             end
    
61.         end
    
62.       end
    
63.       atb_setup
    
64.       @status_window.refresh
    
65.       # 待命成員退避
    
66.       $game_party.backword_actors[0,0] = $game_party.actors[FRONT_MEMBER_LIMIT, BACKWARD_MEMBER_LIMIT]
    
67.       $game_party.actors[FRONT_MEMBER_LIMIT, BACKWARD_MEMBER_LIMIT] = nil
    
68.       $game_party.actors.compact!
    
69.     end
    
70.     replacement_judge   
    
71.   end
    
72. end

复制代码

---

此贴于 2008-12-9 11:05:03 被版主天圣的马甲提醒，请楼主看到后对本贴做出回应。

---

此贴于 2008-12-9 16:36:03 被版主darkten提醒，请楼主看到后对本贴做出回应。

---

版务信息：本贴由楼主自主结贴～

TERENCE

以下引用卓越大白痴于2008-12-8 20:15:59的发言：　　
可不可以实现替补出场后不改变菜单中的人物顺序 （无论如何不想让第一个脚色更改位置）
或者其他方法也行
比如如何用事件脚本更改角色排列顺序等等  谢谢了

还是用脚本修改比较好.....先給思路

泡沫式还原排序法：
队伍在泡沫式排序前，
先把队伍顺序数字按順序一一存在某阵列中( number=...)，
再把此阵列作以HP大小作泡沫式排序，

战斗胜利或逃走实在利用.....
刚刚被泡沫排序用乱阵列中的顺序数字，
再做一次角色排列泡沫排序.....就还原了。。。

(有空我會試試>_<)

卓越大白痴

谢谢 龙皇兄

我的水平还没只有小虾米的境界,还需要exp 10000000才能升小强(苦啊~~~~~~)
大侠们表笑我 . . .
                                召唤大侠      求解谢谢

TERENCE

以下引用卓越大白痴于2008-12-8 21:47:32的发言：

谢谢 龙皇兄

我的水平还没只有小虾米的境界,还需要exp 10000000才能升小强(苦啊~~~~~~)
大侠们表笑我 . . .
                               召唤大侠      求解谢谢

修改完畢....LZ試試!!
替換我之前即可
P.S. RTAB版

#==============================================================================
# ■ Game_Party
#------------------------------------------------------------------------------
# 　追加後補判定方法。
#==============================================================================

class Game_Party
  #--------------------------------------------------------------------------
  # ● 後補判定
  #--------------------------------------------------------------------------
  def replacement_need?
    # 同伴中無人 HP 在 0 以上
    for actor in @actors
      if actor.rest_hp > 0
        return false
      end
    end
    # 後補
    return true
  end
end

#==============================================================================
# ■ Scene_Battle
#------------------------------------------------------------------------------
# 　追加後補動作。
#==============================================================================
class Scene_Battle
  alias replacement_judge judge
  def judge
    # 判斷战斗人物死亡后是否使待机人物替补出场
    if $game_party.replacement_need?
      # 待命成員復帰
      $game_party.actors[$game_party.actors.size,0] = $game_party.backword_actors
      $game_party.backword_actors.clear
      #--------------------------------------------------------------------------
      # ● 泡沫式排序法
      #--------------------------------------------------------------------------
      for i in 1..$game_party.actors.size
        for j in 1..$game_party.actors.size
            if $game_party.actors[i-1].hp > $game_party.actors[j-1].hp
              temp = $game_party.actors[i-1]
              $game_party.actors[i-1] = $game_party.actors[j-1]
              $game_party.actors[j-1] = temp
              temp = @rank
              @rank = @rank[j]
              @rank[j] = temp
            end
        end
      end
      atb_setup
      @status_window.refresh
      # 待命成員退避
      $game_party.backword_actors[0,0] = $game_party.actors[FRONT_MEMBER_LIMIT, BACKWARD_MEMBER_LIMIT]
      $game_party.actors[FRONT_MEMBER_LIMIT, BACKWARD_MEMBER_LIMIT] = nil
      $game_party.actors.compact!
    end
    replacement_judge   
  end
  #--------------------------------------------------------------------------
  # ● 还原泡沫式排序法
  #--------------------------------------------------------------------------
  alias ranking_main main
  def main
    # 存取队伍顺序数字
    @rank = []
    for i in 1..$game_party.actors.size
      @rank = i
    end   
    # メイン処理
    ranking_main
    # 还原排序
    for i in 1..$game_party.actors.size
      for j in 1..$game_party.actors.size
          if @rank < @rank[j]
            temp = $game_party.actors[i-1]
            $game_party.actors[i-1] = $game_party.actors[j-1]
            $game_party.actors[j-1] = temp
            temp = @rank
            @rank = @rank[j]
            @rank[j] = temp
          end
      end
    end
  end
end

注意:
XRXS26. 人物扩张系统 ver..05 要先放前面
其后再放我這個修改過的待机人物替补出场
↓脚本排序如下↓
◎人物待机扩张系统◎
◎待机人物替補出場◎

---

系统信息：本贴由楼主认可为正确答案，66RPG感谢您的热情解答～

卓越大白痴

太感谢了 小弟拜服 龙兄神威 天下无双

TERENCE

以下引用卓越大白痴于2008-12-9 20:38:18的发言：
太感谢了 小弟拜服 龙兄神威 天下无双

没那么夸张啦！！


只不过学过C语言課程中的资料结构
有学过资料排序的方法，用在RUBY上而已(学以致用罢了！)


这种排序法只是其中最常用的一种而已......

P.S.只要LZ不要养成伸手党的习惯就好了...呵呵！