アイテム鑑定

概要

アイテムを鑑定する機能を追加します。

作成者

mm_simu 様

更新履歴

2005/07/07

スクリプトを更新。

2005/07/01

スクリプトを更新。

2005/06/14

新規掲載。

スクリプト

新規セクションにコピーしてご利用ください。

#==============================================================================
# ■ アイテム鑑定
#==============================================================================

module JUDGEMENT
#==============================================================================
# ● カスタマイズ項目
#==============================================================================
  
  # 鑑定可能クラス ID
  JUDGE_CLASS_ID = [1,2]
  
  # 属性で鑑定アイテムを指定したい場合 true
  # 不要属性計算排除 [KGC_RemoveElements] に対応。
  ELEMENT_JUDGE = false
  
  # ★★ 属性指定の場合 ★★
  if ELEMENT_JUDGE
    # 使用する属性名
    ELEMENT_NAME = "鑑定アイテム"
    
  # ★★ 直接指定の場合 ★★
  else
    # 鑑定用アイテム ID
    ITEM_ID = [1,2,3,4,5]
    # 鑑定用武器 ID
    WEAPON_ID = [1,2]
    # 鑑定用防具 ID
    ARMOR_ID = []
  end

# 鑑定前のヘルプ表示を変更する場合 true
  HELP_UNKNOWN = true # false
  # 鑑定前のヘルプテキスト
  HELP_UNKNOWN_DESCRIPTION = "？？？"

# 鑑定前のアイテム使用を不可にする場合 true
  # 使用効果付き武器 [KGC_UsableWeapon] に対応。（多分）
  # 注：メニューのアイテム画面では、問答無用に鑑定コマンドに移行します。
  ITEM_UNKOWN_CANNOT_USE = true # false
  
  # 鑑定時の SE
  # JUDGEMENT_SE = nil とすると決定 SE
  # ""の中身を空にすると演奏しない。
  # 引数については、ヘルプ [RPG::AudioFile] を参照。
  JUDGEMENT_SE = RPG::AudioFile.new("002-System02", 80, 100)
  
  # コモンイベント発動時、判定用スイッチID（0 の場合は無効）
  COMMONEVENT_SWITCH_ID = 0
  # 発動コモンイベント ID（0 の場合は無効）
  COMMONEVENT_ID = 0
  
  # 操作アイテムを格納するイベント変数 ID
  # アイテム種類（0-アイテム 1-武器 2-防具）
  ITEM_TYPE_VARIABLES_ID = 1 # 0 の場合は無効
  # アイテムID
  ITEM_ID_VARIABLES_ID = 2 # 0 の場合は無効  
end

#==============================================================================
# ● データベース拡張
#==============================================================================

class RPG::Item
  def description
    if JUDGEMENT::HELP_UNKNOWN
      if $game_system.judgement_items.include?(self.id) and
        not $game_system.marked_items.include?(self.id)
        return JUDGEMENT::HELP_UNKNOWN_DESCRIPTION
      end
    end
    return @description
  end
end
class RPG::Weapon
  def description
    if JUDGEMENT::HELP_UNKNOWN
      if $game_system.judgement_weapons.include?(@id) and
        not $game_system.marked_weapons.include?(@id)
        return JUDGEMENT::HELP_UNKNOWN_DESCRIPTION
      end
    end
    return @description
  end
end
class RPG::Armor
  def description
    if JUDGEMENT::HELP_UNKNOWN
      if $game_system.judgement_armors.include?(@id) and
        not $game_system.marked_armors.include?(@id)
        return JUDGEMENT::HELP_UNKNOWN_DESCRIPTION
      end
    end
    return @description
  end
end

#==============================================================================
# ■ Game_Party
#------------------------------------------------------------------------------
# 　パーティを扱うクラスです。ゴールドやアイテムなどの情報が含まれます。このク
# ラスのインスタンスは $game_party で参照されます。
#==============================================================================

class Game_Party
  #--------------------------------------------------------------------------
  # ● アイテムの使用可能判定
  #     item_id : アイテム ID
  #--------------------------------------------------------------------------
  alias item_can_use_JUDGEMENT? item_can_use?
  def item_can_use?(item_id)
    if JUDGEMENT::ITEM_UNKOWN_CANNOT_USE
      if $game_system.judgement_items.include?(item_id) and
        not $game_system.marked_items.include?(item_id)
        return false
      end
    end
    item_can_use_JUDGEMENT?(item_id)
  end
end

if $imported != nil and $imported["UsableWeapon"]
  class RPG::Weapon
    #--------------------------------------------------------------------------
    # ● 武器使用可否判定
    #--------------------------------------------------------------------------
    def usable?
      if JUDGEMENT::ITEM_UNKOWN_CANNOT_USE
        if $game_system.judgement_weapons.include?(@id) and
          not $game_system.marked_weapons.include?(@id)
          return false
        end
      end
      return self.use_item_id > 0 || @element_set.include?($game_special_elements["equipment_usable"])
    end
  end
end

#==============================================================================
# ■ Game_System
#------------------------------------------------------------------------------
# 　システム周りのデータを扱うクラスです。BGM などの管理も行います。このクラス
# のインスタンスは $game_system で参照されます。
#==============================================================================

class Game_System
  #--------------------------------------------------------------------------
  # ● 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_accessor :marked_items
  attr_accessor :marked_weapons
  attr_accessor :marked_armors
  attr_reader   :judgement_items
  attr_reader   :judgement_weapons
  attr_reader   :judgement_armors
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias initialize_JUDGEMENT initialize
  def initialize
    initialize_JUDGEMENT
    @marked_items = []
    @marked_weapons = []
    @marked_armors = []
    judgement_items_setup
  end
  #--------------------------------------------------------------------------
  # ● 鑑定用アイテムのセットアップ
  #--------------------------------------------------------------------------
  def judgement_items_setup
    # 鑑定用アイテム配列を初期化
    @judgement_items = []
    @judgement_weapons = []
    @judgement_armors = []
    # 属性指定の場合
    if JUDGEMENT::ELEMENT_JUDGE
      # 属性 ID を取得
      element_index = $data_system.elements.index(JUDGEMENT::ELEMENT_NAME)
      if element_index != nil
        for item in $data_items
          next if item.nil?
          if item.element_set.include?(element_index)
            @judgement_items.push(item.id)
          end
        end
       for weapon in $data_weapons
          next if weapon.nil?
          if weapon.element_set.include?(element_index)
            @judgement_weapons.push(weapon.id)
          end
        end
        for armor in $data_armors
          next if armor.nil?
          if armor.element_set.include?(element_index)
            @judgement_armors.push(armor.id)
          end
        end
      end
      if $game_special_elements != nil
        $game_special_elements["JUDGEMENT"] = element_index
      end
    # 直接指定の場合
    else
      @judgement_items = JUDGEMENT::ITEM_ID
      @judgement_weapons = JUDGEMENT::WEAPON_ID
      @judgement_armors = JUDGEMENT::ARMOR_ID
    end
  end
end

#==============================================================================
# ■ JUDGEMENT_Window_Command
#------------------------------------------------------------------------------
# 　鑑定時のコマンドウインドウ。
#==============================================================================

=begin
  ※ コマンドの名前は自由に変えられます。
  　 実行内容を移動させる場合は、Scene_Item の操作も
     合わせて変更してください。
=end

class JUDGEMENT_Window_Command < Window_Command
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize(item)
    commands = []
    commands[0] = "使用する"
    commands[1] = "鑑定する"
    commands[2] = "やめる"
    super(160, commands)
    self.x = (640 - self.width) / 2
    self.y = (480 - self.height) / 2
    self.z += 5
    @item = item
  end
  #--------------------------------------------------------------------------
  # ● アイテムの取得
  #--------------------------------------------------------------------------
  def item
    return @item
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  def refresh
    super
    @disabled_index = []
    if JUDGEMENT::ITEM_UNKOWN_CANNOT_USE
      if $imported != nil and $imported["UsableWeapon"]
        case @item
        when RPG::Item, RPG::Weapon
          unless @item.usable?
            disable_item(0)
            @disabled_index.push(0)
          end
        else
          disable_item(0)
          @disabled_index.push(0)
        end
      end
    else
      if @item.is_a?(RPG::Item)
        unless $game_party.item_can_use?(@item.id)
          disable_item(0)
          @disabled_index.push(0)
        end
      else
        disable_item(0)
        @disabled_index.push(0)
      end
    end
    class_id = []
    for i in $game_party.actors
      class_id.push(i.class_id) if i != nil and i.exist?
    end
    for i in JUDGEMENT::JUDGE_CLASS_ID
      if class_id.include?(i)
        return
      end
    end
    disable_item(1)
    @disabled_index.push(1)
  end
  #--------------------------------------------------------------------------
  # ● 無効なインデックスか？
  #--------------------------------------------------------------------------
  def disabled?
    @disabled_index.include?(self.index)
  end
end

#==============================================================================
# ■ Scene_Item
#==============================================================================

=begin
　※ アイテム画面の操作をするクラスです。　
　　 すでに様々なスクリプトで再定義、機能追加をされている可能性が高く、
　　 謎な造作をする場合があります。
=end

class Scene_Item
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  alias update_JUDGEMENT update
  def update
    if @judgement_command != nil
      @judgement_command.update if @judgement_command.active
      update_judgement_command
      return
    end
    update_JUDGEMENT
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新：アイテムウインドウがアクティブの場合
  #--------------------------------------------------------------------------
  alias update_item_JUDGEMENT update_item
  def update_item
    # C ボタンが押された場合
    if Input.trigger?(Input::C)
      # アイテムを取得
      item = @item_window.item
      # データにより分岐
      case item
      # アイテムの場合
      when RPG::Item
        # 鑑定用アイテムに含まれ、鑑定済みのアイテムではない場合
        if $game_system.judgement_items.include?(item.id) and
          not $game_system.marked_items.include?(item.id)
          $game_system.se_play($data_system.decision_se)
          @item_window.active = false
          @judgement_command = JUDGEMENT_Window_Command.new(item)
          return
        end
      # 武器の場合
      when RPG::Weapon
        # 鑑定用武器に含まれ、鑑定済みの武器ではない場合
        if $game_system.judgement_weapons.include?(item.id) and
          not $game_system.marked_weapons.include?(item.id)
          $game_system.se_play($data_system.decision_se)
          @item_window.active = false
          @judgement_command = JUDGEMENT_Window_Command.new(item)
          return
        end
      # 防具の場合
      when RPG::Armor
        # 鑑定用防具に含まれ、鑑定済みの防具ではない場合
        if $game_system.judgement_armors.include?(item.id) and
          not $game_system.marked_armors.include?(item.id)
          $game_system.se_play($data_system.decision_se)
          @item_window.active = false
          @judgement_command = JUDGEMENT_Window_Command.new(item)
          return
        end
      end
    end
    # 元の処理を実行
    update_item_JUDGEMENT
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新：鑑定ウインドウがアクティブの場合
  #--------------------------------------------------------------------------
  def update_judgement_command
    @target_window.update if @target_window.active
    # B ボタンが押された場合
    if Input.trigger?(Input::B)
      # 鑑定ウインドウがアクティブの場合
      if @judgement_command.active
        $game_system.se_play($data_system.cancel_se)
        @judgement_command.dispose
        @judgement_command = nil
        @item_window.active = true
        return
      # ターゲットウインドウがアクティブの場合
      elsif @target_window.active
        $game_system.se_play($data_system.cancel_se)
        @target_window.visible = false
        @target_window.active = false
        @judgement_command.active = true
        return
      end
      return
    end
    # C ボタンが押された場合
    if Input.trigger?(Input::C)
      # 鑑定ウインドウがアクティブの場合
      if @judgement_command.active
        if @judgement_command.disabled?
          $game_system.se_play($data_system.buzzer_se)
          return
        # 無効インデックスでなければ次の操作に移行
        else
          # インデックスにより分岐
          case @judgement_command.index
          when 0 # 使用する
            $game_system.se_play($data_system.decision_se)
            @item = @judgement_command.item
            @judgement_command.active = false
            make_item_target
          when 1 # 鑑定する
            $game_system.se_play($data_system.decision_se)
            @judgement_command.active = false
            @target_window.x = (@item_window.index + 1) % 2 * 304
            @target_window.visible = true
            @target_window.active = true
            @target_window.index = 0
          when 2 # やめる
            $game_system.se_play($data_system.decision_se)
            @judgement_command.dispose
            @judgement_command = nil
            @item_window.active = true
          end
        end
      # ターゲットウインドウがアクティブの場合
      elsif @target_window.active
        # インデックスにより分岐
        case @judgement_command.index
        when 0 # 使用する
          use_item
        when 1 # 鑑定する
          # 鑑定者を取得
          actor = $game_party.actors[@target_window.index]
          # アクターが存在し、鑑定可能なクラスIDに含まれている場合
          if actor.exist? and
            JUDGEMENT::JUDGE_CLASS_ID.include?(actor.class_id)
            # アイテムを取得
            item = @judgement_command.item
            # 鑑定済みのアイテムに追加
            case item
            when RPG::Item
              $game_system.marked_items.push(item.id)
            when RPG::Weapon
              $game_system.marked_weapons.push(item.id)
            when RPG::Armor
              $game_system.marked_armors.push(item.id)
            else
              return
            end
            # 鑑定用の SE を演奏
            se_file = JUDGEMENT::JUDGEMENT_SE
            $game_system.se_play(se_file.is_a?(RPG::AudioFile) ? se_file : $data_system.decision_se)
            # コモンイベント起動判定
            if (JUDGEMENT::COMMONEVENT_SWITCH_ID == 0 or
              $game_switches[JUDGEMENT::COMMONEVENT_SWITCH_ID]) and
              $data_common_events[JUDGEMENT::COMMONEVENT_ID] != nil
              # コモンイベントを取得
              $game_temp.common_event_id = JUDGEMENT::COMMONEVENT_ID
              # 指定があれば、イベント変数にアイテム情報を代入
              if JUDGEMENT::ITEM_TYPE_VARIABLES_ID != 0
                item_type = item.is_a?(RPG::Item) ? 0 : item.is_a?(RPG::Weapon) ? 1 : 2
                $game_variables[JUDGEMENT::ITEM_TYPE_VARIABLES_ID] = item_type
              end
              if JUDGEMENT::ITEM_ID_VARIABLES_ID != 0
                $game_variables[JUDGEMENT::ITEM_ID_VARIABLES_ID] = item.id
              end
              @judgement_command.dispose
              @judgement_command = nil
              $scene = Scene_Map.new
            # 見つからなければアイテムウインドウをアクティブ化
            else
              @target_window.visible = false
              @target_window.active = false
              @judgement_command.dispose
              @judgement_command = nil
              @item_window.refresh
              @item_window.active = true
            end
            return
          # 鑑定者が不適当であればブザー SE を演奏
          else
            $game_system.se_play($data_system.buzzer_se)
            return
          end
        end
      end
      return
    end
  end
  #--------------------------------------------------------------------------
  # ● アイテムの使用：ターゲット作成
  #--------------------------------------------------------------------------
  def make_item_target
    # 効果範囲が味方の場合
    if @item.scope >= 3
      # ターゲットウィンドウをアクティブ化
      @item_window.active = false
      @target_window.x = (@item_window.index + 1) % 2 * 304
      @target_window.visible = true
      @target_window.active = true
      # 効果範囲 (単体/全体) に応じてカーソル位置を設定
      if @item.scope == 4 || @item.scope == 6
        @target_window.index = -1
      else
        @target_window.index = 0
      end
    # 効果範囲が味方以外の場合
    else
      # コモンイベント ID が有効の場合
      if @item.common_event_id > 0
        # コモンイベント呼び出し予約
        $game_temp.common_event_id = @item.common_event_id
        # アイテムの使用時 SE を演奏
        $game_system.se_play(@item.menu_se)
        # 消耗品の場合
        if @item.consumable
          # 使用したアイテムを 1 減らす
          $game_party.lose_item(@item.id, 1)
          # アイテムウィンドウの項目を再描画
          @item_window.draw_item(@item_window.index)
        end
        # マップ画面に切り替え
        $scene = Scene_Map.new
        return
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● アイテムの使用：効果適用
  #--------------------------------------------------------------------------
  def use_item
    # アイテムを使い切った場合
    if $game_party.item_number(@item.id) == 0
      # ブザー SE を演奏
      $game_system.se_play($data_system.buzzer_se)
      return
    end
    # ターゲットが全体の場合
    if @target_window.index == -1
      # パーティ全体にアイテムの使用効果を適用
      used = false
      for i in $game_party.actors
        used |= i.item_effect(@item)
      end
    end
    # ターゲットが単体の場合
    if @target_window.index >= 0
      # ターゲットのアクターにアイテムの使用効果を適用
      target = $game_party.actors[@target_window.index]
      used = target.item_effect(@item)
    end
    # アイテムを使った場合
    if used
      # アイテムの使用時 SE を演奏
      $game_system.se_play(@item.menu_se)
      # 消耗品の場合
      if @item.consumable
        # 使用したアイテムを 1 減らす
        $game_party.lose_item(@item.id, 1)
        # アイテムウィンドウの項目を再描画
        @item_window.draw_item(@item_window.index)
      end
      # ターゲットウィンドウの内容を再作成
      @target_window.refresh
      # 全滅の場合
      if $game_party.all_dead?
        # ゲームオーバー画面に切り替え
        $scene = Scene_Gameover.new
        return
      end
      # コモンイベント ID が有効の場合
      if @item.common_event_id > 0
        # コモンイベント呼び出し予約
        $game_temp.common_event_id = @item.common_event_id
        # マップ画面に切り替え
        $scene = Scene_Map.new
        return
      end
    end
    # アイテムを使わなかった場合
    unless used
      # ブザー SE を演奏
      $game_system.se_play($data_system.buzzer_se)
    end
    return
  end
end

使用法

投稿記事からのコピーです。

ヘルプ表示切り替え、使用可能判定のみの、よくわからない謎ものです。
（こっそり条件でコモンイベント発動とかします）

カスタマイズ項目、使い勝手がかなり悪いやもしれ…ません。