装備品設定詳細化

概要

武器に様々な効果を付加できるように改造します。
現在は

呪い装備
DQでおなじみ。装備すると呪いを解くまで外れません。
武器オートステート
そのまんまです。
命中率
画面上では見えない命中率を操作します。
攻撃時のダメージ率
見た目の攻撃力より強い(弱い)武器を作れます。
クラスチェンジ装備
装備するとクラスチェンジします。

に対応しています。

≪装備拡張[EquipExtension]≫より下に導入してください。

スクリーンショット

無し

更新履歴

2008/03/23

リファクタリング。

2007/01/28

呪い機能が正常に働かないバグを修正。

2006/09/27

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

2006/03/27

リファクタリング。

2005/04/11

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

2005/04/04

「クラスチェンジ装備」を追加。

2005/03/26

≪装備拡張≫の変更に適応。
「呪い装備」にカーソルを合わせただけで呪われるバグを修正。

2005/03/13

「武器オートステート」が正常に機能しないバグを修正。

2005/03/01

≪呪い装備≫≪武器オートステート≫≪武器詳細設定≫を統合し、作成。

スクリプト

KGC_EquipDetailSetting

#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
#_/    ◆ 装備品設定詳細化 - KGC_EquipDetailSetting ◆
#_/    ◇ Last update : 2008/03/23 ◇
#_/----------------------------------------------------------------------------
#_/  装備品の設定項目を詳細化します。
#_/============================================================================
#_/ ≪装備拡張[EquipExtension]≫より下
#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/

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

module KGC
  # ◆チェンジ前のクラスで覚えたスキルを残す
  EDS_CH_REMAIN_SKILL = false
  # ◆チェンジ後のクラスで習得レベルに達しているスキルを覚える
  EDS_CH_LEARN_SKILL  = true
end

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

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

if $game_special_elements == nil
  $game_special_elements = {}
  $data_system = load_data("Data/System.rxdata")
end
# 命中率変動属性
$game_special_elements["weapon_hit"] = /命中率(\d+)(%|％)/
# 強制ダメージ属性
$game_special_elements["weapon_damage_force"] = /強制ダメージ(\d+)(%|％|‰)/
# 武器オートステート用属性
$game_special_elements["weapon_auto_state"] = /WAS(\d+)/i
# クラスチェンジ属性
$game_special_elements["equip_class_change"] = /クラスチェンジ(\d+)/
# 呪い装備属性
$game_special_elements["equip_curse"] = $data_system.elements.index("呪い装備")
# 呪い解除属性
$game_special_elements["remove_curse"] = $data_system.elements.index("呪い解除")

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

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

class Game_Battler
  #--------------------------------------------------------------------------
  # ● 命中率の取得
  #--------------------------------------------------------------------------
  alias hit_KGC_EquipDetailSetting hit
  def hit
    n = hit_KGC_EquipDetailSetting
    return (n * equipment_hit_rev / 100)
  end
  #--------------------------------------------------------------------------
  # ○ 装備品の命中率補正
  #--------------------------------------------------------------------------
  def equipment_hit_rev
    return 100
  end
end

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

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

class Game_Battler
  #--------------------------------------------------------------------------
  # ● 通常攻撃の効果適用
  #--------------------------------------------------------------------------
  alias attack_effect_KGC_EquipDetailSetting attack_effect
  def attack_effect(attacker)
    last_hp = self.hp

result = attack_effect_KGC_EquipDetailSetting(attacker)

if result
      attack_effect_detail(attacker, last_hp)
    end
    return result
  end
  #--------------------------------------------------------------------------
  # ○ 詳細設定適用
  #--------------------------------------------------------------------------
  def attack_effect_detail(attacker, last_hp)
    return unless attacker.is_a?(Game_Actor)
    return unless self.damage.is_a?(Numeric)
    return if self.damage <= 0

# 使用武器取得
    w_id = attacker.weapon_id
    if $imported["EquipExtension"] && attacker.two_swords?
      w_id = attacker.weapon_id(attacker.attack_count)
    end
    weapon = $data_weapons[w_id]
    return if weapon == nil

# 強制ダメージ
    for element in weapon.element_set
      next if $game_special_elements["weapon_damage_force"] !~
        $data_system.elements[element]

if $2 == "‰"
        self.damage = self.damage * $1.to_i / 1000
      else
        self.damage = self.damage * $1.to_i / 100
      end
      self.hp = last_hp - self.damage
    end
  end
  #--------------------------------------------------------------------------
  # ● スキルの効果適用
  #--------------------------------------------------------------------------
  alias skill_effect_KGC_EquipDetailSetting skill_effect
  def skill_effect(user, skill)
    # 対象がエネミー、または呪い解除属性を持っていない場合
    if self.is_a?(Game_Enemy) ||
        !skill.element_set.include?($game_special_elements["remove_curse"])
      # 元の処理を実行
      return skill_effect_KGC_EquipDetailSetting(user, skill)
    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
      curse_removed = false
      for i in 0...($imported["EquipExtension"] ? self.equip_type.size : 5)
        # 呪いにかかっている場合
        if self.cursed[i]
          self.remove_curse(i)
          curse_removed = true
        end
      end
      # 呪いを解除した場合、効果発動
      return curse_removed
    end
    return false
  end
end

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

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

class Game_Actor
  #--------------------------------------------------------------------------
  # ● 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_accessor :cursed                   # 呪い状態
  #--------------------------------------------------------------------------
  # ● セットアップ
  #--------------------------------------------------------------------------
  alias setup_EquipDetailSetting setup
  def setup(actor_id)
    setup_EquipDetailSetting(actor_id)

@cursed = []
    @original_class = self.class_id
  end
  #--------------------------------------------------------------------------
  # ○ 装備品の命中率補正
  #--------------------------------------------------------------------------
  def equipment_hit_rev
    if $imported["EquipExtension"]
      weapon = $data_weapons[self.weapon_id(self.attack_count)]
    else
      weapon = $data_weapons[@weapon_id]
    end
    return 100 if weapon == nil

# 命中率変動判定
    n = 100
    weapon.element_set.each { |element|
      if $game_special_elements["weapon_hit"] =~ $data_system.elements[element]
        n = n * $1.to_i / 100
      end
    }
    return n
  end
  #--------------------------------------------------------------------------
  # ● 装備の変更
  #     equip_type : 装備タイプ
  #     id         : 武器 or 防具 ID  (0 なら装備解除)
  #     check_only : 装備チェックだけ
  #--------------------------------------------------------------------------
  alias equip_KGC_EquipDetailSetting equip
  def equip(equip_type, id, check_only = false)
    @original_class = self.class_id if @original_class == nil
    # 装備変更前の武器IDを保存
    if $imported["EquipExtension"]
      last_weapon = self.weapon_id(equip_type)
    else
      last_weapon = self.weapon_id
    end

equip_KGC_EquipDetailSetting(equip_type, id)

if $imported["EquipExtension"]
      case equip_type
      when (self.two_swords? ? 0...self.ts_number : 0)  # 武器
        apply_equip_effect(self.weapon_id(equip_type), 0,
          equip_type, check_only)
        # 武器のオートステートを更新
        update_auto_state($data_weapons[last_weapon], $data_weapons[id], true)
      else  # 防具
        apply_equip_effect(@armor_id[equip_type], 1, equip_type, check_only)
      end
    else
      case equip_type
      when 0  # 武器
        apply_equip_effect(@weapon_id, 0, equip_type, check_only)
        # 武器のオートステートを更新
        update_auto_state($data_weapons[last_weapon], $data_weapons[id], true)
      when 1..4  # 防具
        apply_equip_effect(eval("@armor#{equip_type}_id"), 1,
          equip_type, check_only)
      end
    end
  end
  #--------------------------------------------------------------------------
  # ○ 装備効果適用
  #     id         : 装備品ID
  #     type       : 0..武器  1..防具
  #     e_index    : 装備欄Index
  #     check_only : チェックのみ
  #--------------------------------------------------------------------------
  def apply_equip_effect(id, type, e_index, check_only)
    return if id <= 0 || check_only

case type
    when 0
      elements = $data_weapons[id].element_set
    when 1
      elements = $data_armors[id].guard_element_set
    end
    # 呪い装備属性を持っている場合
    if elements.include?($game_special_elements["equip_curse"])
      # 呪いを付加
      attach_curse(e_index)
    end
    # クラスチェンジ判定
    changed = false
    elements.each { |element|
      if $data_system.elements[element] =~
          $game_special_elements["equip_class_change"]
        self.class_change($1.to_i)
        changed = true
        break
      end
    }
    # チェンジ装備ではない場合は元に戻す
    if !changed && self.class_id != @original_class
      self.class_change(@original_class)
    end
  end
  #--------------------------------------------------------------------------
  # ● 装備固定判定
  #     equip_type : 装備タイプ
  #--------------------------------------------------------------------------
  alias equip_fix_KGC_EquipDetailSetting? equip_fix?
  def equip_fix?(equip_type)
    return equip_fix_KGC_EquipDetailSetting?(equip_type) || @cursed[equip_type]
  end
  #--------------------------------------------------------------------------
  # ● オートステートの更新
  #     old_equip : 外した武具
  #     new_equip : 装備した武具
  #        weapon : 武器フラグ(true の場合は武器のオートステート)
  #--------------------------------------------------------------------------
  def update_auto_state(old_equip, new_equip, weapon = false)
    if weapon
      # 外した武器のオートステートを強制解除
      if old_equip != nil
        old_equip.element_set.each { |element|
          if $game_special_elements["weapon_auto_state"] =~
              $data_system.elements[element]
            remove_state($1.to_i, true)
          end
        }
      end
      # 装備武器のオートステートを強制付加
      if new_equip != nil
        new_equip.element_set.each { |element|
          if $game_special_elements["weapon_auto_state"] =~
              $data_system.elements[element]
            add_state($1.to_i, true)
          end
        }
      end
    else
      # 外した防具のオートステートを強制解除
      if old_equip != nil && old_equip.auto_state_id != 0
        remove_state(old_equip.auto_state_id, true)
      end
      # 装備した防具のオートステートを強制付加
      if new_equip != nil && new_equip.auto_state_id != 0
        add_state(new_equip.auto_state_id, true)
      end
    end
  end
  #--------------------------------------------------------------------------
  # ○ 呪い付加
  #     e_index : 装備欄インデックス(装備タイプ)
  #--------------------------------------------------------------------------
  def attach_curse(e_index)
    @cursed[e_index] = true
  end
  #--------------------------------------------------------------------------
  # ○ 呪い解除
  #     e_index  : 装備欄インデックス(装備タイプ)
  #     preserve : 装備品保持(true にすると装備品を破壊しない)
  #--------------------------------------------------------------------------
  def remove_curse(e_index, preserve = false)
    return unless @cursed[e_index]

@cursed[e_index] = false
    # 破壊
    case e_index
    when (self.two_swords? ? 0...self.ts_number : 0)  # 武器
      curse_equipment_break(0, e_index,
        preserve ? nil : $game_party.method(:lose_weapon))
    else  # 防具
      curse_equipment_break(1, e_index,
        preserve ? nil : $game_party.method(:lose_armor))
    end
  end
  #--------------------------------------------------------------------------
  # ○ 呪い解除 -> 装備品破壊
  #     type         : 0..武器  1..防具
  #     e_index      : 装備欄インデックス
  #     break_method : 破壊用メソッド
  #--------------------------------------------------------------------------
  def curse_equipment_break(type, e_index, break_method)
    # 装備品固定を解除し、IDを保存
    case type
    when 0
      if $imported["EquipExtension"]
        equipment_id = @weapons[e_index]
      else
        equipment_id = @weapon_id
      end
    when 1
      if $imported["EquipExtension"]
        equipment_id = @armor_id[e_index]
      else
        equipment_id = eval("@armor#{type}_id")
      end
    end
    # 装備を外す
    equip(e_index, 0)
    # 装備品を破壊
    if break_method != nil
      break_method.call(equipment_id, 1)
    end
  end
  #--------------------------------------------------------------------------
  # ○ クラスチェンジ
  #--------------------------------------------------------------------------
  def class_change(new_class)
    last_class = self.class_id
    self.class_id = new_class
    # 前のクラスで覚えたスキルを忘れる
    unless KGC::EDS_CH_REMAIN_SKILL
      for skill in $data_classes[last_class].learnings
        @skills.delete(skill.skill_id)
      end
    end
    # 新しいクラスのスキルを習得
    if KGC::EDS_CH_LEARN_SKILL
      for skill in $data_classes[new_class].learnings
        self.learn_skill(skill.skill_id) if skill.level <= self.level
      end
    end
  end
end

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

#==============================================================================
# ■ Scene_Equip
#==============================================================================

class Scene_Equip
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  if !$imported["EquipAlter"] && !$imported["EquipExtension"]
  def refresh
    # アイテムウィンドウの可視状態設定
    @item_window1.visible = (@right_window.index == 0)
    @item_window2.visible = (@right_window.index == 1)
    @item_window3.visible = (@right_window.index == 2)
    @item_window4.visible = (@right_window.index == 3)
    @item_window5.visible = (@right_window.index == 4)
    # 現在装備中のアイテムを取得
    item1 = @right_window.item
    # 現在のアイテムウィンドウを @item_window に設定
    case @right_window.index
    when 0
      @item_window = @item_window1
    when 1
      @item_window = @item_window2
    when 2
      @item_window = @item_window3
    when 3
      @item_window = @item_window4
    when 4
      @item_window = @item_window5
    end
    # ライトウィンドウがアクティブの場合
    if @right_window.active
      # 装備変更後のパラメータを消去
      @left_window.set_new_parameters(nil, nil, nil)
    end
    # アイテムウィンドウがアクティブの場合
    if @item_window.active
      # 現在選択中のアイテムを取得
      item2 = @item_window.item
      # 装備を変更
      last_hp = @actor.hp
      last_sp = @actor.sp
      @actor.equip(@right_window.index, item2 == nil ? 0 : item2.id, true)
      # 装備変更後のパラメータを取得
      new_atk = @actor.atk
      new_pdef = @actor.pdef
      new_mdef = @actor.mdef
      # 装備を戻す
      @actor.equip(@right_window.index, item1 == nil ? 0 : item1.id)
      @actor.hp = last_hp
      @actor.sp = last_sp
      # レフトウィンドウに描画
      @left_window.set_new_parameters(new_atk, new_pdef, new_mdef)
    end
  end
  end
end

使用法

呪い装備
属性呪い装備呪い解除を作成します。
あとはこれを武器に設定すれば、呪い装備の完成です。

スキルに呪い解除属性をセットすると、呪いを解くスキルを作成できます。
また、

actor.remove_curse(type)

を使用すると、アクターの呪いを解除できます。
typeには装備品のタイプ(↓)を入力します。

type	装備品
≪装備拡張≫を使用しない場合
0	武器
1	盾
2	頭
3	身体
4	装飾品
≪装備拡張≫を使用する場合
x	EEX_EQUIP_TYPEの数値と同じ

例えば、アクターID:4の武器にかけられた呪いを解く場合、

$game_actors[4].remove_curse(0)

を実行します。

いずれの方法でも、呪いを解除すると呪われた装備品は破壊されます。

武器オートステート
属性WAS{ID}を作成します。
あとはこれを武器に設定すれば、IDに指定したステートが付加されます。

　　～使用例～
WAS12

命中率
属性命中率{x}％を作成し、武器にセットします。
これで、その武器は通常のx%の命中率になります。
(ステートによる補正は有効です)

％は半角でも全角でもOKです。

　～使用例～
命中率50％

ダメージ率
属性強制ダメージ{x}％を作成し、武器にセットします。
これで、その武器で攻撃した際の威力が通常のx%になります。
また、％を‰にすれば、千分率での指定も可能です。

　～使用例～
強制ダメージ30％

実際は状況によって多少変動するため、設定通りの効果が表れない場合もあります。

クラスチェンジ装備
属性クラスチェンジ{id}を作成します。
この属性をセットした武具を装備すると、装備者のクラスがidに指定したものになります。
<例>　クラスチェンジ10
クラスチェンジ後にスキルを残すかどうかは、カスタマイズ項目で設定することができます。

変更後のクラスで装備できない武具にクラスチェンジ属性を設定した場合、以前の装備品が画面から消えます。
装備不可能になっただけであり、無くなったわけではありませんので、装備を変更すれば戻ります。
ただ、場合によってはバグの発生に繋がりかねないので、必ず変更後のクラスでも装備できる武具を使用してください。