[VXA] Battle Debug

#===============================================================================
#
# Battle Debug
# 16/4/2012
# By Pacman
# This script merely adds debug options to battles for testing purposes. Here
# is a list of the things you can do with it:
# Button - Function
# F5 - HP and MP refilled
# F5 + Alt - HP, MP and TP refilled
# F5 + Shift - Recover all members (HP and MP filled, all stats cleared)
# F5 + Shift + Alt - Recover all members (HP, MP and TP filled, all statuses
#   cleared)
# F6 - Damages all members (TP and MP to 0, HP to 1)
# F7 - Fills all members' TP
# F8 - Kill all enemies (insant win)
# F9 - Clears all members' statuses
#
#===============================================================================

#==============================================================================
# ** Game_Battler
#------------------------------------------------------------------------------
#  A battler class with methods for sprites and actions added. This class
# is used as a super class of the Game_Actor class and Game_Enemy class.
#==============================================================================

class Game_Battler < Game_BattlerBase
  def refresh_hpmp
    @hp = mhp
    @mp = mmp
  end
end

#==============================================================================
# ** Scene_Battle
#------------------------------------------------------------------------------
#  This class performs battle screen processing.
#==============================================================================

class Scene_Battle < Scene_Base
  #--------------------------------------------------------------------------
  # Alias Listing
  #--------------------------------------------------------------------------
  alias pac_batdeb_update update_basic
  #--------------------------------------------------------------------------
  # * Update Frame (Basic)
  #--------------------------------------------------------------------------
  def update_basic(*args)
    pac_batdeb_update(*args)
    update_debug
  end
  #--------------------------------------------------------------------------
  # * Update Frame (Debug)
  #--------------------------------------------------------------------------
  def update_debug
    return unless $TEST || $BTEST
    if Input.trigger?(:F5)
      if Input.press?(:A)
        debug_heal_party
      else
        debug_refresh_party
      end
    end
    debug_damage_party if Input.trigger?(:F6)
    debug_fill_tp if Input.trigger?(:F7)
    debug_kill_all if Input.trigger?(:F8)
    debug_recover_status if Input.trigger?(:F9)
  end
  #--------------------------------------------------------------------------
  # * Heal Party
  #--------------------------------------------------------------------------
  def debug_heal_party
    Sound.play_recovery
    for member in $game_party.battle_members
      member.recover_all
      member.tp = member.max_tp
    end
    refresh_all_windows
  end
  #--------------------------------------------------------------------------
  # * Damage Party
  #--------------------------------------------------------------------------
  def debug_damage_party
    Sound.play_actor_damage
    for member in $game_party.alive_members
      member.hp = 1
      member.mp = 0
      member.tp = 0
    end
    refresh_all_windows
  end
  #--------------------------------------------------------------------------
  # * Fill TP
  #--------------------------------------------------------------------------
  def debug_fill_tp
    Sound.play_recovery
    for member in $game_party.alive_members
      member.tp = member.max_tp
    end
    refresh_all_windows
  end
  #--------------------------------------------------------------------------
  # * Kill Enemies
  #--------------------------------------------------------------------------
  def debug_kill_all
    for enemy in $game_troop.alive_members
      enemy.hp = 0
      enemy.perform_collapse_effect
    end
    BattleManager.judge_win_loss
    @log_window.wait
    @log_window.wait_for_effect
  end
  #--------------------------------------------------------------------------
  # * Recover All
  #--------------------------------------------------------------------------
  def debug_refresh_party
    Sound.play_recovery
    for member in $game_party.battle_members
      member.refresh_hpmp
      if Input.press?(:ALT)
        member.tp = member.max_tp
      end
    end
    refresh_all_windows
  end
  #--------------------------------------------------------------------------
  # * Recover Status
  #--------------------------------------------------------------------------
  def debug_recover_status
    Sound.play_recovery
    for member in $game_party.battle_members
      member.clear_states
    end
    refresh_all_windows
  end
  #--------------------------------------------------------------------------
  # * Refresh Scene Windows
  #--------------------------------------------------------------------------
  def refresh_all_windows
    instance_variables.each do |varname|
      ivar = instance_variable_get(varname)
      ivar.refresh if ivar.is_a?(Window) && ivar.methods.include?(:refresh)
    end
  end
end

($pac ||= {})[:battle_debug] = true

#===============================================================================
#
# END OF SCRIPT
#
#===============================================================================