Script de Estado en batalla

por Joserichi Vie 16 Jul 2010, 8:00 am

Este script añade una opcion a la batalla (sistema normal) que permite comprobar el estado de los personajes antes de atacar.

Código:: =begin ================================================================================ |Script de Estado en Batalla hecho por Joserichi | ================================================================================ Este script incluye una opcion en la batalla que te permite ver el estado de tus personajes antes de atacar. Pegar encima de Main =end #------------------------------------------------------------------------------- #Scene_Status #------------------------------------------------------------------------------- class Scene_Status < Scene_Base def initialize(actor_index = 0,battle = false) @actor_index = actor_index @battle = battle end def return_scene if @battle $scene = Scene_Battle.new(true) else $scene = Scene_Menu.new(3) end end def next_actor @actor_index += 1 @actor_index %= $game_party.members.size $scene = Scene_Status.new(@actor_index, @battle) end def prev_actor @actor_index += $game_party.members.size - 1 @actor_index %= $game_party.members.size $scene = Scene_Status.new(@actor_index, @battle) end end #------------------------------------------------------------------------------- #Window_PartyCommand #------------------------------------------------------------------------------- class Window_PartyCommand < Window_Command def initialize s1 = Vocab::fight s2 = Vocab::escape s3 = Vocab::status super(128, [s1, s2, s3], 1, 4) draw_item(0, true) draw_item(1, $game_troop.can_escape) self.active = false end end #------------------------------------------------------------------------------- #Scene_Battle #------------------------------------------------------------------------------- class Scene_Battle < Scene_Base def initialize(est = false) @est = est end def post_start super if @est make_escape_ratio process_battle_event start_party_command_selection else process_battle_start end end def update_party_command_selection if Input.trigger?(Input::C) case @party_command_window.index when 0 # 戦う Sound.play_decision @status_window.index = @actor_index = -1 next_actor when 1 # 逃げる if $game_troop.can_escape == false Sound.play_buzzer return end Sound.play_decision process_escape when 2 Sound.play_decision $scene = Scene_Status.new(0,true) end end end end

Si quereis que lo haga compatible con otro sistema de batalla, pasadmelo y vere que puedo hacer.