谁帮我修改下战败脚本..............

ziseyannv

上次有人帮我改了下战败脚本

1. 敗北可能の場合
   
2.       Audio.se_play("Audio/SE/神说了",100,100)
   
3.       Audio.bgm_fade(1000)
   
4. $game_screen.start_tone_change(Tone.new(0,0,0,255), 40)
   
5.       40.times{
   
6.     # 刷新窗口
   
7.     $game_screen.update               
   
8.     @help_window.update
   
9. #    @party_command_window.update
   
10. #    @actor_command_window.update
    
11. #    @status_window.update
    
12. #    @message_window.update
    
13.     # 刷新活动块
    
14.     @spriteset.update
    
15.     Graphics.update
    
16.       }
    
17.       w = Window_Command.new(128,["继续","退出"])
    
18.       w.x = 288
    
19.       w.y = 240
    
20.       loop do
    
21.         Graphics.update
    
22.         Input.update
    
23.         w.update
    
24.         if Input.press?(Input::C)
    
25.           case w.index
    
26.           when 0
    
27.            $scene = Scene_Load.new
    
28.             break
    
29.           when 1
    
30.             exit
    
31.           end
    
32.         end
    
33.       end
    
34.       w.dispose
    
35.       if $game_temp.battle_can_lose

复制代码

但有些战斗我是允许战败的，结果那场战斗主角战败后还是弹出了继续，退出窗口。


是改在RTAB上的


──ziseyannv于2012-1-18 10:11补充内容：


是改在RTAB上的。


──ziseyannv于2012-1-18 10:12补充内容：

Wind2010

嗯搜到了你之前的脚本，用这个脚本覆盖原来的应该就行了，普通系统测试无问题

1. class Scene_Battle
   
2.   #--------------------------------------------------------------------------
   
3.   # ● 胜负判定
   
4.   #--------------------------------------------------------------------------
   
5.   def judge
   
6.     # 全灭判定是真、并且同伴人数为 0 的情况下
   
7.     if $game_party.all_dead? or $game_party.actors.size == 0
   
8.       if $game_temp.battle_can_lose
   
9.         # 还原为战斗开始前的 BGM
   
10.         $game_system.bgm_play($game_temp.map_bgm)
    
11.         # 战斗结束
    
12.         battle_end(2)
    
13.         # 返回 true
    
14.         return true
    
15.       end
    
16.       # 允许失败的情况下
    
17.     Audio.se_play("Audio/SE/神说了",100,100)
    
18.       Audio.bgm_fade(1000)
    
19.       $game_screen.start_tone_change(Tone.new(0,0,0,255), 40)
    
20.       40.times{
    
21.     # 刷新窗口
    
22.       $game_screen.update
    
23.       @help_window.update
    
24.       #@party_command_window.update
    
25.       #@actor_command_window.update
    
26.       #@status_window.update
    
27.       #@message_window.update
    
28.       # 刷新活动块
    
29.       @spriteset.update
    
30.       Graphics.update
    
31.       }
    
32.       w = Window_Command.new(128,["继续","退出"])
    
33.       w.x = 320-w.width/2
    
34.       w.y = 240-w.height/2
    
35.       loop do
    
36.         Graphics.update
    
37.         Input.update
    
38.         w.update
    
39.         if Input.press?(Input::C)
    
40.           $game_system.se_play($data_system.decision_se)
    
41.           case w.index
    
42.           when 0
    
43.             $scene = Scene_Load.new
    
44.             w.dispose
    
45.             w = nil
    
46.             return
    
47.           when 1
    
48.             exit
    
49.           end
    
50.         end
    
51.       end
    
52.       # 设置游戏结束标志
    
53.       $game_temp.gameover = true
    
54.       # 返回 true
    
55.       return true
    
56.     end
    
57.     # 如果存在任意 1 个敌人就返回 false
    
58.     for enemy in $game_troop.enemies
    
59.       if enemy.exist?
    
60.         return false
    
61.       end
    
62.     end
    
63.     # 开始结束战斗回合 (胜利)
    
64.     start_phase5
    
65.     # 返回 true
    
66.     return true
    
67.   end
    
68. end

复制代码

ziseyannv

Wind2010 发表于 2012-1-18 10:22
嗯搜到了你之前的脚本，用这个脚本覆盖原来的应该就行了，普通系统测试无问题 ...

这个与RTAB冲突~~~~~~·