ホーム
>
RPGツクール
>
テクニック集
>
XP一覧
>
テクニック

スキル習得装備

EquipLearnSkill

概要

Summary

装備時にスキルを習得する装備品を作成します。
≪FF9アビリティ制≫も再現することができます。

↑目次

更新履歴

History

2008/09/06

スクリプトの組み合わせによって起動時に落ちるバグを修正？

2007/09/20

戦闘終了時に落ちることがあるバグを修正。

2007/08/08

獲得APが 0 のスキルをAPビューアに表示する機能を追加。

2007/05/28

[RPG::Enemy]クラスを修正。(≪盗む≫に適応)

2007/01/28

装備品で習得したスキルを条件分岐で使用できるように設定。

2006/10/30

≪リザルト画面２≫に適応。

2006/07/09

APが溜まるまでスキルを使用不可能にする設定を追加。

2006/03/27

リファクタリング。

2005/07/18

「除外スキル」を追加。

2005/07/10

「APビューア」を追加。

2005/04/23

他サイトとの併用性向上。

AP敵名指定の問題を修正。

2005/04/16

APの敵名指定に対応。

他サイトとの併用性向上。

2005/04/04

除外装備品設定機能を追加。

2005/03/27

≪装備拡張≫の変更に適応。

2005/03/26

≪装備拡張≫の変更に適応。

2005/03/25

同一スキルを習得する装備品を複数装備すると、スキルが重複表示されるバグを修正。

2005/03/12

≪FF9アビリティ制≫を再現。

2005/03/01

≪装備拡張≫に適応。

2004/12/30

≪装備欄増加≫未導入の場合、正常に動作しないバグを修正。

2004/12/17

≪基本スクリプト≫未導入の場合、未修得スキルが使用できないバグを修正。

2004/11/06

新規作成。

↑目次

スクリプト

Script

#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
#_/    ◆ スキル習得装備 - KGC_EquipLearnSkill ◆
#_/    ◇ Last update : 2008/09/06 ◇
#_/----------------------------------------------------------------------------
#_/  スキルを習得する装備品を作成します。
#_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/

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

module KGC
  # ◆習得スキルID省略時、判定に使用する能力値
  #  0:腕力+  1:器用さ+  2:素早さ+  3:魔力+
  ELS_SKILL_ID_PARAM = 0
  # ◆APのデフォルト値
  #  所持APを指定しなかったエネミーのAP。
  ELS_AP_DEFAULT = 1
  # ◆装備しただけでは習得しない
  #   true にすると、APが溜まるまでスキルを使用できない。
  ELS_NEED_AP_FULL = false

# ◆スキル習得に必要なAP
  #  配列の添字がスキルIDと対応。
  #  (指定しなかったスキルは、APを溜めても習得不可能)
  ELS_NEED_AP = []

ELS_NEED_AP[32] = 70
  #  ↑<例>ID:32 のスキル習得に必要なAPを 70 に設定

# ◆APビューア(獲得AP一覧)を使用
  ELS_USE_AP_VIEWER = true
  # ◆マスター(完全習得)したスキルのAP欄
  ELS_MASTER_SKILL = "- MASTER -"
  # ◆獲得APが 0 のスキルもAPビューアに表示
  ELS_SHOW_AP0_SKILL = true

# ◆除外武器配列
  #  配列の添字がアクターIDと対応。
  #  習得装備から除外する武器IDを配列に格納。
  ELS_EXCLUDE_WEAPONS = []
  # ELS_EXCLUDE_WEAPONS[1] = [50, 70]
  #  ↑<例>アルシェスは、武器ID 50 と 70 のスキルを習得できない。
  # ◆除外防具配列
  #  指定方法は↑と同じ。
  ELS_EXCLUDE_ARMORS = []
  # ◆除外スキル配列
  #  配列の添字がアクターIDと対応。
  #  装備では習得不可能にするスキルIDを配列に格納。
  ELS_EXCLUDE_SKILLS = []
  # ELS_EXCLUDE_SKILLS[1] = [30]
  #  ↑<例>アルシェスは、スキルID 30 を装備品で習得することはできない。
end

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

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

if $game_special_elements == nil
  $game_special_elements = {}
  $data_system = load_data("Data/System.rxdata")
end
# スキル習得装備属性
$game_special_elements["equip_skill"] = /スキル(?:習|修)得装備(\d+)?(AP[+])?/i

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

#==============================================================================
# ■ RPG::Enemy
#==============================================================================

class RPG::Enemy
  #--------------------------------------------------------------------------
  # ● 名前取得
  #--------------------------------------------------------------------------
  alias name_KGC_EquipLearnSkill name unless $@
  def name
    return name_KGC_EquipLearnSkill.gsub(/\[.*\]/) {""}
  end
  #--------------------------------------------------------------------------
  # ● オリジナル名取得
  #--------------------------------------------------------------------------
  def original_name
    return @name
  end
  #--------------------------------------------------------------------------
  # ● 所持AP取得
  #--------------------------------------------------------------------------
  def has_ap
    return (original_name =~ /\[AP\s*(\d+)\]/i) ? $1.to_i : KGC::ELS_AP_DEFAULT
  end
end

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

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

class Game_Actor < Game_Battler
  #--------------------------------------------------------------------------
  # ● AP 取得
  #     id : スキルID
  #--------------------------------------------------------------------------
  def ap(id)
    @ap = [] if @ap == nil
    @ap[id] = 0 if @ap[id] == nil
    return @ap[id]
  end
  #--------------------------------------------------------------------------
  # ● AP 加算
  #     id    : スキルID
  #     value : 加算量
  #--------------------------------------------------------------------------
  def add_ap(id, value)
    @ap = [] if @ap == nil
    @ap[id] = 0 if @ap[id] == nil
    @ap[id] += value
  end
  #--------------------------------------------------------------------------
  # ● 習得スキル取得
  #--------------------------------------------------------------------------
  alias skills_KGC_EquipLearnSkill skills
  def skills
    # 全習得スキルを返す
    return (skills_KGC_EquipLearnSkill | get_equip_learn_skills).sort
  end
  #--------------------------------------------------------------------------
  # ● 習得済みスキルのみを取得
  #--------------------------------------------------------------------------
  if method_defined?(:learned_skills) && !defined?(LEARNED_SKILLS_KGC_ELS)
    alias learned_skills_KGC_EquipLearnSkill learned_skills
  else
    LEARNED_SKILLS_KGC_ELS = true
  end
  def learned_skills
    # 習得済みスキルを取得
    return_skills = nil
    if defined?(LEARNED_SKILLS_KGC_ELS)
      return_skills = @skills
    else
      return_skills = learned_skills_KGC_EquipLearnSkill
    end
    # AP蓄積済みスキルを追加
    return (return_skills | get_full_ap_skills).sort
  end
  #--------------------------------------------------------------------------
  # ● AP蓄積済みのスキルを取得
  #--------------------------------------------------------------------------
  def get_full_ap_skills
    return_skills = []
    (1...$data_skills.size).each { |i|
      if ap_full?(i)
        return_skills << i
      end
    }
    return return_skills
  end
  #--------------------------------------------------------------------------
  # ● 装備品習得スキル取得
  #--------------------------------------------------------------------------
  def get_equip_learn_skills(all = false)
    return_skills = []
    # 装備品を取得
    weapons = self.equip_weapon_list
    armors = self.equip_armor_list
    # 装備品から習得スキルを取得
    return_skills |=
      get_equipment_skills(weapons, all) | get_equipment_skills(armors, all)
    # AP蓄積済みスキルを追加
    return (return_skills | get_full_ap_skills).sort
  end
  #--------------------------------------------------------------------------
  # ● AP蓄積済み判定
  #--------------------------------------------------------------------------
  def ap_full?(skill_id)
    return KGC::ELS_NEED_AP[skill_id] != nil &&
      self.ap(skill_id) >= KGC::ELS_NEED_AP[skill_id]
  end
  unless $imported["EquipExtension"]
  #--------------------------------------------------------------------------
  # ● 武器リスト取得
  #--------------------------------------------------------------------------
  def equip_weapon_list
    return [$data_weapons[@weapon_id]]
  end
  #--------------------------------------------------------------------------
  # ● 防具リスト取得
  #--------------------------------------------------------------------------
  def equip_armor_list
    armors = []
    (1...5).each { |i|
      armors << $data_armors[eval("@armor#{i}_id")]
    }
    return armors.compact
  end
  end
  #--------------------------------------------------------------------------
  # ● 装備品の習得スキル取得
  #     equipments : 判定装備リスト
  #--------------------------------------------------------------------------
  def get_equipment_skills(equipments, all = false)
    return_skills = []
    equipments.each { |equipment|
      if els_can_learn?(equipment)
        case equipment
        when RPG::Weapon
          elements = equipment.element_set
        when RPG::Armor
          elements = equipment.guard_element_set
        end
        # 習得スキルを判定
        elements.each { |element|
          if $game_special_elements["equip_skill"] =~
              $data_system.elements[element]
            els_id = ($1 == nil ? get_equip_skill_id(equipment) : $1.to_i)
            if KGC::ELS_EXCLUDE_SKILLS[self.id] == nil ||
                !KGC::ELS_EXCLUDE_SKILLS[self.id].include?(els_id)
              if !all && KGC::ELS_NEED_AP_FULL
                if KGC::ELS_NEED_AP[els_id] == nil || ap_full?(els_id)
                  return_skills << els_id
                end
              else
                return_skills << els_id
              end
            end
          end
        }
      end
    }
    return return_skills
  end
  #--------------------------------------------------------------------------
  # ● 装備品の習得スキルID取得
  #     equipment : 判定装備
  #--------------------------------------------------------------------------
  def get_equip_skill_id(equipment)
    case KGC::ELS_SKILL_ID_PARAM
    when 0
      els_id = equipment.str_plus
    when 1
      els_id = equipment.dex_plus
    when 2
      els_id = equipment.agi_plus
    when 3
      els_id = equipment.int_plus
    end
    return els_id
  end
  private :get_equip_skill_id
  #--------------------------------------------------------------------------
  # ● 習得可否判定
  #     equipment : 判定装備
  #--------------------------------------------------------------------------
  def els_can_learn?(equipment)
    case equipment
    when RPG::Weapon
      if KGC::ELS_EXCLUDE_WEAPONS[self.id] == nil ||
          !KGC::ELS_EXCLUDE_WEAPONS[self.id].include?(equipment.id)
        return true
      end
    when RPG::Armor
      if KGC::ELS_EXCLUDE_ARMORS[self.id] == nil ||
          !KGC::ELS_EXCLUDE_ARMORS[self.id].include?(equipment.id)
        return true
      end
    end
    return false
  end
  #--------------------------------------------------------------------------
  # ● スキルの使用可能判定
  #     skill_id : スキル ID
  #--------------------------------------------------------------------------
  def skill_can_use?(skill_id)
    return super
  end
  #--------------------------------------------------------------------------
  # ● スキルの習得済み判定
  #     skill_id : スキル ID
  #--------------------------------------------------------------------------
  def skill_learn?(skill_id)
    return skills.include?(skill_id)
  end
end

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

#==============================================================================
# ■ Game_Enemy
#==============================================================================

class Game_Enemy < Game_Battler
  #--------------------------------------------------------------------------
  # ● 所持AP取得
  #--------------------------------------------------------------------------
  def has_ap
    return $data_enemies[@enemy_id].has_ap
  end
end

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

#==============================================================================
# ■ Window_StatusAP
#------------------------------------------------------------------------------
# 　ステータス画面でAP情報を表示するウィンドウです。
#==============================================================================

if KGC::ELS_USE_AP_VIEWER
class Window_StatusAP < Window_Base
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #     actor : アクター
  #--------------------------------------------------------------------------
  def initialize(actor)
    super(0, 0, 640, 480)
    self.back_opacity = 224
    @actor = actor
    refresh
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  def refresh
    count = 0
    (1...$data_skills.size).each { |i|
      if show_skill?(i)
        count += 1
      end
    }
    self.contents = Bitmap.new(608, 32 * count + 32)
    # AP情報描画
    self.contents.font.color = system_color
    self.contents.draw_text(0, 0, 256, 32, "スキル", 1)
    self.contents.draw_text(256, 0, 160, 32, "取得AP/必要AP")
    return if KGC::ELS_NEED_AP.size == 0
    y = 32
    (1...$data_skills.size).each { |i|
      unless show_skill?(i)
        next
      end
      skill = $data_skills[i]
      self.contents.font.color = normal_color
      icon = RPG::Cache.icon(skill.icon_name)
      self.contents.blt(4, y + 4, icon, icon.rect)
      self.contents.draw_text(32, y, 224, 32, skill.name)
      if @actor.ap(i) < KGC::ELS_NEED_AP[i]
        self.contents.font.color = normal_color
        self.contents.draw_text(256, y, 160, 32,
          sprintf("%6d/%6d", @actor.ap(i), KGC::ELS_NEED_AP[i]))
      else
        self.contents.font.color = text_color(6)
        self.contents.draw_text(256, y, 160, 32, KGC::ELS_MASTER_SKILL)
      end
      y += 32
    }
  end
  #--------------------------------------------------------------------------
  # ● スキルを表示するか判定
  #--------------------------------------------------------------------------
  def show_skill?(skill_id)
    result = KGC::ELS_NEED_AP[skill_id] != nil
    if !KGC::ELS_SHOW_AP0_SKILL && result
      result &= @actor.ap(skill_id) > 0
    end
    return result
  end
end
end

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

#==============================================================================
# ■ Scene_Status
#==============================================================================

if KGC::ELS_USE_AP_VIEWER
class Scene_Status
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #     actor_index : アクターインデックス
  #--------------------------------------------------------------------------
  alias initialize_KGC_EquipLearnSkill initialize
  def initialize(actor_index = 0, equip_index = 0)
    initialize_KGC_EquipLearnSkill(actor_index, equip_index)

@view_ap = false
  end
  #--------------------------------------------------------------------------
  # ● メイン処理
  #--------------------------------------------------------------------------
  alias main_KGC_EquipLearnSkill main
  def main
    # アクターを取得
    @actor = $game_party.actors[@actor_index]
    # APビューアを作成
    @ap_window = Window_StatusAP.new(@actor)
    @ap_window.z = 2000
    @ap_window.visible = false

main_KGC_EquipLearnSkill

@ap_window.dispose
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  alias update_KGC_EquipLearnSkill update
  def update
    @ap_window.update
    # A ボタンが押された場合
    if Input.trigger?(Input::A)
      # カーソル SE を演奏
      $game_system.se_play($data_system.cursor_se)
      # ウィンドウ切り替え
      Graphics.freeze
      @view_ap = !@view_ap
      @ap_window.visible = @ap_window.active = @view_ap
      Graphics.transition
      return
    end
    # C ボタンが押された場合
    if Input.trigger?(Input::C) && $imported["StatusAlter"]
      @view_ap = false
      @ap_window.visible = @ap_window.active = false
    end
    if @ap_window.active
      # スクロール最大位置を計算
      scroll_max = [@ap_window.contents.height - (@ap_window.height - 32), 0].max
      if Input.repeat?(Input::UP)
        @ap_window.oy = [@ap_window.oy - 32, 0].max
      elsif Input.repeat?(Input::DOWN)
        @ap_window.oy = [@ap_window.oy + 32, scroll_max].min
      elsif Input.repeat?(Input::L)
        @ap_window.oy = [@ap_window.oy - (@ap_window.height - 32), 0].max
      elsif Input.repeat?(Input::R)
        @ap_window.oy = [@ap_window.oy + (@ap_window.height - 32), scroll_max].min
      end
    end

update_KGC_EquipLearnSkill
  end
end
end

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

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

class Scene_Battle
  #--------------------------------------------------------------------------
  # ● アフターバトルフェーズ開始
  #--------------------------------------------------------------------------
  alias start_phase5_KGC_EquipLearnSkill start_phase5
  def start_phase5
    start_phase5_KGC_EquipLearnSkill

# AP獲得処理(経験値を獲得できない場合は無視)
    actors = $game_party.actors.find_all { |actor|
      actor.exist? && !actor.cant_get_exp?
    }
    @got_ap = 0
    $game_troop.enemies.each { |enemy|
      unless enemy.hidden
        @got_ap += enemy.has_ap
      end
    }
    actors.each { |actor|
      skills = actor.get_equip_learn_skills(true)
      skills.each { |i|
        actor.add_ap(i, @got_ap)
      }
    }
  end
end

↑目次

使用法

Usage

簡易版
属性スキル習得装備を作成します。
これを装備に設定し、[腕力+]に装備時に習得するスキルIDを入力します。

直接指定版
属性スキル習得装備{ID}を作成します。
これを装備に設定すると、IDに指定したIDのスキルを習得します。
<例>ID:40のスキル → スキル習得装備40
複数の属性を付加すれば、同時に複数のスキルを習得させることも可能です。

ちなみに、「習得」「修得」はどちらでもOKです。

除外装備品

カスタマイズ項目の

# ◆除外武器配列
ELS_EXCLUDE_WEAPONS = []
# ◆除外防具配列
ELS_EXCLUDE_ARMORS = []
# ◆除外スキル配列
ELS_EXCLUDE_SKILLS = []

ここを書き換えると、アクター毎に習得装備から除外する装備品・スキルを設定できます。
この下にアクターIDを添字とした、除外する装備・スキルIDの配列を追加してください。
例えば「アルシェス(ID:1)は武器ID:50と70の武器に付加されたスキルを習得できない」という設定の場合、

ELS_EXCLUDE_WEAPONS[1] = [50, 70]

と指定します。

FF9アビリティ制

使用前にカスタマイズ項目を書き換えます。

ELS_NEED_AP = []

のすぐ下に、

ELS_NEED_AP[id] = [...]

を追加し、スキルを習得するために必要なAPを入力します。
例えば「スキルID:23の必要AP40」と設定する場合、

ELS_NEED_AP[23] = 40

となります。

敵の所持APは、敵の名前に[APx]を追加することで設定します。
<例>　リザードマン[AP3]
ここで指定しなかったエネミーのAPは

ELS_AP_DEFAULT = x

で指定した値になります。

あとはスキル習得用の属性の末尾に「AP+」を付けます。
（<簡易版の例>スキル習得装備AP+ <直接指定版の例>スキル習得装備40AP+）
この属性をセットした装備品を付けていると、装備によって習得しているスキルにAPを加算します。
APが設定値を超えると、以後は装備品を外してもスキルを使用できます。

簡易版の場合、装備時に[腕力+]等の効果もそのまま表れます。
腕力を上げたくない場合は、能力値取得処理を書き換えてください。(サポート外)

APビューア

APビューアは、今までに溜めたAPの一覧を表示する機能です。
カスタマイズ項目の、

# ◆APビューア(獲得AP一覧)を使用
ELS_USE_AP_VIEWER = true

を書き換えると、APビューアの使用を切り替えることができます。
APビューアは、ステータス画面でAボタンを押すと開くことができます。

↑目次

スキル習得装備

EquipLearnSkill

目次

Outline

概要

Summary

更新履歴

History

スクリプト

Script

使用法

Usage