装備改造システム

装備改造システム

コンセプト	武器や防具を改造してステータスを上げたい！
挿入位置	▼ 「装備改造：武器拡張追加」「個別装備アイテム」よりも下
完成すると	自分仕様の装備に改造することが出来る。
更新履歴

使用方法

１. 「個別装備アイテム」スクリプトを必ず導入してください。
２．導入後は「ニューゲーム」から始めて下さい。
３. イベントスクリプトにて「command_custom_eqiup」を実行
４. 装備している武器防具を選んで改造部位を選択
５. 追加する改造レベルを選択・実行

装備改造システム：設定「4月22日更新」

#==============================================================================
#    ☆VXAce RGSS3 「装備改造システム：設定」☆
#　　　　　　EnDlEss DREamER
#     URL:http://mitsu-evo.6.ql.bz/
#     製作者 mitsu-evo
#     Last:2014/4/22
#　　 装備を改造することが出来る。
#     ▼ 「装備改造：武器拡張追加」「個別装備アイテム」よりも下
#==============================================================================
=begin

★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★

使用方法
      
    １. 「個別装備アイテム」スクリプトを必ず導入してください。
    ２．導入後は「ニューゲーム」から始めて下さい。 
    ３. イベントスクリプトにて「command_custom_eqiup」を実行
    ４. 装備している武器防具を選んで改造部位を選択
    ５. 追加する改造レベルを選択・実行
    
    
    
★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
  
=end
$ed_rgss3 = {} if $ed_rgss3 == nil
$ed_rgss3["ed_custom_equips"] = true
$imported = {} if $imported == nil

module ED
  module_function
  
  # ★　改造時の能力上昇・下降・金額・レベル設定　★
  CUSTOM_LEVEL   = 5            # 改造最大レベルの設定(デフォルト)
  CUSTOM_PERCENT = 5            # 改造時の元の能力値＋％を設定
  CUSTOM_MONEY   = 5            # 改造時の費用。元の価格の％設定
  # 価格0の時の価格算出方法
  CUSTOM_PRICE_RATE = 10
  # 価格ゼロは「装備の各能力 × CUSTOM_PRICE_RATE」で
  # 価格を一時的に算出し CUSTOM_PERCENT による計算を行っている。
  
  # ★　詳細改造用費用設定　★
  #(改造能力加算値 × 改造レベル) × CUSTOM_PRICE_RATE
  # が詳細改造の場合の改造費用となります。
  
# ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★

# ★　重量設定(装備拡張：武器拡張追加＆個別装備アイテム併用時)　★
  
  CUSTOM_WEIGHT_RISE = 5      # 個別装備アイテム併用時の増加重量(％)
  FORBID_CUSTOM_WEIGHT = 1.0  # 設定重量以下は改造禁止。
  
# ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
  
  # ★　改造禁止装備部位設定　★
  FALSE_CUSTOM_WEAPON = []    # 改造不可能な武器の部位を入れる
  # この場合「装備拡張：武器拡張追加」の「サブ」「スペシャル」が改造不可。
  # サブを２つ設定すれば２つとも改造不可となります。
  # 0：武器　5～(装備拡張：武器拡張使用時)で定義
  
  FALSE_CUSTOM_ARMOR = [4,7,8]        # 改造不可能な防具の部位を入れる
  
                    
  # 「装備拡張」または下記数字と部位の数字を入れると
  # 「その部位の装備」が改造できなくなります。
  # 初期設定「3」の場合は「装備拡張」で装飾品の欄を増加すると
  # 「全ての欄の装飾品」が改造不可となります。
  #  1..盾  2..頭  3..身体  4..装飾品  5～(装備拡張)で定義
  
# ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
  
  # ★　改造時の経験値設定　★
  # 装備改造に経験値制を導入し「鍛冶レベル+1」を超えた改造制限を設ける。
  CUSTOM_EXP_MODE = true
  
  # １回の改造経験値「1」の他に改造元装備の改造レベルを追加経験値に加算するかどうか
  CUSTOMIZE_EXP_ADD = false
  
  # 次の経験値算出方式
  # CUSTOMIZE_EXP_NUMBER の値をベースに固定加算か乗算か配列かを決定。
  # 0 : 固定  1 : 任意配列
  # 「0」の場合は「(前レベル値 + 設定値) × (次のレベル+1)」
  # を「加算」した値が次の経験値となります。
   
  CUSTOMIZE_EXP_MODE = 0
  # 注：440行目付近「def customize_exp_initialize」にて「case文」で分岐
  # して計算式を作成いるので、スクリプトの分かる方は独自に追加して
  # 作ることも可能です。
  
  # CUSTOMIZE_EXP_MODEが「0か1」の時はこの値をベースに自動計算します。
  # 注：「1以上の値」を必ず入れて下さい。
  CUSTOMIZE_EXP_NUMBER = 10
  
  # 次の経験値の任意設定。CUSTOMIZE_EXP_MODEが「2」の時に使用する。
  # CUSTOMIZE_EXP_MODEが「1」以外なら特にいじらなくても良い。
  CUSTOMIZE_EXP_NUMBER_ARRAY = [10,20,30,40,50,60,70,80,90,100]
  
# ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
  
  # ★　表示文字及び効果音　★
  # ウィンドウに表示する現在の改造レベル文字
  CUSTOMIZE_EXP_LEVEL_TEXT = "改造レベル"
  
  # ウィンドウに表示する現在の改造経験値
  CUSTOMIZE_EXP_TEXT = "経験値"
  
  # レベルアップ時の効果音(ファイル名は拡張子無し)
  CUSTOMIZE_LEVEL_UP_SE = "Audio/SE/Item2"
  
# ★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★★
  
  #--------------------------------------------------------------------------
  # ● ディープコピーメソッド  item : アイテム
  #--------------------------------------------------------------------------
  def item_copy(item)
    return Marshal.load(Marshal.dump(item))
  end
end
#==============================================================================
# ■ Float
#------------------------------------------------------------------------------
# 　浮動小数点数のクラス。Float の実装は C 言語の double です。
#==============================================================================
class Float
  
  #--------------------------------------------------------------------------
  # ● 小数点第 X 位に修正する。
  #--------------------------------------------------------------------------
  def roundf(value=2)
    temp = self.to_s.length
    sprintf("%#{temp}.#{value}f",self).to_f
  end
end
#==============================================================================
# ■ Game_Interpreter
#------------------------------------------------------------------------------
# 　イベントコマンドを実行するインタプリタです。このクラスは Game_Map クラス、
# Game_Troop クラス、Game_Event クラスの内部で使用されます。
#==============================================================================
class Game_Interpreter
  # イベントコマンド「スクリプト」にモジュール「Command」のメソッドを反映。
  include ED::Command
end

装備改造システム：base「4月22日更新」

#==============================================================================
#    ☆VXAce RGSS3 「装備改造システム：base」☆
#　　　　　　EnDlEss DREamER
#     URL:http://mitsu-evo.6.ql.bz/
#     製作者 mitsu-evo
#     Last:2014/4/22
#　　 装備を改造することが出来る。
#     ▼ 「設定」「base」「window」「scene」の順に導入。
#==============================================================================
  EQUIP_MHP_PARAM = /<(?:MHP|最大HP)\s*(\d+)>/i
  EQUIP_MMP_PARAM = /<(?:MMP|最大MP)\s*(\d+)>/i
  EQUIP_ATK_PARAM = /<(?:ATK|攻撃力)\s*(\d+)>/i
  EQUIP_DEF_PARAM = /<(?:DEF|防御力)\s*(\d+)>/i
  EQUIP_MAT_PARAM = /<(?:MAT|魔法力)\s*(\d+)>/i
  EQUIP_MDF_PARAM = /<(?:MDF|魔法防御)\s*(\d+)>/i
  EQUIP_AGI_PARAM = /<(?:AGI|敏捷性)\s*(\d+)>/i
  EQUIP_LUK_PARAM = /<(?:LUC|運)\s*(\d+)>/i

module RPG
  class EquipItem < BaseItem
    attr_accessor :customize_level
    attr_accessor :customize_price
    
    
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias ed_custom_equips_weapon_initialize initialize unless $@
  def initialize
    ed_custom_equips_weapon_initialize
    @customize_level = Array.new(12) {0}
    @customize_price = @price / ED::CUSTOM_MONEY
  end
  
  def customize_price
    @customize_price = @price / ED::CUSTOM_MONEY if @customize_price == nil
    @customize_price
  end
  #--------------------------------------------------------------------------
  # ● 詳細改造処理(個別装備アイテム併用時)
  #    type         : 改造項目
  #    (0:攻撃 1：防御 2：精神 3：敏捷 4：耐久 5：重量 6：EP 7：武器回数 )
  #    custom_level : 改造レベル
  #    price        : 改造金額算出フラグ
  #--------------------------------------------------------------------------
  def individual_customize(type, custom_level,price=false)
    @base_value = [] if @base_value == nil
    param = @params[type]
    add_value = 0
    m_c_l = 0
    l_c_l = 0
    # 個別にカスタムレベルを設定(±設定レベルまで)
    @customize_level ||= Array.new(12) {0}
    # 最大改造レベルの取得
    if $ed_rgss3["ed_weapon_count"]
      max_level = customize_level_max
    else
      max_level = ED::CUSTOM_LEVEL
    end
    #max_level = ED::CUSTOM_LEVEL
    now_level = @customize_level[type]
    # 現在レベルからの改造上限下限の絶対値を取得
    if now_level > 0
      temp_max = max_level - now_level
    else
      temp_max = max_level + (now_level * -1)
    end
    
    0.step(temp_max,1){|n|m_c_l = n}
    n = 0
    if now_level > 0
      temp_max = max_level + now_level
    else
      temp_max = max_level + (now_level * -1)
    end
    
    0.step(temp_max,1){|n|l_c_l = n}
    l_c_l *= -1
    
    # 改造レベルの設定
    if custom_level > 0
      # プラス改造
      return if now_level == max_level and not price
      # 最大-現在=改造余裕。改造レベルが余裕よりも大きいと余裕分にする。
      custom_level = m_c_l if custom_level > m_c_l
      now_level += custom_level
      now_level = max_level if now_level > max_level
    else
      # マイナス改造
      max_level *= -1
      return if now_level == max_level and not price
      # 最大+現在=改造余裕。
      custom_level = l_c_l if custom_level < l_c_l
      now_level += custom_level
      now_level = max_level if now_level < max_level
    end
    @customize_level[type] = now_level unless price     # 現在の改造レベルを代入
    
    # 配列の値を取得
    case type
    when 0..7
      # 各種純正ステータス
      value = param
    when 8
      if $ed_rgss3["ed_weapon_count"]
        # キャッシュ作成とは別にメソッドを作成する。
        # 耐久力
        value = self.durability_max
      end
    when 9
      if $ed_rgss3["ed_weapon_count"]
        # キャッシュ作成とは別にメソッドを作成する。
        # 武器回数
        value = self.weapon_atk_count_max
      end
    when 10
      if $ed_rgss3["ed_equip_extension"] and ED::Equip_extension::WEIGHT
        # 上記に同じ。重量
        value = self.equip_weight
      end
    when 11
      if $ed_rgss3["ed_equip_extension"] and ED::Equip_extension::USE_EP_SYSTEM
        # 上記に同じ。EP
        value = self.ep_cost
      end
    end
    # 改造元のレベル0での能力値を保存
    @base_value[type] = value if @base_value[type] == nil
    # 初期レベル以外は保存済みデータを参照
    value = @base_value[type]
    
    # 各能力値を加算。改造レベルに応じて繰り返し処理
    i = 0
    if custom_level > 0
      while i < custom_level
        if value != nil or value != 0
          if type == 10
            # 重量は改造するごとに軽量化
            add_value -= customize_percent_float(value,ED::CUSTOM_PERCENT)
          elsif type == 11
            # EPは加算改造でEP減る。
            add_value -= customize_percent(value)
          else
            add_value += customize_percent(value)
          end
        end
        i += 1
      end
    else
      # 改造レベルがマイナス
      while i > custom_level
        if value != nil or value != 0
          if type == 10
            # 重量は改造するごとに軽量化
            add_value += customize_percent_float(value,ED::CUSTOM_PERCENT)
          elsif type == 11
            add_value += customize_percent(value)
          else
            add_value -= customize_percent(value)
          end
        end
        i -= 1
      end
    end
    
    rate = (@price * ED::CUSTOM_MONEY) / 100 unless @price == 0
    if @price == 0
      n = 0
      8.times{|i| n += @params[i]}
      value = n
      rate = value * ED::CUSTOM_PRICE_RATE 
    end
    # (改造能力加算値 × 改造レベル) × 価格0の時のレート
    if type == 10 or type == 11
      # 減算の場合は減らして金額が加算されるように。
      if custom_level > 0
        custom_price = custom_level * rate + (add_value * -1)
      else
        custom_price = custom_level * rate + add_value
        #(add_value * custom_level) * rate
      end
    else
      if custom_level > 0
        custom_price = custom_level * rate + add_value
      else
        custom_price = custom_level * rate + (add_value * -1)
      end
    end
    # 価格算出ならここで価格を返す。
    custom_price = Integer(custom_price) # 改造金額を整数に。
    return [custom_price, m_c_l, l_c_l] if price
    
    # 実際のインスタンスに改造後のデータを置き換え
    case type
    when 0
      param += add_value
      @params[type] = param
      text = "<最大HP " + param.to_s + ">"
      # メモ欄を変更後の数値に置き換える。
      @note.gsub!(EQUIP_MHP_PARAM) { text} if $ed_rgss3["ed_equip_over_param"]
      str = @note.scan(EQUIP_MHP_PARAM) 
      if param > 5000 and not str[0]
        # データベース限界500を超える場合は「装備能力限界突破」に対応すべく
        # <攻撃力 550>などとメモ欄に記載する。
        @note += "\r\n"#改行する
        @note += text
      end
    when 1
      param += add_value
      @params[type] = param
      text = "<最大MP " + param.to_s + ">"
      # メモ欄を変更後の数値に置き換える。
      @note.gsub!(EQUIP_MMP_PARAM) { text} if $ed_rgss3["ed_equip_over_param"]
      str = @note.scan(EQUIP_MMP_PARAM) 
      if param > 5000 and not str[0]
        # データベース限界500を超える場合は「装備能力限界突破」に対応すべく
        # <攻撃力 550>などとメモ欄に記載する。
        @note += "\r\n"#改行する
        @note += text
      end
    when 2
      param += add_value
      @params[type] = param
      text = "<攻撃力 " + param.to_s + ">"
      # メモ欄を変更後の数値に置き換える。
      @note.gsub!(EQUIP_ATK_PARAM) { text} if $ed_rgss3["ed_equip_over_param"]
      str = @note.scan(EQUIP_ATK_PARAM) 
      if param > 500 and not str[0]
        # データベース限界500を超える場合は「装備能力限界突破」に対応すべく
        # <攻撃力 550>などとメモ欄に記載する。
        @note += "\r\n"#改行する
        @note += text
      end
    when 3
      param += add_value
      @params[type] = param
      text = "<防御力 " + param.to_s + ">"
      @note.gsub!(EQUIP_DEF_PARAM) { text} if $ed_rgss3["ed_equip_over_param"]
      str = @note.scan(EQUIP_DEF_PARAM) 
      if param > 500 and not str[0]
        # データベース限界500を超える場合は「装備能力限界突破」に対応すべく
        # <攻撃力 550>などとメモ欄に記載する。
        @note += "\r\n"#改行する
        @note += text
      end
    when 4
      param += add_value
      @params[type] = param
      text = "<魔法力 " + param.to_s + ">"
      @note.gsub!(EQUIP_MAT_PARAM) { text} if $ed_rgss3["ed_equip_over_param"]
      str = @note.scan(EQUIP_MAT_PARAM) 
      if param > 500 and not str[0]
        # データベース限界500を超える場合は「装備能力限界突破」に対応すべく
        # <攻撃力 550>などとメモ欄に記載する。
        @note += "\r\n"#改行する
        @note += text
      end
    when 5
      param += add_value
      @params[type] = param
      text = "<魔法防御 " + param.to_s + ">"
      @note.gsub!(EQUIP_MDF_PARAM) { text} if $ed_rgss3["ed_equip_over_param"]
      str = @note.scan(EQUIP_MDF_PARAM) 
      if param > 500 and not str[0]
        # データベース限界500を超える場合は「装備能力限界突破」に対応すべく
        # <攻撃力 550>などとメモ欄に記載する。
        @note += "\r\n"#改行する
        @note += text
      end
    when 6
      param += add_value
      @params[type] = param
      text = "<敏捷性 " + param.to_s + ">"
      # メモ欄を変更後の数値に置き換える。
      @note.gsub!(EQUIP_AGI_PARAM) { text} if $ed_rgss3["ed_equip_over_param"]
      str = @note.scan(EQUIP_AGI_PARAM) 
      if param > 500 and not str[0]
        # データベース限界500を超える場合は「装備能力限界突破」に対応すべく
        # <攻撃力 550>などとメモ欄に記載する。
        @note += "\r\n"#改行する
        @note += text
      end
    when 7
      param += add_value
      @params[type] = param
      text = "<運 " + param.to_s + ">"
      # メモ欄を変更後の数値に置き換える。
      @note.gsub!(EQUIP_LUK_PARAM) { text} if $ed_rgss3["ed_equip_over_param"]
      str = @note.scan(EQUIP_LUK_PARAM) 
      if param > 500 and not str[0]
        # データベース限界500を超える場合は「装備能力限界突破」に対応すべく
        # <攻撃力 550>などとメモ欄に記載する。
        @note += "\r\n"#改行する
        @note += text
      end
      
    when 8
      if $ed_rgss2["ed_weapon_count"]
        # キャッシュ作成とは別にメソッドを作成する。
        # 耐久力
        @durability_max += add_value
      end
    when 9
      if $ed_rgss3["ed_weapon_count"]
        # キャッシュ作成とは別にメソッドを作成する。
        # 武器回数
        @weapon_atk_count_max += add_value
      end
    when 10
      if $ed_rgss3["ed_equip_extension"] and ED::Equip_extension::WEIGHT
        # 上記に同じ。重量
        @equip_weight += add_value
      end
    when 11
      if $ed_rgss3["ed_equip_extension"] and ED::Equip_extension::USE_EP_SYSTEM
        # 上記に同じ。EP
        @__ep_cost += add_value
      end
    end
    
    if $ed_rgss3["ed_weapon_count"]
      # 大破対策用保持配列  
      @save_state_value = Marshal.load(Marshal.dump(@params))     
    end
    
    if $ed_rgss3["ed_equip_extension"] and type != 10
      # 改造による重量加算
      add_weight = customize_percent_float(self.equip_weight,ED::CUSTOM_WEIGHT_RISE)
      @equip_weight += add_weight * custom_level
    end
  
    # 個別の改造ごとに
    @price += custom_price
  end
  #--------------------------------------------------------------------------
  # ● 改造％取得 index : 改造する箇所の能力値(少数)
  #--------------------------------------------------------------------------
  def customize_percent_float(index, value)
    return index if index == 0     # 元から0なら改造しない
    index *= Float(value)
    index /= 100.0
    index += 1.0 if index == 0       # 計算結果で0なら1加算する。
    return index.roundf(1)
  end
  #--------------------------------------------------------------------------
  # ● 改造％取得 index : 改造する箇所の能力値(整数)
  #--------------------------------------------------------------------------
  def customize_percent(index)
    return index if index == 0     # 元から0なら改造しない
    index *= ED::CUSTOM_PERCENT
    index /= 100
    index += 1 if index == 0       # 計算結果で0なら1加算する。
    return index    
  end
  end
end
#==============================================================================
# ■ Game_Party
#------------------------------------------------------------------------------
# 　パーティを扱うクラスです。ゴールドやアイテムなどの情報が含まれます。このク
# ラスのインスタンスは $game_party で参照されます。
#==============================================================================

class Game_Party < Game_Unit
  include ED
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias ed_custom_equips_initialize initialize
  def initialize
    ed_custom_equips_initialize
    customize_exp_initialize
  end
  #--------------------------------------------------------------------------
  # ● 装備改造禁止部位の配列
  #--------------------------------------------------------------------------
  def false_equip_type
    return ED::FALSE_CUSTOM_WEAPON + ED::FALSE_CUSTOM_ARMOR
  end
  #--------------------------------------------------------------------------
  # ● 改造経験値制の初期設定
  #--------------------------------------------------------------------------
  def customize_exp_initialize
    @customize_exp = 0
    @customize_exp_array = []
    @customize_exp_level = 0
    case ED::CUSTOMIZE_EXP_MODE
    
    when 0 # 固定制
      @customize_exp_array[0] = ED::CUSTOMIZE_EXP_NUMBER
      for i in 1..ED::CUSTOM_LEVEL
        @customize_exp_array[i] = 
        @customize_exp_array[i-1] + (ED::CUSTOMIZE_EXP_NUMBER) * (i + 1)
      end
    when 1 # 任意配列
      @customize_exp_array = ED::CUSTOMIZE_EXP_NUMBER_ARRAY
    end
  end
  #--------------------------------------------------------------------------
  # ● 改造経験値制の現在のレベル取得
  #--------------------------------------------------------------------------
  def customize_exp_level
    return @customize_exp_level
  end
  #--------------------------------------------------------------------------
  # ● 改造経験値制の経験値取得
  #--------------------------------------------------------------------------
  def customize_exp
    return @customize_exp
  end
  #--------------------------------------------------------------------------
  # ● 改造経験値制の次の経験値取得
  #--------------------------------------------------------------------------
  def customize_exp_next
    # 次の経験値
    next_level = @customize_exp_array[@customize_exp_level + 1] == nil ? 
    0 : @customize_exp_array[@customize_exp_level]
    return next_level
  end
  #--------------------------------------------------------------------------
  # ● 改造経験値制の経験値加算 original_item : 改造元装備
  #--------------------------------------------------------------------------
  def add_customize_exp(original_item = nil, type = nil)
    # 固定加算「1」
    @customize_exp += 1
    # 改造元装備が nil でないのと、改造レベル加算が有効の場合
    unless original_item == nil and not ED::CUSTOMIZE_EXP_ADD
      # 装備が武器か防具の場合
      if original_item.is_a?(RPG::Weapon) or original_item.is_a?(RPG::Armor)
        # 改造レベルを経験値に加算
        if $ed_rgss2["ed_weapon_count"]
          c_level = original_item.customize_level[type]
        else
          c_level = original_item.customize_level == nil ? 
          0 : original_item.customize_level
        end
        @customize_exp += c_level
      end
    end

# このループ処理は2以上のレベルアップに対応するため
    loop do
      # 次のレベル取得
      next_level = @customize_exp_array[@customize_exp_level] == nil ? 
      0 : @customize_exp_array[@customize_exp_level]
      
      # 現在の経験値が次の経験値よりも大きい場合
      # 次のレベルが最大でない。現在レベルが装備改造最大レベルよりも小さい場合
      if @customize_exp >= next_level and next_level > 0 and 
        @customize_exp_level < ED::CUSTOM_LEVEL
        # 現在のレベルが改造最大レベルと同じなら処理を行なわない。
        Audio.se_play(ED::CUSTOMIZE_LEVEL_UP_SE,100,100) 
        @customize_exp_level += 1
      else
        break
      end
    end
  end
end
#==============================================================================
# ■ Game_Interpreter
#------------------------------------------------------------------------------
# 　イベントコマンドを実行するインタプリタです。このクラスは Game_Map クラス、
# Game_Troop クラス、Game_Event クラスの内部で使用されます。
#==============================================================================
class Game_Interpreter
  #--------------------------------------------------------------------------
  # ● 装備改造シーンの遷移処理
  #--------------------------------------------------------------------------
  def command_custom_eqiup
    return if $game_party.in_battle
    SceneManager.call(Scene_Customize)
    Fiber.yield
  end
end

装備改造システム：window「4月22日更新」

#==============================================================================
#    ☆VXAce RGSS3 「装備改造システム：window」☆
#　　　　　　EnDlEss DREamER
#     URL:http://mitsu-evo.6.ql.bz/
#     製作者 mitsu-evo
#     Last:2014/4/22
#　　 装備を改造することが出来る。
#     ▼ 「設定」「base」「window」「scene」の順に導入。
#==============================================================================

#==============================================================================
# ■ Window_Base
#------------------------------------------------------------------------------
# 　ゲーム中の全てのウィンドウのスーパークラスです。
#==============================================================================

class Window_Base < Window
  #--------------------------------------------------------------------------
  # ● アイテムパラメーター名の変更
  #--------------------------------------------------------------------------
  def params_text_short(param_id)
    case param_id
    when 0#"最大HP"
      str = "MHP"
    when 1#"最大MP"
      str = "MMP"
    when 2#"攻撃力"
      str = "ATK"
    when 3#"防御力" 
      str = "DEF"
    when 4#"魔法力" 
      str = "MAT"
    when 5#"魔法防御" 
      str = "MDF"
    when 6#"敏捷性" 
      str = "AGI"
    when 7#"運"
      str = "LUC"
    end
    return str
  end
end

#==============================================================================
# ■ Window_CustomizeNumber
#------------------------------------------------------------------------------
# 　装備改造画面で、改造レベルを入力するウィンドウです。
#==============================================================================

class Window_CustomizeNumber < Window_ShopNumber
  attr_reader   :status_window          # ステータスウィンドウ
  attr_reader   :command_window         # コマンドウィンドウ
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize(x, y, width, height)
    @width = width
    super(x, y, height)
    @item = nil
    @max = 1
    @price = 0
    @number = 1
    @currency_unit = Vocab::currency_unit
  end
  #--------------------------------------------------------------------------
  # ● ウィンドウ幅の取得
  #--------------------------------------------------------------------------
  def window_width
    return @width
  end
  #--------------------------------------------------------------------------
  # ● アイテムの取得
  #--------------------------------------------------------------------------
  def item
    @item
  end
  #--------------------------------------------------------------------------
  # ● 数値入力価格取得
  #--------------------------------------------------------------------------
  def price
    return @price
  end
  #--------------------------------------------------------------------------
  # ● ステータスウィンドウの設定
  #--------------------------------------------------------------------------
  def status_window=(status_window)
    @status_window = status_window
  end
  #--------------------------------------------------------------------------
  # ● 改造コマンドウィンドウの設定
  #--------------------------------------------------------------------------
  def command_window=(command_window)
    @command_window = command_window
  end
  #--------------------------------------------------------------------------
  # ● アイテム、最大個数、価格、通貨単位の設定
  #--------------------------------------------------------------------------
  def set(item, max, currency_unit = nil)
    @item = item
    @max = max
    @price = @price = @item == nil ? 0 : @item.customize_price
    @currency_unit = currency_unit if currency_unit
    @number = 1
    individual_customize
    refresh
  end
  #--------------------------------------------------------------------------
  # ● 新しいアイテムを改造して改造後のステータスを取得
  #--------------------------------------------------------------------------
  def individual_customize
    # 個数変更時に改造して改造後のアイテムを渡す。
    index = @command_window.index == nil ? 0 : @command_window.index
    @item.individual_customize(index, @number)
    @status_window.set_new_item(@item)
  end
  #--------------------------------------------------------------------------
  # ● 個数の描画
  #--------------------------------------------------------------------------
  def draw_number
    change_color(normal_color)
    draw_text(cursor_x - 28, item_y + line_height, 22, line_height, "×")
    draw_text(cursor_x, item_y + line_height, cursor_width - 4, line_height, @number, 2)
  end
  #--------------------------------------------------------------------------
  # ● 鍛冶レベル表示
  #--------------------------------------------------------------------------
  def draw_customize_exp
    self.contents.font.color = normal_color
    
    next_exp = $game_party.customize_exp_next == 0 ? 
    "--------" : $game_party.customize_exp_next.to_s
    now_exp = $game_party.customize_exp_level ==  ED::CUSTOM_LEVEL ? 
    "--------" : $game_party.customize_exp.to_s
    # 表示文字のrect取得
    size1 = self.contents.text_size(ED::CUSTOMIZE_EXP_LEVEL_TEXT) 
    size2 = self.contents.text_size(ED::CUSTOMIZE_EXP_TEXT)
    size3 = self.contents.text_size(now_exp) 
    size4 = self.contents.text_size(next_exp)
    size5 = self.contents.text_size($game_party.customize_exp_level.to_s)
    # 文字表示
    draw_text(0, 0, size1.width, line_height, ED::CUSTOMIZE_EXP_LEVEL_TEXT)
    draw_text(96, 0, size5.width, line_height, $game_party.customize_exp_level.to_s, 2)
    
    draw_text(0, line_height , size2.width, line_height, ED::CUSTOMIZE_EXP_TEXT)
    draw_text(64, line_height, size3.width, line_height, now_exp, 2)
    draw_text(64 + size3.width + 16, line_height, 20, line_height, " / ", 2)
    draw_text(100 + size3.width + 16, line_height, size4.width, line_height, next_exp, 2)
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  def update
    super
    if active
      last_number = @number
      update_number
      if @number != last_number
        Sound.play_cursor
        individual_customize
        refresh
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  def refresh
    contents.clear
    draw_customize_exp if ED::CUSTOM_EXP_MODE
    draw_item_name(@item, 0, item_y + line_height)
    draw_number
    draw_total_price
  end
  #--------------------------------------------------------------------------
  # ● カーソルの更新
  #--------------------------------------------------------------------------
  def update_cursor
    cursor_rect.set(cursor_x, item_y + line_height, cursor_width, line_height)
  end
end
#==============================================================================
# ■ Window_EquipCustomCommand
#------------------------------------------------------------------------------
# 　改造画面で改造項目を一覧表示するコマンドウィンドウです。
#==============================================================================

class Window_EquipCustomCommand < Window_Command
  #--------------------------------------------------------------------------
  # ● コマンド選択位置の初期化（クラスメソッド）
  #--------------------------------------------------------------------------
  def self.init_command_position
    @@last_command_symbol = nil
  end
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize(x,y)
    super(x,y)
    select_last
  end
  #--------------------------------------------------------------------------
  # ● ウィンドウ幅の取得
  #--------------------------------------------------------------------------
  def window_width
    return 160
  end
  #--------------------------------------------------------------------------
  # ● 表示行数の取得
  #--------------------------------------------------------------------------
  def visible_line_number
    item_max
  end
  #--------------------------------------------------------------------------
  # ● コマンドリストの作成
  #--------------------------------------------------------------------------
  def make_command_list
    add_main_commands
    add_durability_command
    add_weapon_atk_count_command
    if $ed_rgss3["ed_equip_extension"]
      add_equip_weight_command
      add_ep_command
    end
    add_original_commands
  end
  #--------------------------------------------------------------------------
  # ● 主要コマンドをリストに追加
  #--------------------------------------------------------------------------
  def add_main_commands
    add_command(Vocab::param(0), :mhp, main_commands_enabled)
    add_command(Vocab::param(1), :mmp, main_commands_enabled)
    add_command(Vocab::param(2), :atk, main_commands_enabled)
    add_command(Vocab::param(3), :def, main_commands_enabled)
    add_command(Vocab::param(4), :mat, main_commands_enabled)
    add_command(Vocab::param(5), :mdf, main_commands_enabled)
    add_command(Vocab::param(6), :agi, main_commands_enabled)
    add_command(Vocab::param(7), :luk, main_commands_enabled)
  end
  #--------------------------------------------------------------------------
  # ● 耐久力をコマンドリストに追加
  #--------------------------------------------------------------------------
  def add_durability_command
    add_command(Vocab::Equip_Durability, :durability, main_commands_enabled)
  end
  #--------------------------------------------------------------------------
  # ● 攻撃回数をコマンドリストに追加
  #--------------------------------------------------------------------------
  def add_weapon_atk_count_command
    add_command(Vocab::DESCRIPTION_ATK_CNT, :weapon_atk_count, main_commands_enabled)
  end
  #--------------------------------------------------------------------------
  # ● 重量をコマンドリストに追加
  #--------------------------------------------------------------------------
  def add_equip_weight_command
    add_command(ED::Equip_extension::VOCAB_WEIGHT, :equip_weight, main_commands_enabled)
  end
  #--------------------------------------------------------------------------
  # ● EPをコマンドリストに追加
  #--------------------------------------------------------------------------
  def add_ep_command
    add_command(ED::Equip_extension::VOCAB_EP, :ep, main_commands_enabled)
  end
  #--------------------------------------------------------------------------
  # ● 独自コマンドの追加用
  #--------------------------------------------------------------------------
  def add_original_commands
  end
  #--------------------------------------------------------------------------
  # ● 主要コマンドの有効状態を取得
  #--------------------------------------------------------------------------
  def main_commands_enabled
    $game_party.exists
  end
  #--------------------------------------------------------------------------
  # ● 決定ボタンが押されたときの処理
  #--------------------------------------------------------------------------
  def process_ok
    @@last_command_symbol = current_symbol
    super
  end
  #--------------------------------------------------------------------------
  # ● 前回の選択位置を復帰
  #--------------------------------------------------------------------------
  def select_last
    select_symbol(@@last_command_symbol)
  end
end

装備改造システム：scene「4月22日更新」

#==============================================================================
#    ☆VXAce RGSS3 「装備改造システム：scene」☆
#　　　　　　EnDlEss DREamER
#     URL:http://mitsu-evo.6.ql.bz/
#     製作者 mitsu-evo
#     Last:2014/4/22
#　　 装備を改造することが出来る。
#     ▼ 「設定」「base」「window」「scene」の順に導入。
#==============================================================================

#==============================================================================
# ■ Scene_Customize
#------------------------------------------------------------------------------
# 　装備改造の処理を行うクラスです。
#==============================================================================
=begin

=end
class Scene_Customize < Scene_MenuBase
  #--------------------------------------------------------------------------
  # ● 開始処理
  #--------------------------------------------------------------------------
  def start
    super
    Window_EquipCustomCommand::init_command_position
    create_help_window
    create_gold_window
    create_status_window
    create_slot_window
    create_command_window
    create_number_window
    all_windows_refresh
  end
  #--------------------------------------------------------------------------
  # ● スロットウィンドウの作成
  #--------------------------------------------------------------------------
  def create_slot_window
    wx = @status_window.width
    wy = @help_window.height
    ww = Graphics.width - @status_window.width
    @slot_window = Window_EquipSlot.new(wx, wy, ww)
    @slot_window.viewport = @viewport
    @slot_window.help_window = @help_window
    @slot_window.status_window = @status_window
    @slot_window.actor = @actor
    @slot_window.set_handler(:ok,       method(:on_slot_ok))
    @slot_window.set_handler(:cancel,   method(:return_scene))
    @slot_window.activate
    @slot_window.select(0)
  end
  #--------------------------------------------------------------------------
  # ● ステータスウィンドウの作成
  #--------------------------------------------------------------------------
  def create_status_window
    @status_window = Window_Equip_Contents_Custom.new(0, @help_window.height)
    @status_window.viewport = @viewport
  end
  #--------------------------------------------------------------------------
  # ● ゴールドウィンドウの作成
  #--------------------------------------------------------------------------
  def create_gold_window
    @gold_window = Window_Gold.new
    @gold_window.viewport = @viewport
    @gold_window.x = Graphics.width - @gold_window.width
    @gold_window.y = Graphics.height - @gold_window.height
  end
  #--------------------------------------------------------------------------
  # ● 改造レベルウィンドウの作成
  #--------------------------------------------------------------------------
  def create_number_window
    wy = @slot_window.height + @help_window.height
    ww = Graphics.width - @status_window.width
    wh = Graphics.height - 
    (@slot_window.height + @help_window.height + @gold_window.height)
    @number_window = Window_CustomizeNumber.new(@slot_window.x, wy, ww, wh)
    @number_window.set_handler(:ok,      method(:on_number_ok))
    @number_window.set_handler(:cancel, method(:on_number_cancel))
    @number_window.viewport = @viewport
    # ステータスウィンドウにスロットと個数のウィンドウ関連付け
    @number_window.command_window = @command_window
    @number_window.status_window = @status_window
    @status_window.slot_window = @slot_window
    @status_window.number_window = @number_window
    @number_window.hide.deactivate
  end
  #--------------------------------------------------------------------------
  # ● コマンドウィンドウの作成
  #--------------------------------------------------------------------------
  def create_command_window
    @command_window = Window_EquipCustomCommand.new(@slot_window.x, @slot_window.y)
    @command_window.viewport = @viewport
    @command_window.set_handler(:mhp,      method(:on_command_ok))
    @command_window.set_handler(:mmp,      method(:on_command_ok))
    @command_window.set_handler(:atk,      method(:on_command_ok))
    @command_window.set_handler(:def,      method(:on_command_ok))
    @command_window.set_handler(:mdf,      method(:on_command_ok))
    @command_window.set_handler(:agi,      method(:on_command_ok))
    @command_window.set_handler(:luk,      method(:on_command_ok))
    @command_window.set_handler(:durability,      method(:on_command_ok))
    @command_window.set_handler(:weapon_atk_count,    method(:on_command_ok))
    @command_window.set_handler(:equip_weight,    method(:on_command_ok))
    @command_window.set_handler(:ep,       method(:on_command_ok))
    @command_window.set_handler(:cancel, method(:on_command_cancel))
    @command_window.select(0)
    @command_window.hide.deactivate
  end
  #--------------------------------------------------------------------------
  # ● 全ウィンドウのリフレッシュ
  #--------------------------------------------------------------------------
  def all_windows_refresh
    @slot_window.refresh
    @status_window.refresh
    @gold_window.refresh
    #@number_window.refresh
    #@command_window.refresh
  end
  #--------------------------------------------------------------------------
  # ● スロット［決定］
  #--------------------------------------------------------------------------
  def on_slot_ok
    item = @slot_window.item
    unless item
      Sound.play_buzzer
      @slot_window.activate
      return
    end
    false_equip_type = $game_party.false_equip_type
    type = @actor.equip_type[@slot_window.index]
    if false_equip_type.include?(type)
      # 禁止部位が選択されている場合は戻る。
      Sound.play_buzzer
      @slot_window.activate
      return
    end
    @command_window.show.activate
    @command_window.select(0)
  end
  #--------------------------------------------------------------------------
  # ● 所持金の取得
  #--------------------------------------------------------------------------
  def money
    @gold_window.value
  end
  #--------------------------------------------------------------------------
  # ● 通貨単位の取得
  #--------------------------------------------------------------------------
  def currency_unit
    @gold_window.currency_unit
  end
  #--------------------------------------------------------------------------
  # ● コマンド
  #--------------------------------------------------------------------------
  def on_command_ok
    item = @slot_window.item
    return Sound.play_buzzer unless item
    number_window_max_lower(item)
    @command_window.deactivate
    @number_window.show.activate
  end
  #--------------------------------------------------------------------------
  # ● コマンド　キャンセル
  #--------------------------------------------------------------------------
  def on_command_cancel
    @command_window.unselect
    @command_window.hide.deactivate
    @slot_window.activate
  end
  #--------------------------------------------------------------------------
  # ● 改造の実行
  #--------------------------------------------------------------------------
  def do_custom(number)
    item = @slot_window.item
    price = @number_window.price
    return Sound.play_buzzer unless item
    return unless $game_party.gold > price
    $game_party.lose_gold(price)
    item.individual_customize(@command_window.index, number)
  end
  #--------------------------------------------------------------------------
  # ● 個数入力［決定］
  #--------------------------------------------------------------------------
  def on_number_ok
    item = @slot_window.item
    index = @command_window.index
    if item.customize_level[index] >= item.customize_level_max or 
      not_custom_param(item, index)
      # 改造レベルが最大か改造部位のパラメーターが0なら改造不可能。
      Sound.play_buzzer
      on_number_cancel
      return
    end
    Sound.play_shop
    do_custom(@number_window.number)
    end_number_input
    @status_window.set_new_item(nil)
    clear_window
  end
  #--------------------------------------------------------------------------
  # ● 改造装備の指定項目がデフォルトなら改造不可(0や耐久力9999999など)
  #--------------------------------------------------------------------------
  def not_custom_param(item,index)
    case index
    when 0..7 # 純正
      return item.params[index] == 0
    when 8    # 耐久力
      return item.durability_max == 9999999
    when 9    # 武器回数
      return item.weapon_atk_count_max == 999
    when 10
      if $ed_rgss3["ed_equip_extension"] and ED::Equip_extension::USE_WEIGHT_SYSTEM
        return item.equip_weight <= ED::FORBID_CUSTOM_WEIGHT
      else
        return false
      end
    when 11
      if $ed_rgss3["ed_equip_extension"] and ED::Equip_extension::USE_EP_SYSTEM
        return item.ep_cost == ED::Equip_extension::DEFAULT_EP_COST
      else
        return false
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 個数入力［キャンセル］
  #--------------------------------------------------------------------------
  def on_number_cancel
    Sound.play_cancel
    @number_window.unselect
    @number_window.hide.deactivate
    @command_window.show.activate
    @status_window.set_new_item(nil)
  end
  #--------------------------------------------------------------------------
  # ● 個数入力の終了
  #--------------------------------------------------------------------------
  def end_number_input
    @number_window.unselect
    @number_window.hide.deactivate
    on_command_cancel
  end
  #--------------------------------------------------------------------------
  # ● 数値入力ウィンドウの現在装備に対する上限下限設定
  #--------------------------------------------------------------------------
  def number_window_max_lower(item)
    @status_window.item
    temp_item = ED::item_copy(item)
    ary = temp_item.individual_customize(@command_window.index,0,true)
    now_lv = temp_item.customize_level
    now_lv_max = temp_item.customize_level_max
    # 装備アイテムの現在レベルからの上限取得
    max = ary[1]
    # 装備アイテムの現在レベルからの下限取得
    low = ary[2]
    low = 0 if now_lv == low
    
    if ED::CUSTOM_EXP_MODE
      # 改造レベルは「現在鍛冶レベル±1」まで。
      l_max = $game_party.customize_exp_level == now_lv_max ? 
      now_lv_max : $game_party.customize_exp_level + 1
      # 上限が鍛冶レベル上限より大きい場合は鍛冶上限
      max = l_max if max > l_max #and now_lv > 0
      # 下限は上限のマイナス値
      low = max * -1
    end
    # 個数入力ウィンドウへのアイテムデータの渡し。
    @number_window.set(temp_item,max)
    @status_window.set_new_item(temp_item)
    all_windows_refresh
  end
  #--------------------------------------------------------------------------
  # ● ウィンドウの内容をクリア
  #--------------------------------------------------------------------------
  def clear_window
    @number_window.contents.clear
    @status_window.contents.clear
    all_windows_refresh
  end
  #--------------------------------------------------------------------------
  # ● アクターの切り替え
  #--------------------------------------------------------------------------
  def on_actor_change
    #@status_window.actor = @actor
    @slot_window.actor = @actor
    @slot_window.activate
  end
end

テンプレートのpondt