スリップダメージ拡張(RGSS2) | BMSP(スクリプト)

サイトマップ :

スリップダメージ拡張(RGSS2)
Ver2.10(2013/03/23)

|前のページへ|

どういったものに需要があるかなど
スクリプト製作の参考にしたいので，
いいね！と思ったスクリプトにクリックお願いします．

web拍手

概要

ステートによるスリップダメージの量を詳細に設定できるようになり，かつHP，MP，他のスクリプトと併用することでSPへのダメージも可能となります．

|ページトップへ|

併用

第三消費ゲージver1.00以上と併用すればSPへのスリップダメージを実現できます

|ページトップへ|

位置

特に指定はありません．

|ページトップへ|

スクリプト

中身をすべてコピーして，ツクールのスクリプトに新たなセクションを作成し，貼り付けてください．

#==============================================================================
# ■ BMSP スリップダメージ拡張[SLIPDAMAGEEXTENSION] Ver2.10 2013/03/23
#------------------------------------------------------------------------------
# 　スリップダメージの機能を拡張します。
#==============================================================================
#------------------------------------------------------------------------------
# ■内容
# ステートによるスリップダメージの量を詳細に設定できるようになり、かつ
# HP,MP,他のスクリプトと併用することでSPへのダメージも可能となります。
# ■併用
# 「BMSP 第三消費ゲージver1.00以上」と併用すれば
# SPへのスリップダメージを実現できます。
# ■使用方法
# スクリプトに丸ごと貼り付けていただければ使用できます。
# 各種スリップを作るにはステートの設定にて
# ※※重要※※=>オプション「スリップダメージ」をチェックします。
# ステートのメモ欄にて
# ==HPスリップxxx==と記入します。xxxは整数です。
# 正の値でダメージ、負の値で回復です。
# ==HPスリップxxx%==と記入すれば、現在HPに対する割合ダメージ、
# ==MAXHPスリップxxx%==と記入すれば、最大HPに対する割合ダメージとなります。
# これと同様に、MP,SPへのスリップダメージも実現可能です。(例・==MPスリップ20==)
#
# また、これらを組み合わせることにより複雑な効果を作ることも可能です。
# 例・==HPスリップ5==     #=> 5+最大HP5%のダメージ
#     ==MAXHPスリップ5%==
#
# 例・==HPスリップ5%==    #=> HPとMP両方へダメージ 
#     ==MPスリップ5%==
#
# 例・==HPスリップ10%==   #=> HPが減ってくるとなぜか回復し始める(@_@;)
#     ==MAXHPスリップ-5%==
#
# さらに、マップ上でのスリップダメージについては、ステートのメモに
# ==スリップステップxxx==(xxxは自然数)と記入すると、
# xxx歩ごとにスリップダメージの効果が発生します。
# ただし、スリップステップに0を指定するとマップ上では効果は起こらなくなります。
#
# 2012/08/09追記
# スリップダメージによって戦闘不能になったとき，その旨を示すメッセージが
# 表示されるようにしました．
# この変更に伴い，スリップダメージのタイミングがターン終了時から
# 各バトラーの行動終了時になっています．
#
# 2013/03/23追記
# 各種スリップダメージについて変数から値を参照できます．
# たとえば(変数001の値)%の最大HPスリップは以下のように
# 参照する変数を「Vxxx」の形で記述します．
#     ==MAXHPスリップV1==
# また，各種スリップダメージについて以下のようにして指定した値の範囲内から
# ランダムにスリップダメージを与えることができます．
#     ==HPスリップ10～50==
#     ==HPスリップ1～10%==
#     ==HPスリップ10～V1==
# さらに，各種スリップダメージを複数記述することができるようになりました．
# これによりさらに複雑なスリップダメージ表現できます．
# 例・==HPスリップ10==   #=> HPスリップ30と同じ
#     ==HPスリップ20==
#
# 詳細設定の欄では、
# ○SLIPDAMAGEEXTENSION_SLIPDEAD : スリップダメージによる戦闘不能を許可するか
# ○SLIPDAMAGEEXTENSION_SLIPSTEP : マップ上で何歩ごとにスリップダメージが発生するか
#                                  のデフォルト値。メモに直接指定しない場合に利用。
# ○SLIPDAMAGEEXTENSION_SLIPREVIVAL : スリップダメージで戦闘不能から回復するか。
# ○SLIPDAMAGEEXTENSION_HPSLIP_COLOR：マップ上でHPスリップダメージを受けたときの
#                                     フラッシュの色です。
# ○SLIPDAMAGEEXTENSION_MPSLIP_COLOR：マップ上でMPスリップダメージを受けたときの
#                                     フラッシュの色です。
# ○SLIPDAMAGEEXTENSION_SPSLIP_COLOR：マップ上でSPスリップダメージを受けたときの
#                                     フラッシュの色です。
# ○SLIPDAMAGEEXTENSION_ACTOR_KNOCKOUT_MESSAGE：スリップダメージによってアクターが
#                                               戦闘不能になったときのメッセージです．
# ○SLIPDAMAGEEXTENSION_ENEMY_KNOCKOUT_MESSAGE：スリップダメージによってエネミーーが
#                                               戦闘不能になったときのメッセージです．
# が設定できます。
#
# [補足]
# スリップダメージによる戦闘不能の許可は、ステートで個別に設定することもできます。
# ステートのメモに
# ==スリップ戦闘不能許可==または==スリップ戦闘不能不許可==
# と記入すれば、そのようになります。
# この時注意ですが、アクターがかかっている状態のどれか一つでも
# 戦闘不能許可がついていれば、スリップダメージによって戦闘不能になる可能性があります。
#
# ■注意
# このスクリプトでは
# 「RPG::State」「Game_Battler」「Game_Actor」「Game_Party」「Scene_Battle」
# のメソッドを改変しています。
# ■情報
# このスクリプトはgentlawkによって作られたものです。
# 利用規約はhttp://blueredzone.comをご覧ください。
#------------------------------------------------------------------------------
$bmsp_include = {} if $bmsp_include == nil
$bmsp_include["SLIPDAMAGEEXTENSION"] = true
module BMSP
  #▲▽▲▽▲▽▲▽▲▽▲▽▲▽▲▽
  #詳細設定
  SLIPDAMAGEEXTENSION_SLIPDEAD = true #スリップダメージで戦闘不能になるかどうか
                                       #のデフォルト値
  SLIPDAMAGEEXTENSION_SLIPSTEP = 4     #マップにおいて何歩ごとにスリップダメージ
                                       #が生じるかのデフォルト値(自然数)
  SLIPDAMAGEEXTENSION_SLIPREVIVAL = false # スリップダメージで戦闘不能から回復するか
  # マップ上でHP,MP,SPスリップダメージが生じたときのフラッシュ色
  SLIPDAMAGEEXTENSION_HPSLIP_COLOR = Color.new(255,0,0,64)
  SLIPDAMAGEEXTENSION_MPSLIP_COLOR = Color.new(0,0,255,64)
  SLIPDAMAGEEXTENSION_SPSLIP_COLOR = Color.new(0,255,0,64)
  # スリップダメージによる戦闘不能時の表示メッセージ
  SLIPDAMAGEEXTENSION_ACTOR_KNOCKOUT_MESSAGE = "%sは力尽きた！" # アクター
  SLIPDAMAGEEXTENSION_ENEMY_KNOCKOUT_MESSAGE = "%sは力尽きた！" # エネミー
  #▲▽▲▽▲▽▲▽▲▽▲▽▲▽▲▽
  REGEXP_VAL = /(V|[-+]?)(\d+)/o
  REGEXP_BODY = /==(MAX)?(HP|MP|SP)?スリップ#{REGEXP_VAL}(?:～#{REGEXP_VAL})?(%)?==/o
end
#==============================================================================
# ■ RPG::State
#==============================================================================
class RPG::State
  #------------------------------------------------------------
  # ● スリップダメージ情報の初期化
  #------------------------------------------------------------
  def bmsp_init_slipdamage
    @bmsp_slip_inited = true
    @bmsp_slip_damage = {"HP"=>[], "MP"=>[], "SP"=>[]}
    @bmsp_slip_currentper = {"HP"=>[], "MP"=>[], "SP"=>[]}
    @bmsp_slip_maxper = {"HP"=>[], "MP"=>[], "SP"=>[]}
    self.note.scan(BMSP::REGEXP_BODY) do |max,param,var1,val1,var2,val2,per|
      max = !max.nil?
      per = !per.nil?
      set = []
      set.push var1 == "V" ? [val1.to_i, true] : [(var1.to_s + val1).to_i, false]
      if val2 # ランダムスリップ
        set.push var2 == "V" ? [val2.to_i, true] : [(var2.to_s + val2).to_i, false]
      end
      case [max, per]
      when [true, true] # 最大割合スリップ
        @bmsp_slip_maxper[param].push set
      when [false, true] # 割合スリップ
        @bmsp_slip_currentper[param].push set
      when [false, false] # 固定値スリップ
        @bmsp_slip_damage[param].push set
      else
        next
      end
    end
  end
  #------------------------------------------------------------
  # ● [デバッグ用]スリップダメージプリンター
  #------------------------------------------------------------
  def to_text_slip_damage_value(slip)
    case slip.size
    when 1
      r = ""
      val1 = slip[0][1] ? "V#{slip[0][0]}" : slip[0][0].to_s
      val2 = ""
    when 2
      r = "ランダム"
      val1 = slip[0][1] ? "V#{slip[0][0]}" : slip[0][0].to_s
      val2 = slip[1][1] ? "V#{slip[1][0]}" : slip[1][0].to_s
    else
      r = "???"
      val1 = ""
      val2 = ""
    end
    "#{r}スリップ#{val1}#{val2.empty? ? val2 : "～" + val2 }"
  end
  def print_slip_damages
    texts = []
    @bmsp_slip_damage.each do |param, slips|
      slips.each do |slip|
        texts.push "#{param}#{to_text_slip_damage_value(slip)}"
      end
    end
    @bmsp_slip_currentper.each do |param, slips|
      slips.each do |slip|
        texts.push "#{param}#{to_text_slip_damage_value(slip)}%"
      end
    end
    @bmsp_slip_maxper.each do |param, slips|
      slips.each do |slip|
        texts.push "MAX#{param}#{to_text_slip_damage_value(slip)}%"
      end
    end
    p texts.empty? ? "スリップダメージなし" : texts
  end
  #------------------------------------------------------------
  # ● 戦闘不能許可
  #------------------------------------------------------------
  def bmsp_slip_dead?
    return @bmsp_slip_dead unless @bmsp_slip_dead == nil
    s = self.note[/==スリップ戦闘不能許可==/o]
    if s != nil
      @bmsp_slip_dead = true
      return @bmsp_slip_dead
    end
    s = self.note[/==スリップ戦闘不能不許可==/o]
    if s != nil
      @bmsp_slip_dead = false
      return @bmsp_slip_dead
    end
    @bmsp_slip_dead = BMSP::SLIPDAMAGEEXTENSION_SLIPDEAD
    return @bmsp_slip_dead
  end
  #------------------------------------------------------------
  # ● マップで何歩ごとにダメージが生じるか
  #------------------------------------------------------------
  def bmsp_slip_step
    return @bmsp_slip_step unless @bmsp_slip_step == nil
    s = self.note[/==スリップステップ([0-9]+)==/o]
    @bmsp_slip_step = s == nil ? BMSP::SLIPDAMAGEEXTENSION_SLIPSTEP : $1.to_i
    return @bmsp_slip_step
  end
  #------------------------------------------------------------
  # ● スリップインジェクト
  #------------------------------------------------------------
  def bmsp_slip_inject(slips)
    damage = 0
    slips.each do |slip|
      slip.map!{|val, var| var ? $game_variables[val] : val}.sort
      if slip.size == 1
        damage += slip.first
      else
        damage += rand(slip[1]-slip[0]+1) + slip[0] 
      end
    end
    damage
  end
  #------------------------------------------------------------
  # ● スリップ取得
  #------------------------------------------------------------
  def bmsp_slip(type,param)
    bmsp_init_slipdamage unless @bmsp_slip_inited
    case type
    when :damage
      bmsp_slip_inject(@bmsp_slip_damage[param])
    when :currentper
      bmsp_slip_inject(@bmsp_slip_currentper[param])
    when :maxper
      bmsp_slip_inject(@bmsp_slip_maxper[param])
    end
  end
end
#==============================================================================
# ■ Game_Battler
#==============================================================================
class Game_Battler
  #--------------------------------------------------------------------------
  # ● スリップダメージの効果適用
  #--------------------------------------------------------------------------
  def slip_damage_effect
    @hp_damage = 0
    @mp_damage = 0
    @bmsp_sp_damage = 0 if $bmsp_include["THIRDGAUGE"]
    knockout = false
    for state in states
      next if state.slip_damage == false
      # HPダメージ
      @hp_damage += state.bmsp_slip(:damage, "HP")
      @hp_damage += @hp * state.bmsp_slip(:currentper, "HP") / 100
      @hp_damage += maxhp * state.bmsp_slip(:maxper, "HP") / 100
      # MPダメージ
      @mp_damage += state.bmsp_slip(:damage, "MP")
      @mp_damage += @mp * state.bmsp_slip(:currentper, "MP") / 100
      @mp_damage += maxmp * state.bmsp_slip(:maxper, "MP") / 100
      if $bmsp_include["THIRDGAUGE"] # SPダメージ
        @bmsp_sp_damage += state.bmsp_slip(:damage, "SP")
        @bmsp_sp_damage += @bmsp_sp * state.bmsp_slip(:currentper, "SP") / 100
        @bmsp_sp_damage += bmsp_maxsp * state.bmsp_slip(:maxper, "SP") / 100
      end
      if knockout == false and state.bmsp_slip_dead?
        knockout = true
      end
    end
    if knockout == false and @hp_damage > 0
      @hp_damage = [@hp_damage, @hp - 1].min
    end
    if self.dead?
      if @hp_damage < 0 and BMSP::SLIPDAMAGEEXTENSION_SLIPREVIVAL
        self.hp -= @hp_damage
      end
    else
      self.hp -= @hp_damage
    end
    self.mp -= @mp_damage
    self.bmsp_sp -= @bmsp_sp_damage if $bmsp_include["THIRDGAUGE"]
  end
end
#==============================================================================
# ■ Game_Party
#==============================================================================
class Game_Party < Game_Unit
  #--------------------------------------------------------------------------
  # ● プレイヤーが 1 歩動いたときの処理
  #--------------------------------------------------------------------------
  def on_player_walk
    flash = 0
    for actor in members
      flash += actor.bmsp_slip_damage_on_walk(@steps)
      if actor.auto_hp_recover and actor.hp > 0
        actor.hp += 1                   # HP 自動回復
      end
    end
    if flash >= 1000
      $game_map.screen.start_flash(BMSP::SLIPDAMAGEEXTENSION_HPSLIP_COLOR, 4)
    elsif flash >= 100
      $game_map.screen.start_flash(BMSP::SLIPDAMAGEEXTENSION_MPSLIP_COLOR, 4)
    elsif flash >= 10
      $game_map.screen.start_flash(BMSP::SLIPDAMAGEEXTENSION_SPSLIP_COLOR, 4)
    end
  end
end
#==============================================================================
# ■ Game_Actor
#==============================================================================
class Game_Actor < Game_Battler
  #--------------------------------------------------------------------------
  # ● マップでのスリップダメージ処理
  #--------------------------------------------------------------------------
  def bmsp_slip_damage_on_walk(steps)
    hp_damage = 0
    mp_damage = 0
    bmsp_sp_damage = 0 if $bmsp_include["THIRDGAUGE"]
    knockout = false
    for state in states
      next if state.slip_damage == false
      next if state.bmsp_slip_step < 1
      next if steps % state.bmsp_slip_step != 0
      # HPダメージ
      hp_damage += state.bmsp_slip(:damage, "HP")
      hp_damage += @hp * state.bmsp_slip(:currentper, "HP") / 100
      hp_damage += maxhp * state.bmsp_slip(:maxper, "HP") / 100
      # MPダメージ
      mp_damage += state.bmsp_slip(:damage, "MP")
      mp_damage += @mp * state.bmsp_slip(:currentper, "MP") / 100
      mp_damage += maxmp * state.bmsp_slip(:maxper, "MP") / 100
      if $bmsp_include["THIRDGAUGE"] # SPダメージ
        bmsp_sp_damage += state.bmsp_slip(:damage, "SP")
        bmsp_sp_damage += @bmsp_sp * state.bmsp_slip(:currentper, "SP") / 100
        bmsp_sp_damage += bmsp_maxsp * state.bmsp_slip(:maxper, "MP") / 100
      end
      if knockout == false and state.bmsp_slip_dead?
        knockout = true
      end
    end
    if knockout == false and hp_damage > 0
      hp_damage = [hp_damage, @hp - 1].min
    end
    if self.dead?
      if hp_damage < 0 and BMSP::SLIPDAMAGEEXTENSION_SLIPREVIVAL
        self.hp -= hp_damage
      end
    else
      self.hp -= hp_damage
    end
    self.mp -= mp_damage
    self.bmsp_sp -= bmsp_sp_damage if $bmsp_include["THIRDGAUGE"]
    if hp_damage > 0
      return 1000
    elsif mp_damage > 0
      return 100
    elsif $bmsp_include["THIRDGAUGE"] and bmsp_sp_damage > 0
      return 10
    end
    return 0
  end
end
#==============================================================================
# ■ Scene_Battle
#==============================================================================
class Scene_Battle < Scene_Base
  #--------------------------------------------------------------------------
  # ● ターン終了
  #--------------------------------------------------------------------------
  def turn_end
    $game_troop.turn_ending = true
    #$game_party.slip_damage_effect
    #$game_troop.slip_damage_effect
    $game_party.do_auto_recovery
    $game_troop.preemptive = false
    $game_troop.surprise = false
    process_battle_event
    $game_troop.turn_ending = false
    start_party_command_selection
  end
  #--------------------------------------------------------------------------
  # ● ステート自然解除
  #--------------------------------------------------------------------------
  def remove_states_auto
    last_st = @active_battler.states
    @active_battler.remove_states_auto
    if @active_battler.states != last_st
      wait(5)
      display_state_changes(@active_battler)
      wait(30)
      @message_window.clear
    end
  end
  #--------------------------------------------------------------------------
  # ● 現在のステートの表示
  #--------------------------------------------------------------------------
  def display_current_state
    state_text = @active_battler.most_important_state_text
    unless state_text.empty?
      wait(5)
      text = @active_battler.name + state_text
      @message_window.add_instant_text(text)
      wait(45)
      @message_window.clear
    end
    # スリップダメージ
    bmsp_slipext_slip_damage_effect
  end
  #--------------------------------------------------------------------------
  # ● スリップダメージ
  #--------------------------------------------------------------------------
  def bmsp_slipext_slip_damage_effect
    @active_battler.slip_damage_effect
    bmsp_slipext_display_knockout_of_slipdamage(@active_battler)
  end
  #--------------------------------------------------------------------------
  # ● スリップダメージによる戦闘不能の表示
  #     target   : 対象者
  #--------------------------------------------------------------------------
  def bmsp_slipext_display_knockout_of_slipdamage(target)
    if target.dead?
      if target.actor?
        text = sprintf(BMSP::SLIPDAMAGEEXTENSION_ACTOR_KNOCKOUT_MESSAGE, target.name)
      else
        text = sprintf(BMSP::SLIPDAMAGEEXTENSION_ENEMY_KNOCKOUT_MESSAGE, target.name)
      end
      target.perform_collapse # コラプス
      @message_window.replace_instant_text(text)
      wait(50)
    end
  end
end

|ページトップへ|

更新履歴

2013/03/23…同じ種類のスリップダメージを重複して記述可能に．スリップダメージの値を変数で指定可能に．指定した範囲からランダムなスリップダメージを指定可能に．各種最適化
2012/08/09…スリップダメージにより戦闘不能になった時のメッセージを表示．スリップダメージで戦闘不能になったときに敵グラフィックが消えないバグを修正
2011/10/13…スリップダメージで戦闘不能から復帰するかどうか設定可能に
2010/09/04…公開

|ページトップへ|

使用方法

スクリプトに丸ごと貼り付けていただければ使用できます．
各種スリップを作るにはステートの設定にてオプション「スリップダメージ」をチェックし，ステートのメモに以下の様に記入します．

==HPスリップ100==

この場合，スリップダメージは100となります．
ダメージに負の値を指定すると毎ターン回復するステートを作ることができます．

また，以下の様に記入すると現在HPに対する割合ダメージ，もしくは最大HPに対する割合ダメージを設定することができます．

==HPスリップ10%==

==MAXHPスリップ5%==

これと同様にしてMP，SPへのスリップダメージも実現できます．

==MPスリップ20==

==SPスリップ-10%==

さらに，これらを組み合わせることにより複雑な効果を作ることも可能です．

例:5+最大HP5%のダメージ

==HPスリップ5==
==MAXHPスリップ5%==

例:HPとMP両方へのダメージ

==MAXHPスリップ5%==
==MAXMPスリップ5%==

例:HPが減ってくるとなぜか回復し始める(@_@;)

==HPスリップ10%==
==MAXHPスリップ-5%==

マップ上でのスリップダメージについては，ステートのメモに以下の様に記入すると，設定した歩数ごとにスリップダメージの効果が発生します．
ただし，スリップステップは自然数で，0を指定するとマップ上では効果が起こらなくなります．

==スリップステップ5==

2012/08/09追記
スリップダメージによって戦闘不能になったとき，その旨を示すメッセージが表示されるようにしました．
この変更に伴い，スリップダメージのタイミングがターン終了時から各バトラーの行動終了時になっています．

2013/03/23追記
各種スリップダメージについて変数から値を参照できます．
たとえば(変数001の値)%の最大HPスリップは以下のように参照する変数を「Vxxx」の形で記述します．

==MAXHPスリップV1==

また，各種スリップダメージについて以下のようにして指定した値の範囲内からランダムにスリップダメージを与えることができます．

==HPスリップ10～50==

==HPスリップ1～10%==

==HPスリップ10～V1==

==HPスリップ-300～-100==

==HPスリップ30～10%==

さらに，各種スリップダメージを複数記述することができるようになりました．
これによりさらに複雑なスリップダメージ表現できます．

例:HPスリップ30と同じ

==HPスリップ10==
==HPスリップ20==

詳細設定の欄では，以下の項目が設定できます．

SLIPDAMAGEEXTENSION_SLIPDEAD: スリップダメージによる戦闘不能を許可するかどうかです
SLIPDAMAGEEXTENSION_SLIPSTEP: マップ上で何歩ごとにスリップダメージが発生するかのデフォルト値です．メモに直接指定しない場合に利用します
SLIPDAMAGEEXTENSION_SLIPREVIVAL: スリップダメージで戦闘不能から回復するかどうかです
SLIPDAMAGEEXTENSION_HPSLIP_COLOR: マップ上でHPスリップダメージを受けたときのフラッシュの色です
SLIPDAMAGEEXTENSION_MPSLIP_COLOR: マップ上でMPスリップダメージを受けたときのフラッシュの色です
SLIPDAMAGEEXTENSION_SPSLIP_COLOR: マップ上でSPスリップダメージを受けたときのフラッシュの色です
SLIPDAMAGEEXTENSION_ACTOR_KNOCKOUT_MESSAGE: スリップダメージによってアクターが戦闘不能になったときのメッセージです
SLIPDAMAGEEXTENSION_ENEMY_KNOCKOUT_MESSAGE: スリップダメージによってエネミーが戦闘不能になったときのメッセージです

[補足]
スリップダメージによる戦闘不能の許可は，ステートで個別に設定することもできます．
ステートのメモに以下の2つのどちらかを記入すればその通りになります．
この時の注意として，アクターがかかっているステートのどれか1つでも戦闘不能許可がついていれば，スリップダメージによって戦闘不能になる可能性があります．

==スリップ戦闘不能許可==

==スリップ戦闘不能不許可==

|ページトップへ|

注意

このスクリプトでは「RPG::State」「Game_Battler」「Game_Actor」「Game_Party」「Scene_Battle」のメソッドを改変しています．

|ページトップへ|

|前のページへ|

BlueRedZone

パンくずリスト

コンテンツ

スリップダメージ拡張(RGSS2)
Ver2.10(2013/03/23)

メニュー

概要

併用

位置

スクリプト

更新履歴

使用方法

注意

BlueRedZone

パンくずリスト

コンテンツ

スリップダメージ拡張(RGSS2) Ver2.10(2013/03/23)

メニュー

概要

併用

位置

スクリプト

更新履歴

使用方法

注意

スリップダメージ拡張(RGSS2)
Ver2.10(2013/03/23)