Project1

标题: atb腳本的問題 [打印本页]

---

作者: graygod    时间: 2013-11-25 12:06
标题: atb腳本的問題


在atb腳本裡有一段   

#------------------------------------------------------------------
  #●新方法: advance_turn  回合計算
  #--------------------------------------------------------------------------
  def self.advance_turn
    return if CBS::TURN_LENGTH == 0  
    @turn_counter += 1
    if @turn_counter == 60 * CBS::TURN_LENGTH
      $game_troop.increase_turn
      SceneManager.scene.turn_end
      @turn_counter = 0
    end
  end
end
  #--------------------------------------------------------------------------
其中 CBS::TURN_LENGTH 是計算用的秒數  我設定為1


所以這段程式是說  @turn_counter 計算到60 時 如果與  60 * CBS::TURN_LENGTH相等
則 增加1回合

問題是  我將@turn_counte 用p 印出來   測試  
每三四 次 測試  @turn_counte 竟然會 跳出78 79 的數字出來

而沒而執行     if @turn_counter == 60 * CBS::TURN_LENGTH  後面的  程式
我剛剛在把  60 * CBS::TURN_LENGTH  用p 列出來  固定都是 60 沒錯
這中間  到底發生什麼事 !!!?

另外  我懷疑是反擊 產生的錯誤  
但   @turn_counter += 1 後  一定會執行     if @turn_counter == 60 * CBS::TURN_LENGTH
不是 嗎   怎會出現  61 62 這種值出來  




自己解決了   原本的腳本就有bug
YanFly 在寫atb 時有二個 計算回合的方式  一個是秒數  一個是行動數
結果二個方法  都有 @turn_counter += 1   這句  
如果 在@turn_counter 為59時 剛好有行動  就會出現這問題  ....


完整腳本


=

RUBY 代码复制

begin
YanFly Compatible Customisable ATB/Stamina Based Battle System Script
by Fomar0153
Version 1.2
----------------------
Notes
----------------------
Requires Yanfly Engine Ace - Ace Battle Engine
Customises the battle system to be similar to
ATB or Stamina based battle systems.
----------------------
Instructions
----------------------
Edit variables in CBS to suit your needs.
The guard status should be set to 2~2 turns.
----------------------
Change Log
----------------------
1.0 -> 1.1 Added CTB related options
           Added the ability to pass a turn 
           Added options for turn functionality to be based on time
           or number of actions
           Added the ability to change the bar colours based on states
1.1 -> 1.2 Fixed a bug when escaping using CTB mode
----------------------
Known bugs
----------------------
None
=end
 
$imported = {} if $imported.nil?
$imported["Fomar0153-CBS"] = true
 
module CBS
 
  MAX_STAMINA = 400 #行動值的分母
  RESET_STAMINA = true
 
  # If ATB is set to false then the bars won't appear and
  # the pauses where the bars would be filling up are removed
  # effectively turning this into a CTB system
  ATB = true
  SAMINA_GAUGE_NAME = "ATB"
  ENABLE_PASSING = true
  PASSING_COST = 200
 
  #回合長度
  # If TURN_LENGTH is set to 0 then a turn length will be 
  # decided on number of actions
  # TURN_LENGTH is number of seconds per turn
  TURN_LENGTH = 1
 
  ESCAPE_COST = 500
  # If reset stamina is set to true then all characters
  # will start with a random amount of stamina capped at
  # the percentage you set.
  # If reset stamina is set to false then this just
  # affects enemies.
  STAMINA_START_PERCENT = 20
 
  # Default skill cost
  # If you want to customise skill costs do it like this
  # SKILL_COST[skill_id] = cost
  SKILL_COST = []
  SKILL_COST[0] = 1000
  # Attack
  SKILL_COST[1] = 1000
  # Guard
  SKILL_COST[2] = 500
  ITEM_COST = 1000
 
  # 增益設定 設為 true 則公式只看agi決定 參考stamina_mult方法
  STATES_HANDLE_AGI = false
  # In the following section mult means the amount you multiply stamina gains by
  # if STATES_HANDLE_AGI is set to true then it is only used to determine bar color
  # with debuffs taking precedence over buffs
  STAMINA_STATES = []
  # Default colour 
  STAMINA_STATES[0] = [1,31,32]
  # in the form
  # STAMINA_STATES[STATE_ID] = [MULT,FILL_COLOUR,EMPTY_COLOR]
  # e.g. 快速  #狀態78 則二倍快 ,進度為第4色, 空的為32色
  STAMINA_STATES[78] = [2,4,32]
  # e.g. 停止  
  STAMINA_STATES[79] = [0,8,32]
  # e.g. 慢速    #狀態80 慢一半 ,進度為第8色, 空的為32色
  STAMINA_STATES[80] = [0.5,8,32]
 
  #--------------------------------------------------------------------------
  # ●新方法: 行動力增加公式  
  #--------------------------------------------------------------------------
  def self.stamina_gain(battler)
    return ((2 + [0, battler.agi / 10].max) * self.stamina_mult(battler)).to_i
  end
  #--------------------------------------------------------------------------
  #●新方法: 行動力增加倍率公式 
  #--------------------------------------------------------------------------
  def self.stamina_mult(battler)
    return 1 if STATES_HANDLE_AGI
    mult = STAMINA_STATES[0][0]
    for state in battler.states
      unless STAMINA_STATES[state.id].nil?
        mult *= STAMINA_STATES[state.id][0]
      end
    end
    return mult
  end
  #--------------------------------------------------------------------------
  #●新方法:  行動力增加顏色
  #--------------------------------------------------------------------------
  def self.stamina_colors(battler)
    colors = STAMINA_STATES[0]
    for state in battler.states
      unless STAMINA_STATES[state.id].nil?
        if STAMINA_STATES[state.id][0] < colors[0] or colors[0] == 1
          colors = STAMINA_STATES[state.id]
        end
      end
    end
    return colors
  end
  #--------------------------------------------------------------------------
  #●新方法: 行動力初始值
  #--------------------------------------------------------------------------
  def self.stamina_start(battler)
    battler.stamina = rand(MAX_STAMINA * STAMINA_START_PERCENT / 100)
  end
end
 
class Game_BattlerBase
  #--------------------------------------------------------------------------
  # ● New attr_accessor
  #--------------------------------------------------------------------------
  attr_accessor :stamina
  #--------------------------------------------------------------------------
  # ● Aliases initialize
  #--------------------------------------------------------------------------
  alias yf_fomar_cbs_initialize initialize
  def initialize
    yf_fomar_cbs_initialize
    @stamina = 0
  end
  #--------------------------------------------------------------------------
  # ● 新方法 獲得行動值比例
  #--------------------------------------------------------------------------
  def stamina_rate
    @stamina.to_f / CBS::MAX_STAMINA
  end
  #--------------------------------------------------------------------------
  #●新方法: stamina_rate
  #--------------------------------------------------------------------------
  def stamina_gain
    return if not movable?
    @stamina = [CBS::MAX_STAMINA, @stamina + CBS.stamina_gain(self)].min
  end
  #--------------------------------------------------------------------------
  #●新方法: stamina_color
  #--------------------------------------------------------------------------
  def stamina_color
    for state in @states
      unless CBS::STAMINA_STATES[state].nil?
        return STAMINA_STATES[state]
      end
    end
    return STAMINA_STATES[0]
  end
end
 
class Scene_Battle < Scene_Base
  #--------------------------------------------------------------------------
  # ● Rewrote update
  #--------------------------------------------------------------------------
  def update
    super
    if (CBS::ENABLE_PASSING and @actor_command_window.active) and Input.press?(:A)
      command_pass
    end
    if BattleManager.in_turn? and !inputting?
      while @subject.nil? and !CBS::ATB
        process_stamina
      end
      if CBS::ATB
        process_stamina
      end
      process_event
      process_action
    end
    BattleManager.judge_win_loss
  end
  #--------------------------------------------------------------------------
  # ● Rewrote Method update_info_viewport
  #--------------------------------------------------------------------------
  def update_info_viewport
    move_info_viewport(0)   if @party_command_window.active
    move_info_viewport(128) if @actor_command_window.active
    move_info_viewport(64)  if BattleManager.in_turn? and !inputting?
  end
  #--------------------------------------------------------------------------
  #●新方法: inputting?
  #--------------------------------------------------------------------------
  def inputting?
    return @actor_command_window.active || @skill_window.active ||
      @item_window.active || @actor_window.active || @enemy_window.active
  end
  #--------------------------------------------------------------------------
  #●新方法: process_stamina  
  #--------------------------------------------------------------------------
  def process_stamina
    @actor_command_window.close   #命令視窗關閉
    return if @subject
    BattleManager.advance_turn   #回合計算
    all_battle_members.each do |battler|
      battler.stamina_gain         #所有人行動值增加
    end
    @status_window.refresh_stamina  #更行狀態視窗之行動值
    if @status_window.close?
      @status_window.open
     end
    if BattleManager.escaping?
      $game_party.battle_members.each do |battler|
        if battler.stamina < CBS::MAX_STAMINA   #行動力沒滿
          $game_troop.members.each do |enemy|
            if enemy.stamina == CBS::MAX_STAMINA #如果敵人行動力值滿
              enemy.make_actions
              @subject = enemy
            end
          end
          return
        end
      end
      unless BattleManager.process_escape
        $game_party.battle_members.each do |actor|
          actor.stamina -= CBS::ESCAPE_COST
        end
        BattleManager.set_escaping(false) unless CBS::ATB
      end
    end
    all_battle_members.each do |battler|
      if battler.stamina == CBS::MAX_STAMINA  #如果戰鬥者行動力值滿
        battler.make_actions
        @subject = battler
        if @subject.inputable? and battler.is_a?(Game_Actor)
          @actor_command_window.setup(@subject)
          @status_window.index = @subject.index
          BattleManager.set_actor(battler)
        end
        return
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● Rewrote start_party_command_selection Yanfly version
  #--------------------------------------------------------------------------
  def start_party_command_selection
    unless scene_changing?
      refresh_status
      @status_window.unselect
      @status_window.open
      if BattleManager.input_start
        @actor_command_window.close
        @party_command_window.setup
      else
        @party_command_window.deactivate
        turn_start
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● Rewrote start_actor_command_selection
  #--------------------------------------------------------------------------
  def start_actor_command_selection
    @party_command_window.close
    BattleManager.set_escaping(false)
    turn_start
  end
  #--------------------------------------------------------------------------
  # ● Rewrote prior_command Yanfly version
  #--------------------------------------------------------------------------
  def prior_command
    redraw_current_status
    start_party_command_selection
  end
  #--------------------------------------------------------------------------
  # ● Rewrote process_action
  #--------------------------------------------------------------------------
  def process_action
    return if scene_changing?
    if !@subject || !@subject.current_action
      @subject = BattleManager.next_subject
    end
    if Input.trigger?(:B) and (@subject == nil)
      start_party_command_selection
    end
    return unless @subject
    if @subject.current_action
      @subject.current_action.prepare
      if @subject.current_action.valid?
        @status_window.open
        execute_action
      end
      @subject.remove_current_action
      refresh_status
      @log_window.display_auto_affected_status(@subject)
      @log_window.wait_and_clear
    end
    process_action_end unless @subject.current_action
  end
  #--------------------------------------------------------------------------
  # ● Aliases 使用道具或技能
  #--------------------------------------------------------------------------
  alias cbs_use_item use_item
  def use_item
    cbs_use_item
    @subject.stamina_loss
  end
  #--------------------------------------------------------------------------
  # ● Rewrote turn_end
  #--------------------------------------------------------------------------
  def turn_end
    p "atb回合結束"
    all_battle_members.each do |battler|
      battler.on_turn_end
      refresh_status
      @log_window.display_auto_affected_status(battler)
      @log_window.wait_and_clear
    end
    #BattleManager.turn_end
    #process_event
    #start_party_command_selection
  end
  #--------------------------------------------------------------------------
  # ● Rewrote command_fight
  #--------------------------------------------------------------------------
  def command_fight
    BattleManager.next_command
    start_actor_command_selection
  end
  #--------------------------------------------------------------------------
  # ● Rewrote command_escape
  #--------------------------------------------------------------------------
  def command_escape
    @party_command_window.close
    BattleManager.set_escaping(true)
    turn_start
  end
  #--------------------------------------------------------------------------
  #●新方法: command_pass
  #--------------------------------------------------------------------------
  def command_pass
    BattleManager.actor.stamina -= CBS::PASSING_COST
    BattleManager.clear_actor
    @subject = nil
    turn_start
    @actor_command_window.active = false
    @actor_command_window.close
  end
  #--------------------------------------------------------------------------
  # ● Destroyed next_command
  #--------------------------------------------------------------------------
  def next_command
    @status_window.show
    @actor_command_window.show
    @status_aid_window.hide
  end
end
 
 
 
 
module BattleManager
  #--------------------------------------------------------------------------
  # ● Rewrote setup
  #--------------------------------------------------------------------------
  def self.setup(troop_id, can_escape = true, can_lose = false)
    init_members
    $game_troop.setup(troop_id)
    @can_escape = can_escape
    @can_lose = can_lose
    make_escape_ratio
    @escaping = false
    @turn_counter = 0
    @actions_per_turn = $game_party.members.size + $game_troop.members.size
    ($game_party.members + $game_troop.members).each do |battler|
      if battler.is_a?(Game_Enemy) or CBS::RESET_STAMINA
        CBS.stamina_start(battler)
      end
    end
  end
  #--------------------------------------------------------------------------
  #●新方法: set_escaping
  #--------------------------------------------------------------------------
  def self.set_escaping(escaping)
    @escaping = escaping
  end
  #--------------------------------------------------------------------------
  #●新方法: escaping?
  #--------------------------------------------------------------------------
  def self.escaping?
    return @escaping
  end
  #--------------------------------------------------------------------------
  # ● Rewrote turn_start Yanfly version
  #--------------------------------------------------------------------------
  def self.turn_start
    @phase = :turn
    clear_actor
    $game_troop.increase_turn if $game_troop.turn_count == 0
    @performed_battlers = []
  end
  #--------------------------------------------------------------------------
  #●新方法: set_actor
  #--------------------------------------------------------------------------
  def self.set_actor(actor)
    @actor_index = actor.index
  end
  #--------------------------------------------------------------------------
  # ● New Increase action counter
  #--------------------------------------------------------------------------
  def self.add_action
    return if @actions_per_turn.nil?
    @turn_counter += 1
    if @turn_counter == @actions_per_turn and CBS::TURN_LENGTH == 0 #@actions_per_turn為戰鬥成員總數
      $game_troop.increase_turn
      SceneManager.scene.turn_end
      @turn_counter = 0
    end
  end
  #--------------------------------------------------------------------------
  #●新方法: advance_turn  回合計算
  #--------------------------------------------------------------------------
  def self.advance_turn
    return if CBS::TURN_LENGTH == 0  
    p "@turn_counter"
    p @turn_counter
    @turn_counter += 1
    if @turn_counter == 60 * CBS::TURN_LENGTH
      $game_troop.increase_turn
      SceneManager.scene.turn_end
      @turn_counter = 0
    end
  end
end
 
class Game_Battler < Game_BattlerBase
  #--------------------------------------------------------------------------
  # ● Rewrote on_turn_end
  #--------------------------------------------------------------------------
  def on_turn_end
    @result.clear
    regenerate_all
    update_state_turns
    update_buff_turns
    remove_states_auto(2)
  end
  #--------------------------------------------------------------------------
  #●新方法: 角色行動結束
  #--------------------------------------------------------------------------
  def stamina_loss
    if self.actor?
      @stamina -= input.stamina_cost
    else
      @stamina -= @actions[0].stamina_cost if @actions[0]  
    end
    BattleManager.add_action
  end
end
 
class Game_Actor < Game_Battler
  #--------------------------------------------------------------------------
  # ● Rewrote input
  #--------------------------------------------------------------------------
  def input
    if @actions[@action_input_index] == nil
      @actions[@action_input_index] = Game_Action.new(self)
    end
    return @actions[@action_input_index]
  end
end
 
class Game_Action
  #--------------------------------------------------------------------------
  #●新方法: stamina_cost
  #--------------------------------------------------------------------------
  def stamina_cost
    if @item.is_skill?
      return CBS::SKILL_COST[item.id] if CBS::SKILL_COST[item.id]
      return CBS::SKILL_COST[0]
    end
    return CBS::ITEM_COST if @item.is_item?
    return CBS::MAX_STAMINA
  end
end
 
class Window_BattleStatus < Window_Selectable
  #--------------------------------------------------------------------------
  # Aliases method: draw_item yanfly version
  #--------------------------------------------------------------------------
  alias prefomar_draw_item draw_item
  def draw_item(index)
    unless CBS::ATB
      prefomar_draw_item(index)
      return
    end
    return if index.nil?
    clear_item(index)
    actor =  $game_party.battle_members[index]#battle_members[index]
    rect = item_rect(index)
    return if actor.nil?
    draw_actor_face(actor, rect.x+2, rect.y+2, actor.alive?)
    draw_actor_name(actor, rect.x, rect.y, rect.width-8)
    draw_actor_action(actor, rect.x, rect.y)
    draw_actor_icons(actor, rect.x, line_height*1, rect.width)
    gx = YEA::BATTLE::BATTLESTATUS_HPGAUGE_Y_PLUS
    contents.font.size = YEA::BATTLE::BATTLESTATUS_TEXT_FONT_SIZE
    draw_actor_hp(actor, rect.x+2, line_height*2, rect.width-4)
    if draw_tp?(actor) && draw_mp?(actor)
      dw = rect.width/2-2
      dw += 1 if $imported["YEA-CoreEngine"] && YEA::CORE::GAUGE_OUTLINE
      draw_actor_tp(actor, rect.x+2, line_height*2+gx, dw)
      dw = rect.width - rect.width/2 - 2
      draw_actor_mp(actor, rect.x+rect.width/2, line_height*2+gx, dw)
    elsif draw_tp?(actor) && !draw_mp?(actor)
      draw_actor_tp(actor, rect.x+2, line_height*2+gx, rect.width-4)
    else
      draw_actor_mp(actor, rect.x+2, line_height*2+gx, rect.width-4)
    end
    draw_actor_stamina(actor, rect.x+2, line_height*3, rect.width-4)
  end
  #--------------------------------------------------------------------------
  # overwrite method: draw_item yanfly version
  #--------------------------------------------------------------------------
  def draw_item_stamina(index)
    return if index.nil?
    actor = $game_party.battle_members[index]#battle_members[index]
    rect = item_rect(index)
    return if actor.nil?
    gx = YEA::BATTLE::BATTLESTATUS_HPGAUGE_Y_PLUS
    contents.font.size = YEA::BATTLE::BATTLESTATUS_TEXT_FONT_SIZE
    draw_actor_stamina(actor, rect.x+2, line_height*3, rect.width-4)
  end
  #--------------------------------------------------------------------------
  #新方法: refresh_stamina
  #--------------------------------------------------------------------------
  def refresh_stamina
    return unless CBS::ATB
    item_max.times {|i| draw_item_stamina(i) }
  end
  #--------------------------------------------------------------------------
  #新方法: 描繪行動值
  #--------------------------------------------------------------------------
  def draw_actor_stamina(actor, dx, dy, width = 124)
   draw_gauge(dx, dy, width, actor.stamina_rate, text_color(CBS.stamina_colors(actor)[2]),text_color(CBS.stamina_colors(actor)[1]))
    change_color(system_color)
    cy = (Font.default_size - contents.font.size) / 2 + 1
    draw_text(dx+2, dy+cy, 30, line_height, CBS::SAMINA_GAUGE_NAME)
  end
end

begin


YanFly Compatible Customisable ATB/Stamina Based Battle System Script


by Fomar0153


Version 1.2


----------------------


Notes


----------------------


Requires Yanfly Engine Ace - Ace Battle Engine


Customises the battle system to be similar to


ATB or Stamina based battle systems.


----------------------


Instructions


----------------------


Edit variables in CBS to suit your needs.


The guard status should be set to 2~2 turns.


----------------------


Change Log


----------------------


1.0 -> 1.1 Added CTB related options


           Added the ability to pass a turn 


           Added options for turn functionality to be based on time


           or number of actions


           Added the ability to change the bar colours based on states


1.1 -> 1.2 Fixed a bug when escaping using CTB mode


----------------------


Known bugs


----------------------


None


=end


 


$imported = {} if $imported.nil?


$imported["Fomar0153-CBS"] = true


 


module CBS


 


  MAX_STAMINA = 400 #行動值的分母


  RESET_STAMINA = true


 


  # If ATB is set to false then the bars won't appear and


  # the pauses where the bars would be filling up are removed


  # effectively turning this into a CTB system


  ATB = true


  SAMINA_GAUGE_NAME = "ATB"


  ENABLE_PASSING = true


  PASSING_COST = 200


 


  #回合長度


  # If TURN_LENGTH is set to 0 then a turn length will be 


  # decided on number of actions


  # TURN_LENGTH is number of seconds per turn


  TURN_LENGTH = 1


 


  ESCAPE_COST = 500


  # If reset stamina is set to true then all characters


  # will start with a random amount of stamina capped at


  # the percentage you set.


  # If reset stamina is set to false then this just


  # affects enemies.


  STAMINA_START_PERCENT = 20


 


  # Default skill cost


  # If you want to customise skill costs do it like this


  # SKILL_COST[skill_id] = cost


  SKILL_COST = []


  SKILL_COST[0] = 1000


  # Attack


  SKILL_COST[1] = 1000


  # Guard


  SKILL_COST[2] = 500


  ITEM_COST = 1000


 


  # 增益設定 設為 true 則公式只看agi決定 參考stamina_mult方法


  STATES_HANDLE_AGI = false


  # In the following section mult means the amount you multiply stamina gains by


  # if STATES_HANDLE_AGI is set to true then it is only used to determine bar color


  # with debuffs taking precedence over buffs


  STAMINA_STATES = []


  # Default colour 


  STAMINA_STATES[0] = [1,31,32]


  # in the form


  # STAMINA_STATES[STATE_ID] = [MULT,FILL_COLOUR,EMPTY_COLOR]


  # e.g. 快速  #狀態78 則二倍快 ,進度為第4色, 空的為32色


  STAMINA_STATES[78] = [2,4,32]


  # e.g. 停止  


  STAMINA_STATES[79] = [0,8,32]


  # e.g. 慢速    #狀態80 慢一半 ,進度為第8色, 空的為32色


  STAMINA_STATES[80] = [0.5,8,32]


 


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


  # ●新方法: 行動力增加公式  


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


  def self.stamina_gain(battler)


    return ((2 + [0, battler.agi / 10].max) * self.stamina_mult(battler)).to_i


  end


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


  #●新方法: 行動力增加倍率公式 


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


  def self.stamina_mult(battler)


    return 1 if STATES_HANDLE_AGI


    mult = STAMINA_STATES[0][0]


    for state in battler.states


      unless STAMINA_STATES[state.id].nil?


        mult *= STAMINA_STATES[state.id][0]


      end


    end


    return mult


  end


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


  #●新方法:  行動力增加顏色


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


  def self.stamina_colors(battler)


    colors = STAMINA_STATES[0]


    for state in battler.states


      unless STAMINA_STATES[state.id].nil?


        if STAMINA_STATES[state.id][0] < colors[0] or colors[0] == 1


          colors = STAMINA_STATES[state.id]


        end


      end


    end


    return colors


  end


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


  #●新方法: 行動力初始值


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


  def self.stamina_start(battler)


    battler.stamina = rand(MAX_STAMINA * STAMINA_START_PERCENT / 100)


  end


end


 


class Game_BattlerBase


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


  # ● New attr_accessor


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


  attr_accessor :stamina


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


  # ● Aliases initialize


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


  alias yf_fomar_cbs_initialize initialize


  def initialize


    yf_fomar_cbs_initialize


    @stamina = 0


  end


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


  # ● 新方法 獲得行動值比例


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


  def stamina_rate


    @stamina.to_f / CBS::MAX_STAMINA


  end


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


  #●新方法: stamina_rate


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


  def stamina_gain


    return if not movable?


    @stamina = [CBS::MAX_STAMINA, @stamina + CBS.stamina_gain(self)].min


  end


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


  #●新方法: stamina_color


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


  def stamina_color


    for state in @states


      unless CBS::STAMINA_STATES[state].nil?


        return STAMINA_STATES[state]


      end


    end


    return STAMINA_STATES[0]


  end


end


 


class Scene_Battle < Scene_Base


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


  # ● Rewrote update


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


  def update


    super


    if (CBS::ENABLE_PASSING and @actor_command_window.active) and Input.press?(:A)


      command_pass


    end


    if BattleManager.in_turn? and !inputting?


      while @subject.nil? and !CBS::ATB


        process_stamina


      end


      if CBS::ATB


        process_stamina


      end


      process_event


      process_action


    end


    BattleManager.judge_win_loss


  end


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


  # ● Rewrote Method update_info_viewport


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


  def update_info_viewport


    move_info_viewport(0)   if @party_command_window.active


    move_info_viewport(128) if @actor_command_window.active


    move_info_viewport(64)  if BattleManager.in_turn? and !inputting?


  end


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


  #●新方法: inputting?


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


  def inputting?


    return @actor_command_window.active || @skill_window.active ||


      @item_window.active || @actor_window.active || @enemy_window.active


  end


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


  #●新方法: process_stamina  


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


  def process_stamina


    @actor_command_window.close   #命令視窗關閉


    return if @subject


    BattleManager.advance_turn   #回合計算


    all_battle_members.each do |battler|


      battler.stamina_gain         #所有人行動值增加


    end


    @status_window.refresh_stamina  #更行狀態視窗之行動值


    if @status_window.close?


      @status_window.open


     end


    if BattleManager.escaping?


      $game_party.battle_members.each do |battler|


        if battler.stamina < CBS::MAX_STAMINA   #行動力沒滿


          $game_troop.members.each do |enemy|


            if enemy.stamina == CBS::MAX_STAMINA #如果敵人行動力值滿


              enemy.make_actions


              @subject = enemy


            end


          end


          return


        end


      end


      unless BattleManager.process_escape


        $game_party.battle_members.each do |actor|


          actor.stamina -= CBS::ESCAPE_COST


        end


        BattleManager.set_escaping(false) unless CBS::ATB


      end


    end


    all_battle_members.each do |battler|


      if battler.stamina == CBS::MAX_STAMINA  #如果戰鬥者行動力值滿


        battler.make_actions


        @subject = battler


        if @subject.inputable? and battler.is_a?(Game_Actor)


          @actor_command_window.setup(@subject)


          @status_window.index = @subject.index


          BattleManager.set_actor(battler)


        end


        return


      end


    end


  end


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


  # ● Rewrote start_party_command_selection Yanfly version


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


  def start_party_command_selection


    unless scene_changing?


      refresh_status


      @status_window.unselect


      @status_window.open


      if BattleManager.input_start


        @actor_command_window.close


        @party_command_window.setup


      else


        @party_command_window.deactivate


        turn_start


      end


    end


  end


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


  # ● Rewrote start_actor_command_selection


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


  def start_actor_command_selection


    @party_command_window.close


    BattleManager.set_escaping(false)


    turn_start


  end


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


  # ● Rewrote prior_command Yanfly version


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


  def prior_command


    redraw_current_status


    start_party_command_selection


  end


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


  # ● Rewrote process_action


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


  def process_action


    return if scene_changing?


    if !@subject || !@subject.current_action


      @subject = BattleManager.next_subject


    end


    if Input.trigger?(:B) and (@subject == nil)


      start_party_command_selection


    end


    return unless @subject


    if @subject.current_action


      @subject.current_action.prepare


      if @subject.current_action.valid?


        @status_window.open


        execute_action


      end


      @subject.remove_current_action


      refresh_status


      @log_window.display_auto_affected_status(@subject)


      @log_window.wait_and_clear


    end


    process_action_end unless @subject.current_action


  end


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


  # ● Aliases 使用道具或技能


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


  alias cbs_use_item use_item


  def use_item


    cbs_use_item


    @subject.stamina_loss


  end


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


  # ● Rewrote turn_end


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


  def turn_end


    p "atb回合結束"


    all_battle_members.each do |battler|


      battler.on_turn_end


      refresh_status


      @log_window.display_auto_affected_status(battler)


      @log_window.wait_and_clear


    end


    #BattleManager.turn_end


    #process_event


    #start_party_command_selection


  end


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


  # ● Rewrote command_fight


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


  def command_fight


    BattleManager.next_command


    start_actor_command_selection


  end


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


  # ● Rewrote command_escape


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


  def command_escape


    @party_command_window.close


    BattleManager.set_escaping(true)


    turn_start


  end


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


  #●新方法: command_pass


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


  def command_pass


    BattleManager.actor.stamina -= CBS::PASSING_COST


    BattleManager.clear_actor


    @subject = nil


    turn_start


    @actor_command_window.active = false


    @actor_command_window.close


  end


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


  # ● Destroyed next_command


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


  def next_command


    @status_window.show


    @actor_command_window.show


    @status_aid_window.hide


  end


end


 


 


 


 


module BattleManager


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


  # ● Rewrote setup


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


  def self.setup(troop_id, can_escape = true, can_lose = false)


    init_members


    $game_troop.setup(troop_id)


    @can_escape = can_escape


    @can_lose = can_lose


    make_escape_ratio


    @escaping = false


    @turn_counter = 0


    @actions_per_turn = $game_party.members.size + $game_troop.members.size


    ($game_party.members + $game_troop.members).each do |battler|


      if battler.is_a?(Game_Enemy) or CBS::RESET_STAMINA


        CBS.stamina_start(battler)


      end


    end


  end


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


  #●新方法: set_escaping


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


  def self.set_escaping(escaping)


    @escaping = escaping


  end


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


  #●新方法: escaping?


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


  def self.escaping?


    return @escaping


  end


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


  # ● Rewrote turn_start Yanfly version


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


  def self.turn_start


    @phase = :turn


    clear_actor


    $game_troop.increase_turn if $game_troop.turn_count == 0


    @performed_battlers = []


  end


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


  #●新方法: set_actor


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


  def self.set_actor(actor)


    @actor_index = actor.index


  end


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


  # ● New Increase action counter


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


  def self.add_action


    return if @actions_per_turn.nil?


    @turn_counter += 1


    if @turn_counter == @actions_per_turn and CBS::TURN_LENGTH == 0 #@actions_per_turn為戰鬥成員總數


      $game_troop.increase_turn


      SceneManager.scene.turn_end


      @turn_counter = 0


    end


  end


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


  #●新方法: advance_turn  回合計算


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


  def self.advance_turn


    return if CBS::TURN_LENGTH == 0  


    p "@turn_counter"


    p @turn_counter


    @turn_counter += 1


    if @turn_counter == 60 * CBS::TURN_LENGTH


      $game_troop.increase_turn


      SceneManager.scene.turn_end


      @turn_counter = 0


    end


  end


end


 


class Game_Battler < Game_BattlerBase


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


  # ● Rewrote on_turn_end


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


  def on_turn_end


    @result.clear


    regenerate_all


    update_state_turns


    update_buff_turns


    remove_states_auto(2)


  end


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


  #●新方法: 角色行動結束


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


  def stamina_loss


    if self.actor?


      @stamina -= input.stamina_cost


    else


      @stamina -= @actions[0].stamina_cost if @actions[0]  


    end


    BattleManager.add_action


  end


end


 


class Game_Actor < Game_Battler


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


  # ● Rewrote input


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


  def input


    if @actions[@action_input_index] == nil


      @actions[@action_input_index] = Game_Action.new(self)


    end


    return @actions[@action_input_index]


  end


end


 


class Game_Action


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


  #●新方法: stamina_cost


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


  def stamina_cost


    if @item.is_skill?


      return CBS::SKILL_COST[item.id] if CBS::SKILL_COST[item.id]


      return CBS::SKILL_COST[0]


    end


    return CBS::ITEM_COST if @item.is_item?


    return CBS::MAX_STAMINA


  end


end


 


class Window_BattleStatus < Window_Selectable


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


  # Aliases method: draw_item yanfly version


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


  alias prefomar_draw_item draw_item


  def draw_item(index)


    unless CBS::ATB


      prefomar_draw_item(index)


      return


    end


    return if index.nil?


    clear_item(index)


    actor =  $game_party.battle_members[index]#battle_members[index]


    rect = item_rect(index)


    return if actor.nil?


    draw_actor_face(actor, rect.x+2, rect.y+2, actor.alive?)


    draw_actor_name(actor, rect.x, rect.y, rect.width-8)


    draw_actor_action(actor, rect.x, rect.y)


    draw_actor_icons(actor, rect.x, line_height*1, rect.width)


    gx = YEA::BATTLE::BATTLESTATUS_HPGAUGE_Y_PLUS


    contents.font.size = YEA::BATTLE::BATTLESTATUS_TEXT_FONT_SIZE


    draw_actor_hp(actor, rect.x+2, line_height*2, rect.width-4)


    if draw_tp?(actor) && draw_mp?(actor)


      dw = rect.width/2-2


      dw += 1 if $imported["YEA-CoreEngine"] && YEA::CORE::GAUGE_OUTLINE


      draw_actor_tp(actor, rect.x+2, line_height*2+gx, dw)


      dw = rect.width - rect.width/2 - 2


      draw_actor_mp(actor, rect.x+rect.width/2, line_height*2+gx, dw)


    elsif draw_tp?(actor) && !draw_mp?(actor)


      draw_actor_tp(actor, rect.x+2, line_height*2+gx, rect.width-4)


    else


      draw_actor_mp(actor, rect.x+2, line_height*2+gx, rect.width-4)


    end


    draw_actor_stamina(actor, rect.x+2, line_height*3, rect.width-4)


  end


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


  # overwrite method: draw_item yanfly version


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


  def draw_item_stamina(index)


    return if index.nil?


    actor = $game_party.battle_members[index]#battle_members[index]


    rect = item_rect(index)


    return if actor.nil?


    gx = YEA::BATTLE::BATTLESTATUS_HPGAUGE_Y_PLUS


    contents.font.size = YEA::BATTLE::BATTLESTATUS_TEXT_FONT_SIZE


    draw_actor_stamina(actor, rect.x+2, line_height*3, rect.width-4)


  end


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


  #新方法: refresh_stamina


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


  def refresh_stamina


    return unless CBS::ATB


    item_max.times {|i| draw_item_stamina(i) }


  end


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


  #新方法: 描繪行動值


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


  def draw_actor_stamina(actor, dx, dy, width = 124)


   draw_gauge(dx, dy, width, actor.stamina_rate, text_color(CBS.stamina_colors(actor)[2]),text_color(CBS.stamina_colors(actor)[1]))


    change_color(system_color)


    cy = (Font.default_size - contents.font.size) / 2 + 1


    draw_text(dx+2, dy+cy, 30, line_height, CBS::SAMINA_GAUGE_NAME)


  end


end

簡報1.jpg (133.29 KB, 下载次数: 17)

下载附件  保存到相册

2013-11-25 12:19 上传

---

作者: 1091160905    时间: 2013-11-25 12:16
加脚本框呀！！！！

---

欢迎光临 Project1 (https://rpg.blue/)

Powered by Discuz! X3.1