技能的延迟发动（定时炸弹）

taroxd

RUBY 代码复制

#--------------------------------------------------------------------------
# ● require Taroxd基础设置
#    使用方法：技能备注<delay n>，n 为延迟的回合数，n <= 0 为当前回合结束时发动
#             技能备注<delay message s>，s为技能施放时提示的信息。
#             其中使用者名称用\N代替。
#--------------------------------------------------------------------------
 
class RPG::UsableItem
  note_i :delay, false
  note_s :delay_message
end
 
class Window_BattleLog < Window_Selectable
  #--------------------------------------------------------------------------
  # ● 显示延迟使用技能／物品
  #--------------------------------------------------------------------------
  def display_delay_use_item(subject, item)
    add_text(item.delay_message.gsub(/\\N/, subject.name))
  end
end
 
class Scene_Battle < Scene_Base
  #--------------------------------------------------------------------------
  # ● 初始化延迟列表
  #--------------------------------------------------------------------------
  def_after(:start) { @delay_list = [] }
  #--------------------------------------------------------------------------
  # ● 使用技能／物品
  #--------------------------------------------------------------------------
  def_chain :use_item do |old|
    item = @subject.current_action.item
    return old.call unless item.delay
    @log_window.display_delay_use_item(@subject, item)
    subject = @subject
    action = @subject.current_action
    @delay_list.push Fiber.new {
      item.delay.times { Fiber.yield }
      subject.actions.unshift(action)
      @subject, subject = subject, @subject
      old.call
      @subject.remove_current_action
      @subject = subject
    }
  end
  #--------------------------------------------------------------------------
  # ● 回合结束
  #--------------------------------------------------------------------------
  def_before(:turn_end) { @delay_list.delete_if(&:resume) }
end

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


# ● require Taroxd基础设置


#    使用方法：技能备注<delay n>，n 为延迟的回合数，n <= 0 为当前回合结束时发动


#             技能备注<delay message s>，s为技能施放时提示的信息。


#             其中使用者名称用\N代替。


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


 


class RPG::UsableItem


  note_i :delay, false


  note_s :delay_message


end


 


class Window_BattleLog < Window_Selectable


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


  # ● 显示延迟使用技能／物品


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


  def display_delay_use_item(subject, item)


    add_text(item.delay_message.gsub(/\\N/, subject.name))


  end


end


 


class Scene_Battle < Scene_Base


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


  # ● 初始化延迟列表


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


  def_after(:start) { @delay_list = [] }


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


  # ● 使用技能／物品


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


  def_chain :use_item do |old|


    item = @subject.current_action.item


    return old.call unless item.delay


    @log_window.display_delay_use_item(@subject, item)


    subject = @subject


    action = @subject.current_action


    @delay_list.push Fiber.new {


      item.delay.times { Fiber.yield }


      subject.actions.unshift(action)


      @subject, subject = subject, @subject


      old.call


      @subject.remove_current_action


      @subject = subject


    }


  end


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


  # ● 回合结束


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


  def_before(:turn_end) { @delay_list.delete_if(&:resume) }


end