可以调整的自动战斗AI

布兰度西特 · 发表于 2012-12-15 10:46:26

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

本帖最后由布兰度西特于 2012-12-15 13:15 编辑

可以在下面的自动战斗脚本中做修改，基本功能：恢复技能判断在血量%的时候使用单体或多体恢复技能攻击技能判断敌人数量使用单体或多体技能在MP或TP不足的情况下使用普通攻击当然AI能更多点我也不介意~

~

RUBY 代码复制

#==============================================================================
# 
# ▼ Yanfly Engine Ace - Command Autobattle v1.01
# -- Last Updated: 2011.12.26
# -- Level: Normal
# -- Requires: n/a
# 
#==============================================================================
 
$imported = {} if $imported.nil?
$imported["YEA-CommandAutobattle"] = true
 
#==============================================================================
# ▼ Updates
# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
# 2011.12.26 - Bug Fixed: Autobattle cancelled after each battle.
# 2011.12.12 - Started Script and Finished.
# 
#==============================================================================
# ▼ Introduction
# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
# Anyone remember the Autobattle command from RPG Maker 2000? Well, now it's
# back and you can choose to tack it onto the Party Command Window or the Actor
# Command Window. When autobattle is selected, it will let the game determine
# what action to use for the party and/or actors depending on the game's A.I.
# 
# Furthermore, there is an option to have Autobattle continously remain in
# effect if selected from the Party Command Window. When Autobattle is selected
# in the Actor Command Window, it'll cause the game to automatically choose an
# action for that actor instead.
# 
# In addition to this, there exists the functionality of having all battle
# members but the first member autobattle. This feature can be turned off.
# 
#==============================================================================
# ▼ Instructions
# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
# To install this script, open up your script editor and copy/paste this script
# to an open slot below ▼ Materials/素材 but above ▼ Main. Remember to save.
# 
# Adjust the settings in the module to your liking.
# 
#==============================================================================
# ▼ Compatibility
# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=
# This script is made strictly for RPG Maker VX Ace. It is highly unlikely that
# it will run with RPG Maker VX without adjusting.
# 
#==============================================================================
 
module YEA
  module AUTOBATTLE
 
    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
    # - Party Autobattle Command Settings -
    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
    # Adjust the command settings for Autobattle under the Party Command Window
    # here. If you decide to let Party Autobattle be continuous, it will keep
    # going until the player decides to cancel it with X.
    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
    ENABLE_PARTY_AUTOBATTLE = true      # Enables autobattle in Party Window.
    PARTY_COMMAND_NAME  = "自动"        # Text that appears for Autobattle.
    PARTY_SHOW_SWITCH   = 0             # 显示自动战斗的开关.
    PARTY_ENABLE_SWITCH = 0             # 启用自动战斗的开关.
    # Note: For both of the switches, if they are set to 0, then the feature
    # will not be used at all. The command will always be shown and/or the
    # command will always be enabled.
 
    # These settings adjust continous autobattle. If enabled, these settings
    # will be applied. Otherwise, they won't be.
    ENABLE_CONTINOUS = true             # If true, autobattle is continous.
    DISABLE_MESSAGE = "按取消键可以退出自动战斗."
 
    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
    # - Actor Autobattle Command Settings -
    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
    # Adjust the command settings for Autobattle under the Actor Command Window
    # here. Actors do not have continous autobattle. Instead, they just simply
    # choose whatever action the game decides is most suitable for them.
    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
    ENABLE_ACTOR_AUTOBATTLE = true      # Enables autobattle in Party Window.
    ACTOR_COMMAND_NAME  = "自动"        # Text that appears for Autobattle.
    ACTOR_SHOW_SWITCH   = 0             # Switch used to show Autobattle.
    ACTOR_ENABLE_SWITCH = 0             # Switch used to enable Autobattle.
    # Note: For both of the switches, if they are set to 0, then the feature
    # will not be used at all. The command will always be shown and/or the
    # command will always be enabled.
 
    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
    # - Secondary Members Autobattle -
    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
    # For those who only want to grant command control to the first actor in
    # battle, enable the setting below. All of the battle members who aren't
    # first in line will automatically choose their action for the turn.
    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-
    ENABLE_SECONDARY_AUTOBATTLE = false
 
  end # AUTOBATTLE
end # YEA
 
#==============================================================================
# ▼ Editting anything past this point may potentially result in causing
# computer damage, incontinence, explosion of user's head, coma, death, and/or
# halitosis so edit at your own risk.
#==============================================================================
 
#==============================================================================
# ■ BattleManager
#==============================================================================
 
module BattleManager
 
  #--------------------------------------------------------------------------
  # alias method: process_victory
  #--------------------------------------------------------------------------
  class <<self; alias battlemanager_process_victory_cab process_victory; end
  def self.process_victory
    SceneManager.scene.close_disable_autobattle_window
    return battlemanager_process_victory_cab
  end
 
  #--------------------------------------------------------------------------
  # alias method: process_abort
  #--------------------------------------------------------------------------
  class <<self; alias battlemanager_process_abort_cab process_abort; end
  def self.process_abort
    SceneManager.scene.close_disable_autobattle_window
    return battlemanager_process_abort_cab
  end
 
  #--------------------------------------------------------------------------
  # alias method: process_defeat
  #--------------------------------------------------------------------------
  class <<self; alias battlemanager_process_defeat_cab process_defeat; end
  def self.process_defeat
    SceneManager.scene.close_disable_autobattle_window
    return battlemanager_process_defeat_cab
  end
 
end # BattleManager
 
#==============================================================================
# ■ Game_Temp
#==============================================================================
 
class Game_Temp
 
  #--------------------------------------------------------------------------
  # public instance variables
  #--------------------------------------------------------------------------
  attr_accessor :continous_autobattle
 
end # Game_Temp
 
#==============================================================================
# ■ Game_BattlerBase
#==============================================================================
 
class Game_BattlerBase
 
  #--------------------------------------------------------------------------
  # alias method: auto_battle?
  #--------------------------------------------------------------------------
  alias game_battlerbase_auto_battle_cab auto_battle?
  def auto_battle?
    return true if continuous_autobattle?
    return true if secondary_auto_battle?
    return game_battlerbase_auto_battle_cab
  end
 
  #--------------------------------------------------------------------------
  # new method: continuous_autobattle?
  #--------------------------------------------------------------------------
  def continuous_autobattle?
    return false unless actor?
    return $game_temp.continous_autobattle
  end
 
  #--------------------------------------------------------------------------
  # new method: secondary_auto_battle?
  #--------------------------------------------------------------------------
  def secondary_auto_battle?
    return false unless actor?
    return false if index == 0
    return YEA::AUTOBATTLE::ENABLE_SECONDARY_AUTOBATTLE
  end
 
end # Game_BattlerBase
 
#==============================================================================
# ■ Game_Unit
#==============================================================================
 
class Game_Unit
 
  #--------------------------------------------------------------------------
  # alias method: make_actions
  #--------------------------------------------------------------------------
  alias game_unit_make_actions_cab make_actions
  def make_actions
    game_unit_make_actions_cab
    refresh_autobattler_status_window
  end
 
  #--------------------------------------------------------------------------
  # new method: refresh_autobattler_status_window
  #--------------------------------------------------------------------------
  def refresh_autobattler_status_window
    return unless SceneManager.scene_is?(Scene_Battle)
    return unless self.is_a?(Game_Party)
    SceneManager.scene.refresh_autobattler_status_window
  end
 
end # Game_Unit
 
#==============================================================================
# ■ Window_PartyCommand
#==============================================================================
 
class Window_PartyCommand < Window_Command
 
  #--------------------------------------------------------------------------
  # alias method: make_command_list
  #--------------------------------------------------------------------------
  alias window_partycommand_cab make_command_list
  def make_command_list
    window_partycommand_cab
    return if $imported["YEA-BattleCommandList"]
    add_autobattle_command if YEA::AUTOBATTLE::ENABLE_PARTY_AUTOBATTLE
  end
 
  #--------------------------------------------------------------------------
  # new method: add_autobattle_command
  #--------------------------------------------------------------------------
  def add_autobattle_command
    return unless show_autobattle?
    text = YEA::AUTOBATTLE::PARTY_COMMAND_NAME
    add_command(text, :autobattle, enable_autobattle?)
  end
 
  #--------------------------------------------------------------------------
  # new method: show_autobattle?
  #--------------------------------------------------------------------------
  def show_autobattle?
    return true if YEA::AUTOBATTLE::PARTY_SHOW_SWITCH <= 0
    return $game_switches[YEA::AUTOBATTLE::PARTY_SHOW_SWITCH]
  end
 
  #--------------------------------------------------------------------------
  # new method: enable_autobattle?
  #--------------------------------------------------------------------------
  def enable_autobattle?
    return true if YEA::AUTOBATTLE::PARTY_ENABLE_SWITCH <= 0
    return $game_switches[YEA::AUTOBATTLE::PARTY_ENABLE_SWITCH]
  end
 
end # Window_PartyCommand
 
#==============================================================================
# ■ Window_ActorCommand
#==============================================================================
 
class Window_ActorCommand < Window_Command
 
  #--------------------------------------------------------------------------
  # alias method: make_command_list
  #--------------------------------------------------------------------------
  alias window_actorcommand_make_command_list_cab make_command_list
  def make_command_list
    return if @actor.nil?
    unless $imported["YEA-BattleCommandList"]
      add_autobattle_command if YEA::AUTOBATTLE::ENABLE_ACTOR_AUTOBATTLE
    end
    window_actorcommand_make_command_list_cab
  end
 
  #--------------------------------------------------------------------------
  # new method: add_autobattle_command
  #--------------------------------------------------------------------------
  def add_autobattle_command
    return unless show_autobattle?
    text = YEA::AUTOBATTLE::ACTOR_COMMAND_NAME
    add_command(text, :autobattle, enable_autobattle?)
  end
 
  #--------------------------------------------------------------------------
  # new method: show_autobattle?
  #--------------------------------------------------------------------------
  def show_autobattle?
    return true if YEA::AUTOBATTLE::ACTOR_SHOW_SWITCH <= 0
    return $game_switches[YEA::AUTOBATTLE::ACTOR_SHOW_SWITCH]
  end
 
  #--------------------------------------------------------------------------
  # new method: enable_autobattle?
  #--------------------------------------------------------------------------
  def enable_autobattle?
    return true if YEA::AUTOBATTLE::ACTOR_ENABLE_SWITCH <= 0
    return $game_switches[YEA::AUTOBATTLE::ACTOR_ENABLE_SWITCH]
  end
 
end # Window_ActorCommand
 
#==============================================================================
# ■ Window_DisableAutobattle
#==============================================================================
 
class Window_DisableAutobattle < Window_Base
 
  #--------------------------------------------------------------------------
  # initialize
  #--------------------------------------------------------------------------
  def initialize
    super(64, 0, Graphics.width - 128, fitting_height(1))
    self.y = Graphics.height - fitting_height(1) + 12
    self.opacity = 0
    self.z = 1000
    hide
    refresh
  end
 
  #--------------------------------------------------------------------------
  # refresh
  #--------------------------------------------------------------------------
  def refresh
    contents.clear
    draw_background(contents.rect)
    text = YEA::AUTOBATTLE::DISABLE_MESSAGE
    draw_text(contents.rect, text, 1)
  end
 
  #--------------------------------------------------------------------------
  # draw_background
  #--------------------------------------------------------------------------
  def draw_background(rect)
    temp_rect = rect.clone
    temp_rect.width /= 2
    contents.gradient_fill_rect(temp_rect, back_color2, back_color1)
    temp_rect.x = temp_rect.width
    contents.gradient_fill_rect(temp_rect, back_color1, back_color2)
  end
 
  #--------------------------------------------------------------------------
  # back_color1
  #--------------------------------------------------------------------------
  def back_color1; return Color.new(0, 0, 0, 192); end
 
  #--------------------------------------------------------------------------
  # back_color2
  #--------------------------------------------------------------------------
  def back_color2; return Color.new(0, 0, 0, 0); end
 
end # Window_DisableAutobattle
 
#==============================================================================
# ■ Scene_Battle
#==============================================================================
 
class Scene_Battle < Scene_Base
 
  #--------------------------------------------------------------------------
  # alias method: create_all_windows
  #--------------------------------------------------------------------------
  alias scene_battle_create_all_windows_cab create_all_windows
  def create_all_windows
    $game_temp.continous_autobattle = false
    scene_battle_create_all_windows_cab
    create_disable_autobattle_window
  end
 
  #--------------------------------------------------------------------------
  # alias method: create_party_command_window
  #--------------------------------------------------------------------------
  alias create_party_command_window_cab create_party_command_window
  def create_party_command_window
    create_party_command_window_cab
    @party_command_window.set_handler(:autobattle, method(:command_pautobattle))
  end
 
  #--------------------------------------------------------------------------
  # new method: command_pautobattle
  #--------------------------------------------------------------------------
  def command_pautobattle
    for member in $game_party.battle_members
      next unless member.inputable?
      member.make_auto_battle_actions
    end
    $game_temp.continous_autobattle = YEA::AUTOBATTLE::ENABLE_CONTINOUS
    @disable_autobattle_window.show if $game_temp.continous_autobattle
    refresh_autobattler_status_window
    turn_start
  end
 
  #--------------------------------------------------------------------------
  # new method: create_disable_autobattle_window
  #--------------------------------------------------------------------------
  def create_disable_autobattle_window
    @disable_autobattle_window = Window_DisableAutobattle.new
  end
 
  #--------------------------------------------------------------------------
  # alias method: update
  #--------------------------------------------------------------------------
  alias scene_battle_update_cab update
  def update
    scene_battle_update_cab
    update_continous_autobattle_window
  end
 
  #--------------------------------------------------------------------------
  # alias method: update_basic
  #--------------------------------------------------------------------------
  alias scene_battle_update_basic_cab update_basic
  def update_basic
    scene_battle_update_basic_cab
    update_continous_autobattle_window
  end
 
  #--------------------------------------------------------------------------
  # new method: update_continous_autobattle_window
  #--------------------------------------------------------------------------
  def update_continous_autobattle_window
    return unless @disable_autobattle_window.visible
    opacity = $game_message.visible ? 0 : 255
    @disable_autobattle_window.contents_opacity = opacity
    close_disable_autobattle_window if Input.press?(:B)
  end
 
  #--------------------------------------------------------------------------
  # new method: close_disable_autobattle_window
  #--------------------------------------------------------------------------
  def close_disable_autobattle_window
    Sound.play_cancel if Input.press?(:B) && @disable_autobattle_window.visible
    $game_temp.continous_autobattle = false
    @disable_autobattle_window.hide
  end
 
  #--------------------------------------------------------------------------
  # alias method: create_actor_command_window
  #--------------------------------------------------------------------------
  alias create_actor_command_window_cab create_actor_command_window
  def create_actor_command_window
    create_actor_command_window_cab
    @actor_command_window.set_handler(:autobattle, method(:command_aautobattle))
  end
 
  #--------------------------------------------------------------------------
  # new method: command_aautobattle
  #--------------------------------------------------------------------------
  def command_aautobattle
    BattleManager.actor.make_auto_battle_actions
    next_command
  end
 
  #--------------------------------------------------------------------------
  # new method: refresh_autobattler_status_window
  #--------------------------------------------------------------------------
  def refresh_autobattler_status_window
    for member in $game_party.battle_members
      next unless member.auto_battle?
      @status_window.draw_item(member.index)
    end
  end
 
end # Scene_Battle
 
#==============================================================================
# 
# ▼ End of File
# 
#==============================================================================

#==============================================================================


# 


# ▼ Yanfly Engine Ace - Command Autobattle v1.01


# -- Last Updated: 2011.12.26


# -- Level: Normal


# -- Requires: n/a


# 


#==============================================================================


 


$imported = {} if $imported.nil?


$imported["YEA-CommandAutobattle"] = true


 


#==============================================================================


# ▼ Updates


# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=


# 2011.12.26 - Bug Fixed: Autobattle cancelled after each battle.


# 2011.12.12 - Started Script and Finished.


# 


#==============================================================================


# ▼ Introduction


# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=


# Anyone remember the Autobattle command from RPG Maker 2000? Well, now it's


# back and you can choose to tack it onto the Party Command Window or the Actor


# Command Window. When autobattle is selected, it will let the game determine


# what action to use for the party and/or actors depending on the game's A.I.


# 


# Furthermore, there is an option to have Autobattle continously remain in


# effect if selected from the Party Command Window. When Autobattle is selected


# in the Actor Command Window, it'll cause the game to automatically choose an


# action for that actor instead.


# 


# In addition to this, there exists the functionality of having all battle


# members but the first member autobattle. This feature can be turned off.


# 


#==============================================================================


# ▼ Instructions


# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=


# To install this script, open up your script editor and copy/paste this script


# to an open slot below ▼ Materials/素材 but above ▼ Main. Remember to save.


# 


# Adjust the settings in the module to your liking.


# 


#==============================================================================


# ▼ Compatibility


# =-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=


# This script is made strictly for RPG Maker VX Ace. It is highly unlikely that


# it will run with RPG Maker VX without adjusting.


# 


#==============================================================================


 


module YEA


  module AUTOBATTLE


 


    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-


    # - Party Autobattle Command Settings -


    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-


    # Adjust the command settings for Autobattle under the Party Command Window


    # here. If you decide to let Party Autobattle be continuous, it will keep


    # going until the player decides to cancel it with X.


    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-


    ENABLE_PARTY_AUTOBATTLE = true      # Enables autobattle in Party Window.


    PARTY_COMMAND_NAME  = "自动"        # Text that appears for Autobattle.


    PARTY_SHOW_SWITCH   = 0             # 显示自动战斗的开关.


    PARTY_ENABLE_SWITCH = 0             # 启用自动战斗的开关.


    # Note: For both of the switches, if they are set to 0, then the feature


    # will not be used at all. The command will always be shown and/or the


    # command will always be enabled.


 


    # These settings adjust continous autobattle. If enabled, these settings


    # will be applied. Otherwise, they won't be.


    ENABLE_CONTINOUS = true             # If true, autobattle is continous.


    DISABLE_MESSAGE = "按取消键可以退出自动战斗."


 


    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-


    # - Actor Autobattle Command Settings -


    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-


    # Adjust the command settings for Autobattle under the Actor Command Window


    # here. Actors do not have continous autobattle. Instead, they just simply


    # choose whatever action the game decides is most suitable for them.


    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-


    ENABLE_ACTOR_AUTOBATTLE = true      # Enables autobattle in Party Window.


    ACTOR_COMMAND_NAME  = "自动"        # Text that appears for Autobattle.


    ACTOR_SHOW_SWITCH   = 0             # Switch used to show Autobattle.


    ACTOR_ENABLE_SWITCH = 0             # Switch used to enable Autobattle.


    # Note: For both of the switches, if they are set to 0, then the feature


    # will not be used at all. The command will always be shown and/or the


    # command will always be enabled.


 


    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-


    # - Secondary Members Autobattle -


    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-


    # For those who only want to grant command control to the first actor in


    # battle, enable the setting below. All of the battle members who aren't


    # first in line will automatically choose their action for the turn.


    #=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=-


    ENABLE_SECONDARY_AUTOBATTLE = false


 


  end # AUTOBATTLE


end # YEA


 


#==============================================================================


# ▼ Editting anything past this point may potentially result in causing


# computer damage, incontinence, explosion of user's head, coma, death, and/or


# halitosis so edit at your own risk.


#==============================================================================


 


#==============================================================================


# ■ BattleManager


#==============================================================================


 


module BattleManager


 


  #--------------------------------------------------------------------------


  # alias method: process_victory


  #--------------------------------------------------------------------------


  class <<self; alias battlemanager_process_victory_cab process_victory; end


  def self.process_victory


    SceneManager.scene.close_disable_autobattle_window


    return battlemanager_process_victory_cab


  end


 


  #--------------------------------------------------------------------------


  # alias method: process_abort


  #--------------------------------------------------------------------------


  class <<self; alias battlemanager_process_abort_cab process_abort; end


  def self.process_abort


    SceneManager.scene.close_disable_autobattle_window


    return battlemanager_process_abort_cab


  end


 


  #--------------------------------------------------------------------------


  # alias method: process_defeat


  #--------------------------------------------------------------------------


  class <<self; alias battlemanager_process_defeat_cab process_defeat; end


  def self.process_defeat


    SceneManager.scene.close_disable_autobattle_window


    return battlemanager_process_defeat_cab


  end


 


end # BattleManager


 


#==============================================================================


# ■ Game_Temp


#==============================================================================


 


class Game_Temp


 


  #--------------------------------------------------------------------------


  # public instance variables


  #--------------------------------------------------------------------------


  attr_accessor :continous_autobattle


 


end # Game_Temp


 


#==============================================================================


# ■ Game_BattlerBase


#==============================================================================


 


class Game_BattlerBase


 


  #--------------------------------------------------------------------------


  # alias method: auto_battle?


  #--------------------------------------------------------------------------


  alias game_battlerbase_auto_battle_cab auto_battle?


  def auto_battle?


    return true if continuous_autobattle?


    return true if secondary_auto_battle?


    return game_battlerbase_auto_battle_cab


  end


 


  #--------------------------------------------------------------------------


  # new method: continuous_autobattle?


  #--------------------------------------------------------------------------


  def continuous_autobattle?


    return false unless actor?


    return $game_temp.continous_autobattle


  end


 


  #--------------------------------------------------------------------------


  # new method: secondary_auto_battle?


  #--------------------------------------------------------------------------


  def secondary_auto_battle?


    return false unless actor?


    return false if index == 0


    return YEA::AUTOBATTLE::ENABLE_SECONDARY_AUTOBATTLE


  end


 


end # Game_BattlerBase


 


#==============================================================================


# ■ Game_Unit


#==============================================================================


 


class Game_Unit


 


  #--------------------------------------------------------------------------


  # alias method: make_actions


  #--------------------------------------------------------------------------


  alias game_unit_make_actions_cab make_actions


  def make_actions


    game_unit_make_actions_cab


    refresh_autobattler_status_window


  end


 


  #--------------------------------------------------------------------------


  # new method: refresh_autobattler_status_window


  #--------------------------------------------------------------------------


  def refresh_autobattler_status_window


    return unless SceneManager.scene_is?(Scene_Battle)


    return unless self.is_a?(Game_Party)


    SceneManager.scene.refresh_autobattler_status_window


  end


 


end # Game_Unit


 


#==============================================================================


# ■ Window_PartyCommand


#==============================================================================


 


class Window_PartyCommand < Window_Command


 


  #--------------------------------------------------------------------------


  # alias method: make_command_list


  #--------------------------------------------------------------------------


  alias window_partycommand_cab make_command_list


  def make_command_list


    window_partycommand_cab


    return if $imported["YEA-BattleCommandList"]


    add_autobattle_command if YEA::AUTOBATTLE::ENABLE_PARTY_AUTOBATTLE


  end


 


  #--------------------------------------------------------------------------


  # new method: add_autobattle_command


  #--------------------------------------------------------------------------


  def add_autobattle_command


    return unless show_autobattle?


    text = YEA::AUTOBATTLE::PARTY_COMMAND_NAME


    add_command(text, :autobattle, enable_autobattle?)


  end


 


  #--------------------------------------------------------------------------


  # new method: show_autobattle?


  #--------------------------------------------------------------------------


  def show_autobattle?


    return true if YEA::AUTOBATTLE::PARTY_SHOW_SWITCH <= 0


    return $game_switches[YEA::AUTOBATTLE::PARTY_SHOW_SWITCH]


  end


 


  #--------------------------------------------------------------------------


  # new method: enable_autobattle?


  #--------------------------------------------------------------------------


  def enable_autobattle?


    return true if YEA::AUTOBATTLE::PARTY_ENABLE_SWITCH <= 0


    return $game_switches[YEA::AUTOBATTLE::PARTY_ENABLE_SWITCH]


  end


 


end # Window_PartyCommand


 


#==============================================================================


# ■ Window_ActorCommand


#==============================================================================


 


class Window_ActorCommand < Window_Command


 


  #--------------------------------------------------------------------------


  # alias method: make_command_list


  #--------------------------------------------------------------------------


  alias window_actorcommand_make_command_list_cab make_command_list


  def make_command_list


    return if @actor.nil?


    unless $imported["YEA-BattleCommandList"]


      add_autobattle_command if YEA::AUTOBATTLE::ENABLE_ACTOR_AUTOBATTLE


    end


    window_actorcommand_make_command_list_cab


  end


 


  #--------------------------------------------------------------------------


  # new method: add_autobattle_command


  #--------------------------------------------------------------------------


  def add_autobattle_command


    return unless show_autobattle?


    text = YEA::AUTOBATTLE::ACTOR_COMMAND_NAME


    add_command(text, :autobattle, enable_autobattle?)


  end


 


  #--------------------------------------------------------------------------


  # new method: show_autobattle?


  #--------------------------------------------------------------------------


  def show_autobattle?


    return true if YEA::AUTOBATTLE::ACTOR_SHOW_SWITCH <= 0


    return $game_switches[YEA::AUTOBATTLE::ACTOR_SHOW_SWITCH]


  end


 


  #--------------------------------------------------------------------------


  # new method: enable_autobattle?


  #--------------------------------------------------------------------------


  def enable_autobattle?


    return true if YEA::AUTOBATTLE::ACTOR_ENABLE_SWITCH <= 0


    return $game_switches[YEA::AUTOBATTLE::ACTOR_ENABLE_SWITCH]


  end


 


end # Window_ActorCommand


 


#==============================================================================


# ■ Window_DisableAutobattle


#==============================================================================


 


class Window_DisableAutobattle < Window_Base


 


  #--------------------------------------------------------------------------


  # initialize


  #--------------------------------------------------------------------------


  def initialize


    super(64, 0, Graphics.width - 128, fitting_height(1))


    self.y = Graphics.height - fitting_height(1) + 12


    self.opacity = 0


    self.z = 1000


    hide


    refresh


  end


 


  #--------------------------------------------------------------------------


  # refresh


  #--------------------------------------------------------------------------


  def refresh


    contents.clear


    draw_background(contents.rect)


    text = YEA::AUTOBATTLE::DISABLE_MESSAGE


    draw_text(contents.rect, text, 1)


  end


 


  #--------------------------------------------------------------------------


  # draw_background


  #--------------------------------------------------------------------------


  def draw_background(rect)


    temp_rect = rect.clone


    temp_rect.width /= 2


    contents.gradient_fill_rect(temp_rect, back_color2, back_color1)


    temp_rect.x = temp_rect.width


    contents.gradient_fill_rect(temp_rect, back_color1, back_color2)


  end


 


  #--------------------------------------------------------------------------


  # back_color1


  #--------------------------------------------------------------------------


  def back_color1; return Color.new(0, 0, 0, 192); end


 


  #--------------------------------------------------------------------------


  # back_color2


  #--------------------------------------------------------------------------


  def back_color2; return Color.new(0, 0, 0, 0); end


 


end # Window_DisableAutobattle


 


#==============================================================================


# ■ Scene_Battle


#==============================================================================


 


class Scene_Battle < Scene_Base


 


  #--------------------------------------------------------------------------


  # alias method: create_all_windows


  #--------------------------------------------------------------------------


  alias scene_battle_create_all_windows_cab create_all_windows


  def create_all_windows


    $game_temp.continous_autobattle = false


    scene_battle_create_all_windows_cab


    create_disable_autobattle_window


  end


 


  #--------------------------------------------------------------------------


  # alias method: create_party_command_window


  #--------------------------------------------------------------------------


  alias create_party_command_window_cab create_party_command_window


  def create_party_command_window


    create_party_command_window_cab


    @party_command_window.set_handler(:autobattle, method(:command_pautobattle))


  end


 


  #--------------------------------------------------------------------------


  # new method: command_pautobattle


  #--------------------------------------------------------------------------


  def command_pautobattle


    for member in $game_party.battle_members


      next unless member.inputable?


      member.make_auto_battle_actions


    end


    $game_temp.continous_autobattle = YEA::AUTOBATTLE::ENABLE_CONTINOUS


    @disable_autobattle_window.show if $game_temp.continous_autobattle


    refresh_autobattler_status_window


    turn_start


  end


 


  #--------------------------------------------------------------------------


  # new method: create_disable_autobattle_window


  #--------------------------------------------------------------------------


  def create_disable_autobattle_window


    @disable_autobattle_window = Window_DisableAutobattle.new


  end


 


  #--------------------------------------------------------------------------


  # alias method: update


  #--------------------------------------------------------------------------


  alias scene_battle_update_cab update


  def update


    scene_battle_update_cab


    update_continous_autobattle_window


  end


 


  #--------------------------------------------------------------------------


  # alias method: update_basic


  #--------------------------------------------------------------------------


  alias scene_battle_update_basic_cab update_basic


  def update_basic


    scene_battle_update_basic_cab


    update_continous_autobattle_window


  end


 


  #--------------------------------------------------------------------------


  # new method: update_continous_autobattle_window


  #--------------------------------------------------------------------------


  def update_continous_autobattle_window


    return unless @disable_autobattle_window.visible


    opacity = $game_message.visible ? 0 : 255


    @disable_autobattle_window.contents_opacity = opacity


    close_disable_autobattle_window if Input.press?(:B)


  end


 


  #--------------------------------------------------------------------------


  # new method: close_disable_autobattle_window


  #--------------------------------------------------------------------------


  def close_disable_autobattle_window


    Sound.play_cancel if Input.press?(:B) && @disable_autobattle_window.visible


    $game_temp.continous_autobattle = false


    @disable_autobattle_window.hide


  end


 


  #--------------------------------------------------------------------------


  # alias method: create_actor_command_window


  #--------------------------------------------------------------------------


  alias create_actor_command_window_cab create_actor_command_window


  def create_actor_command_window


    create_actor_command_window_cab


    @actor_command_window.set_handler(:autobattle, method(:command_aautobattle))


  end


 


  #--------------------------------------------------------------------------


  # new method: command_aautobattle


  #--------------------------------------------------------------------------


  def command_aautobattle


    BattleManager.actor.make_auto_battle_actions


    next_command


  end


 


  #--------------------------------------------------------------------------


  # new method: refresh_autobattler_status_window


  #--------------------------------------------------------------------------


  def refresh_autobattler_status_window


    for member in $game_party.battle_members


      next unless member.auto_battle?


      @status_window.draw_item(member.index)


    end


  end


 


end # Scene_Battle


 


#==============================================================================


# 


# ▼ End of File


# 


#==============================================================================

@protosssonny

布兰度西特 · 发表于 2012-12-15 13:16:02

@protosssonny

zhangbanxian · 发表于 2012-12-16 20:56:10

- -b其实感觉va的ai已经不错了，毕竟已经不会出现xp那种傻站着的情况了，感觉按你的要求改了之后ai反而降低了，比如有时攻击力超低的牧师你让他攻击还不如让他回血牛的30%以上的人的血，当然这也视你的游戏而定...

class Game_Action
HP_REC_COND = 30 #HP在这个百分比以下时才会回血
alias fucker_evaluate evaluate
def evaluate
fucker_evaluate
@value = 0 if item_target_candidates.size == 1 && item.for_all?
if item.damage.type == 3
fucker = true
item_target_candidates.each{|target|fucker &= target.hp > HP_REC_COND * 0.01 * target.mhp}
@value = 0 if fucker
end
self
end
end

复制代码

zhangbanxian · 发表于 2012-12-16 20:56:18

- -b其实感觉va的ai已经不错了，毕竟已经不会出现xp那种傻站着的情况了，感觉按你的要求改了之后ai反而降低了，比如有时攻击力超低的牧师你让他攻击还不如让他回血牛的30%以上的人的血，当然这也视你的游戏而定...

class Game_Action
HP_REC_COND = 30 #HP在这个百分比以下时才会回血
alias fucker_evaluate evaluate
def evaluate
fucker_evaluate
@value = 0 if item_target_candidates.size == 1 && item.for_all?
if item.damage.type == 3
fucker = true
item_target_candidates.each{|target|fucker &= target.hp > HP_REC_COND * 0.01 * target.mhp}
@value = 0 if fucker
end
self
end
end

复制代码

帐号		自动登录	找回密码
密码			注册会员

[已经过期] 可以调整的自动战斗AI

加入我们，或者，欢迎回来。

点评