概要

SRW風の「気力」システムを再現するスクリプトです。
原作を知らないので、原作通りの仕様かどうかは不明です。

更新履歴

2008/01/10

≪SP消費改造≫ に適応。

2007/09/09

ダメージ補正処理を微調整。

2007/08/19

他のスクリプトに対する依存性を改善。

2006/09/27

ダメージ値がおかしくなるバグを修正。(たぶん)

2005/12/24

「通常攻撃時変動値」を追加。

2005/07/10

「命中率影響度」を追加。

2005/04/23

設定項目を詳細化。

2005/04/11

処理を多少効率化。
他サイトとの併用性向上。

2005/04/09

カスタマイズ項目を追加し、設定を詳細化。

2005/03/14

気力リセット時に落ちるバグを修正。

2004/12/17

≪スキル習得装備≫の修正に伴い、スキル使用可否判定を[Game_Battler]に移行。

2004/12/12

変数の指定ミスを修正。

2004/10/31

気力増減アイテムを使っても、使用したアイテムが減らないバグを修正。

スクリプト

KGC_SRWSpirit

#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
#_/    ◆ SRW風「気力」 - KGC_SRWSpirit ◆
#_/    ◇ Last update : 2008/01/10 ◇
#_/----------------------------------------------------------------------------
#_/  SRW風の気力システムを導入します。
#_/  Provides the function like "Super Robot Wars [(C)BANPRESTO]".
#_/============================================================================
#_/  ≪消費SP改造[SPCostAlter]≫より下
#_/  Below <<SPCostAlter>>.
#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/

#==============================================================================
# ★ カスタマイズ項目 - Customize ★
#==============================================================================

module KGC
  # ◆気力基準値(初期値)
  SRWS_SPIRIT_STD = 100
  # ◆気力最大値
  SRWS_SPIRIT_MAX = 150
  # ◆気力最小値
  SRWS_SPIRIT_MIN = 50

# ◆通常攻撃影響度
  #  高いほどダメージ増減幅が大きくなる。
  #  気力が基準値より高いほどダメージ増加、低いほど減少。
  #  負数を指定すると効果が逆転。
  SRWS_ATTACK_INF  = 100
  # ◆防御影響度
  SRWS_GUARD_INF   = -75
  # ◆回復影響度
  SRWS_RECOVER_INF = -100
  # ◆命中率影響度
  SRWS_HIT_INF     = -20

# ◆通常攻撃時変動値
  SRWS_ATTACK_FLUC  = 1
  # ◆ダメージ時変動値
  SRWS_DAMAGE_FLUC  = 1
  # ◆回復時変動値
  SRWS_RECOVER_FLUC = -1
  # ◆勝利時変動値
  SRWS_VICTORY_FLUC = 1
  # ◆逃走時変動値
  SRWS_ESCAPE_FLUC  = -2

# ◆「気力」の名称
  ### Name of "Spirit".
  SRWS_SPIRIT_NAME = "気力"
end

#### SRWS_SPIRIT_STD
### Standard value of Spirit. (Initial value.)

#### SRWS_SPIRIT_MAX
### Spirit maximum.

#### SRWS_SPIRIT_MIN
### Spirit minimum.

#### SRWS_ATTACK_INF
### Influence on attack.

#### SRWS_GUARD_INF
### Influence on guard.

#### SRWS_RECOVER_INF
### Influence on recovery.

#### SRWS_HIT_INF
### Influence on hit rate.

#### SRWS_ATTACK_FLUC
### Fluctuation by attack.

#### SRWS_DAMAGE_FLUC
### Fluctuation by damage.

#### SRWS_RECOVER_FLUC
### Fluctuation by recovery.

#### SRWS_VICTORY_FLUC
### Fluctuation by victory.

#### SRWS_ESCAPE_FLUC
### Fluctuation by escape.

#### SRWS_SPIRIT_NAME
### Name of "Spirit".

#★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★

$imported = {} if $imported == nil
$imported["SRWSpirit"] = true

if $game_special_elements == nil
  $game_special_elements = {}
  $data_system = load_data("Data/System.rxdata")
end
# 気力条件スキル属性
$game_special_elements["skill_spirit"] =
  /(?:(?:必要気力)|(?:NeedSpirit))(\d+)((?:以下)|(?:Below))?/
# スキル使用時気力増加属性
$game_special_elements["skill_spirit_fluc"] =
  /(?:(?:気力増加)|(?:SpiritFluc))([-])?(\d+)/
# 気力増減属性
$game_special_elements["spirit_id"] = $data_system.elements.index("気力増減")
if $game_special_elements["spirit_id"] == nil
  $game_special_elements["spirit_id"] =
    $data_system.elements.index("SpiritFluctuate")
end

#★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★

#==============================================================================
# ■ Game_Battler (分割定義 1)
#==============================================================================

class Game_Battler
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias initialize_KGC_SRWSpirit initialize
  def initialize
    initialize_KGC_SRWSpirit

@spirit = KGC::SRWS_SPIRIT_STD
  end
  #--------------------------------------------------------------------------
  # ● 命中率の取得
  #--------------------------------------------------------------------------
  alias hit_KGC_SRWSpirit hit
  def hit
    nt = KGC::SRWS_SPIRIT_STD
    rt = KGC::SRWS_SPIRIT_STD * 100
    n = hit_KGC_SRWSpirit
    n += (100 + n * KGC::SRWS_HIT_INF * (@spirit.to_f - nt) / rt) / 100
    return Integer(n)
  end
  #--------------------------------------------------------------------------
  # ● 気力取得
  #--------------------------------------------------------------------------
  def spirit
    @spirit = KGC::SRWS_SPIRIT_STD if @spirit == nil
    return @spirit
  end
  #--------------------------------------------------------------------------
  # ● 気力変更
  #--------------------------------------------------------------------------
  def spirit=(n)
    @spirit = KGC::SRWS_SPIRIT_STD if @spirit == nil
    @spirit = [[n, KGC::SRWS_SPIRIT_MIN].max, KGC::SRWS_SPIRIT_MAX].min
  end
end

#★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★

#==============================================================================
# ■ Game_Battler (分割定義 3)
#==============================================================================

class Game_Battler
  #--------------------------------------------------------------------------
  # ● 気力によるダメージ値調整
  #--------------------------------------------------------------------------
  def adjust_damage_spirit(user, value)
    nt = KGC::SRWS_SPIRIT_STD
    rt = KGC::SRWS_SPIRIT_STD * 100
    n = value * KGC::SRWS_ATTACK_INF * (user.spirit - nt) / rt
    value += n
    n = value * KGC::SRWS_GUARD_INF * (self.spirit - nt) / rt
    value += n
    return value
  end
  #--------------------------------------------------------------------------
  # ● 気力による回復量調整
  #--------------------------------------------------------------------------
  def adjust_recover_spirit(user, value)
    nt = KGC::SRWS_SPIRIT_STD
    rt = KGC::SRWS_SPIRIT_STD * 100
    n = value * KGC::SRWS_RECOVER_INF * (self.spirit - nt) / rt
    value += n
    return value
  end
  #--------------------------------------------------------------------------
  # ● 通常攻撃の効果適用
  #--------------------------------------------------------------------------
  alias attack_effect_KGC_SRWSpirit attack_effect
  def attack_effect(attacker)
    last_hp = self.hp
    # 攻撃者の気力変動
    attacker.spirit += KGC::SRWS_ATTACK_FLUC

result = attack_effect_KGC_SRWSpirit(attacker)

# ダメージを受けた場合
    if result && self.damage.is_a?(Numeric) && self.damage > 0
      # 被攻撃者の気力変動
      self.spirit += KGC::SRWS_DAMAGE_FLUC
      # ダメージ値調整
      self.damage = adjust_damage_spirit(attacker, self.damage)
      self.hp = last_hp - self.damage
    end

return result
  end
  #--------------------------------------------------------------------------
  # ● スキルの効果適用
  #--------------------------------------------------------------------------
  alias skill_effect_KGC_SRWSpirit skill_effect
  def skill_effect(user, skill)
    # 使用者の気力変動
    skill.element_set.compact.each { |element|
      if $game_special_elements["skill_spirit_fluc"] =~
          $data_system.elements[element]
        i = $2.to_i
        user.spirit += ($1 == "-" ? -i : i)
      end
    }

# 無敵判定
    if $imported["Invincible"] && self.invincible?(skill)
      self.damage = "Miss"
      self.critical = false
      return false
    end
    # 気力増減属性を持っていない場合
    unless skill.element_set.include?($game_special_elements["spirit_id"])
      last_hp = self.hp
      result = skill_effect_KGC_SRWSpirit(user, skill)

# 気力増減属性を持っておらず、かつ割合ダメージではない、
      # かつ消費SP比例ダメージではない場合
      if result && !skill.element_set.include?($game_special_elements["spirit_id"]) &&
          (!$imported["RateDamage"] || KGC::check_damage_rate(skill) == nil) &&
          (!$imported["SPCostAlter"] || !skill.consume_sp_rate?) &&
          self.damage.is_a?(Numeric)
        # ダメージが正
        if self.damage > 0
          # 気力変動
          self.spirit += KGC::SRWS_DAMAGE_FLUC
          # ダメージ値調整
          self.damage = adjust_damage_spirit(user, self.damage)
        # ダメージが負
        elsif self.damage < 0
          # 気力変動
          self.spirit += KGC::SRWS_RECOVER_FLUC
          # 回復量調整
          self.damage = adjust_recover_spirit(user, self.damage)
        end
        # HP減少処理
        self.hp = last_hp - self.damage
      end
      return result
    end

# クリティカルフラグをクリア
    self.critical = false
    # スキルの効果範囲が HP 1 以上の味方で、自分の HP が 0、
    # またはスキルの効果範囲が HP 0 の味方で、自分の HP が 1 以上の場合
    if ((skill.scope == 3 || skill.scope == 4) && self.hp == 0) ||
       ((skill.scope == 5 || skill.scope == 6) && self.hp >= 1)
      # メソッド終了
      return false
    end
    # 有効フラグをクリア
    @effective = false
    # コモンイベント ID が有効の場合は有効フラグをセット
    @effective |= skill.common_event_id > 0
    # 第一命中判定
    hit = skill.hit
    if skill.atk_f > 0
      hit *= user.hit / 100
    end
    hit_result = (rand(100) < hit)
    # 不確実なスキルの場合は有効フラグをセット
    @effective |= hit < 100
    # 命中の場合
    if hit_result == true
      # ステート変化
      @state_changed = false
      effective |= states_plus(skill.plus_state_set)
      effective |= states_minus(skill.minus_state_set)
      # "威力" 分気力を増減
      self.damage = -skill.power
      self.spirit += skill.power
      # 戻る
      return true
    end
    return false
  end
  #--------------------------------------------------------------------------
  # ● アイテムの効果適用
  #--------------------------------------------------------------------------
  alias item_effect_KGC_SRWSpirit item_effect
  def item_effect(item)
    # 気力増減属性を持っていない場合
    unless item.element_set.include?($game_special_elements["spirit_id"])
      result = item_effect_KGC_SRWSpirit(item)

# ダメージが存在する場合
      if result && self.damage.is_a?(Numeric)
        # ダメージが正
        if self.damage > 0
          self.spirit += KGC::SRWS_DAMAGE_FLUC
        # ダメージが負
        elsif self.damage < 0
          self.spirit += KGC::SRWS_RECOVER_FLUC
        end
      end
      return result
    end
    # 無敵判定
    if $imported["Invincible"] && self.invincible?(item)
      self.damage = "Miss"
      self.critical = false
      return false
    end

# クリティカルフラグをクリア
    self.critical = false
    # アイテムの効果範囲が HP 1 以上の味方で、自分の HP が 0、
    # またはアイテムの効果範囲が HP 0 の味方で、自分の HP が 1 以上の場合
    if ((item.scope == 3 || item.scope == 4) && self.hp == 0) ||
       ((item.scope == 5 || item.scope == 6) && self.hp >= 1)
      # メソッド終了
      return false
    end
    # 有効フラグをクリア
    @effective = false
    # コモンイベント ID が有効の場合は有効フラグをセット
    @effective |= item.common_event_id > 0
    # 命中判定
    hit_result = (rand(100) < item.hit)
    # 不確実なスキルの場合は有効フラグをセット
    @effective |= item.hit < 100
    # 命中の場合
    if hit_result == true
      # "HP回復量" 分気力を増減
      self.damage = -item.recover_hp
      self.spirit -= self.damage
      # 戻る
      return true
    end
    return false
  end
end

#★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★

#==============================================================================
# ■ Game_Actor
#==============================================================================

KGC_Game_Actor_first = "SRWSpirit" unless defined?(KGC_Game_Actor)

module KGC_Game_Actor
  #--------------------------------------------------------------------------
  # ● スキルの使用可能判定
  #--------------------------------------------------------------------------
  if defined?(skill_can_use?) && !@_skill_can_use_srwspirit
    alias skill_can_use_KGC_SRWSpirit skill_can_use?
  else
    @_skill_can_use_srwspirit = true
  end
  def skill_can_use?(skill_id)
    result = true
    # 気力条件確認
    $data_skills[skill_id].element_set.compact.each { |element|
      if $game_special_elements["skill_spirit"] =~ $data_system.elements[element]
        if $2 == "以下"
          # 気力が指定値を超えている場合は使用不可
          result = false if self.spirit > $1.to_i
        else
          # 気力が足りない場合は使用不可
          result = false if self.spirit < $1.to_i
        end
      end
    }
    if defined?(skill_can_use_KGC_SRWSpirit)
      return result & skill_can_use_KGC_SRWSpirit(skill_id)
    else
      return result & super
    end
  end
  module_function :skill_can_use?
  public :skill_can_use?
end

class Game_Actor
  include KGC_Game_Actor
end

#★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★

#==============================================================================
# ■ Game_Party
#==============================================================================

class Game_Party
  #--------------------------------------------------------------------------
  # ● パーティメンバーの気力をリセット
  #--------------------------------------------------------------------------
  def reset_spirit
    self.actors.each { |actor|
      actor.spirit = KGC::SRWS_SPIRIT_STD
    }
  end
end

#★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★

#==============================================================================
# ■ Window_Status
#==============================================================================

class Window_Status < Window_Base
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  alias refresh_KGC_SRWSpirit refresh
  def refresh
    refresh_KGC_SRWSpirit

draw_actor_spirit(@actor, 320, 112)
  end
  #--------------------------------------------------------------------------
  # ● 気力描画
  #--------------------------------------------------------------------------
  def draw_actor_spirit(actor, x, y)
    self.contents.font.color = system_color
    self.contents.draw_text(x, y, 120, 32, KGC::SRWS_SPIRIT_NAME)
    self.contents.font.color = normal_color
    self.contents.draw_text(x + 120, y, 36, 32, actor.spirit.to_s, 2)
  end
end

#★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★

#==============================================================================
# ■ Scene_Battle (分割定義 1)
#==============================================================================

class Scene_Battle
  #--------------------------------------------------------------------------
  # ● バトル終了
  #     result : 結果 (0:勝利 1:逃走 2:敗北)
  #--------------------------------------------------------------------------
  alias battle_end_KGC_SRWSpirit battle_end
  def battle_end(result)
    unless @battle_spirit_added
      # 結果で分岐
      case result
      when 0  # 勝利
        $game_party.actors.each { |actor|
          actor.spirit += KGC::SRWS_VICTORY_FLUC
        }
      when 1  # 逃走
        $game_party.actors.each { |actor|
          actor.spirit += KGC::SRWS_ESCAPE_FLUC
        }
      end
      @battle_spirit_added = true
    end

battle_end_KGC_SRWSpirit(result)
  end
end

使用法

気力の初期値は100で、上限150、下限50となります。
勝利時・被ダメージ時に+1、逃亡時・回復時に-1がそれぞれ加算され、値に応じて通常攻撃やスキルの威力が変動します。
(これらはすべてカスタマイズ項目で変更可能)

気力の値による影響度は

# ◆通常攻撃影響度
SRWS_ATTACK_INF  = 100
# ◆防御影響度
SRWS_GUARD_INF   = -75
# ◆回復影響度
SRWS_RECOVER_INF = -100
# ◆命中率影響度
SRWS_HIT_INF     = -20

この部分で設定します。
値が大きくなるほど、気力による影響が大きくなります。
正数を指定すると、気力が基準値より高いときは増加、低いときは減少になります。

<例>　影響度[100]
気力[120]：威力が20%増加。　気力[80]：威力が20%減少。

負数を指定すると、増減効果が逆に機能します。

<例>　影響度[-100]
気力[120]：威力が20%減少。　気力[80]：威力が20%増加。

宿屋の処理等で気力を初期値に戻す場合は、イベントコマンド「スクリプト」で $game_party.reset_spirit を実行してください。

スキルに必要気力{気力値}属性を付加すると、スキル使用に必要な気力を設定できます。
必要気力{気力値}以下属性を付加すると、気力が指定値を超えた場合は使用不可能になります。

<例>　必要気力120
気力が120以上になると使用可能。
<例>　必要気力110以下
気力が111以上になると使用不可能。

スキルに気力増加[-]{加算値}属性を付加すると、スキル使用時に使用者の気力を増減させることができます。
気力増加{加算値}ならば増加、気力増加-{加算値}ならば減少効果を持ちます。

<例>　気力増加10
使用時に気力が10増加。
<例>　気力増加-10
使用時に気力が10減少。

アイテムやスキルに気力増減属性を付加すると、気力を増減させる効果を持ちます。
このときの増減量は、スキルなら[威力]、アイテムなら[HP回復量]になります。
増加させる場合は正、減少させる場合は負の値を設定してください。