アイテムセグメント(RGSS3) | BMSP(スクリプト)

サイトマップ :

アイテムセグメント(RGSS3)
Ver1.17(2015/09/01)

|前のページへ|

どういったものに需要があるかなど
スクリプト製作の参考にしたいので，
いいね！と思ったスクリプトにクリックお願いします．

web拍手

概要

同じ種類のアイテムでも個別に保持し，セグメントと呼ばれる小分けの単位でアイテムを管理します．

複数選択機能ver1.00以上が必須です．

|ページトップへ|

位置

特に指定はありませんが，再定義が多いのでできるだけ上の方を推奨します

|ページトップへ|

スクリプト

中身をすべてコピーして，ツクールのスクリプトに新たなセクションを作成し，貼り付けてください．

#==============================================================================
# ■ BMSP アイテムセグメント[ITEMSEGMENT] Ver1.17 2015/09/01
#------------------------------------------------------------------------------
# 　アイテムを個別に管理し，小分けにして所持することができます．
#==============================================================================
#------------------------------------------------------------------------------
# ■内容
# アイテムを個別に管理し，セグメントと呼ばれる小分けの単位にしてアイテムを
# 管理します．
# このスクリプトの重きはアイテムを個別に管理することで，
# 単体ではたいしたことはできません．
# このスクリプトをベースにして武器の強化スクリプトなどを簡単に導入できます．
#
# 位置：特に指定はありませんが，再定義が多いのでできるだけ上の方を推奨します
#
# ■必須
# 「BMSP 複数選択機能ver1.00以上」が必須です．
#
# ■使用方法
# スクリプトに丸ごと貼り付けていただければ使用できます。
#
# ●概念
# まずこのスクリプトの概念の説明をします．
# VXAceデフォルトの仕様ではアイテムはアイテムIDごとに個数(整数)で管理されています．
# このスクリプトではアイテム一つ一つを別のオブジェクトとして管理します．
# この一つ一つを拡張アイテムと呼ぶことにします．
# なので，同じアイテムでも一つだけ効果が違ったり，強化したりすることが可能になります．
#
# また，アイテムごとに最大所持数を変更でき，セグメントとよばれるアイテムを
# ひとまとまりにする単位の個数もアイテムごとに指定できます．
# 例えば，最大所持数50，セグメントサイズ10のアイテムAは
# A:10，A:10，A:10，A:10，A:10
# と所持したり
# A:10，A:5，A:6，A:5，A:5，A:8，A:8，A:1
# と所持したりすることができます．
#
# ●セグメントサイズの設定
# 詳細設定から各種セグメントサイズのデフォルトを指定できます．
# また，アイテムごとに設定するにはアイテムのメモ欄に
#   ==セグメントサイズx==
# と記述することでそのアイテムのセグメントサイズはxになります．
# セグメントサイズを1にするとそのアイテムは一つずつ個別に所持します．
#
# ●最大所持数の設定
# 詳細設定から各種最大所持数のデフォルトを指定できます．
# また，アイテムごとに設定するにはアイテムのメモ欄に
#   ==最大所持数x==
# と記述することでそのアイテムの最大所持数はxになります．
# 最大所持数をセグメントサイズの倍数にしておくとアイテムを綺麗にまとめられます．
#
# ●スキルについて
# このスクリプトでは拡張のためにスキルについてもセグメントを導入しています．
# しかし，このスクリプト単体ではスキルの最大所持数やセグメントサイズを変えても
# 利点は特にありません．
#
# ●アイテム画面
# 詳細設定のITEM_SELECT_EXTENDがtrueのとき，アイテム画面にて
# セグメントを選択すると拡張アイテム選択ウインドウが開き，
# セグメント内の任意の拡張アイテムを選択することができます．
# ITEM_SELECT_EXTENDをfalseにするとセグメントを選択すると自動的にセグメント内の
# 先頭のアイテムが選択されます．
# セグメントサイズ1のアイテムのみしか効果に差異をつけないとわかっているような
# 場合ではITEM_SELECT_EXTENDをfalseにしても良いでしょう．
#
# ●デフラグ
# アイテムの追加や売却などで同じ種類のセグメントが無駄に増えてきます．
# このとき詳細設定でDEFLAGをtrueにしておけば「まとめる」コマンドが使用でき，
# セグメント数ができるだけ少なくなるようにまとめることができます．
# この機能には「BMSP 複数選択機能」を使用していて，
# アイテム画面で複数選択ボタンを押すとまとめるためのウインドウが表示されます．
# 「全部まとめる」を選ぶと，選択しているアイテムのセグメントをすべてまとめます．
# 「選んでまとめる」を選ぶと，選択しているアイテムを基準にして同じ種類の
# セグメントを任意個選択し，それらをまとめることができます．
#
# ●アイテムの増減について
# イベントコマンドでアイテムの減少を行うと，
# 対応するセグメント一覧の最初から順番に削除されていきます．
# 
# ●アイテム選択の処理
# イベントコマンド「アイテム選択の処理」は，
# 詳細設定のITEM_SELECT_EXTENDがtrueのとき，選んだ拡張アイテムの
# アイテムオブジェクトが指定した変数に格納されます．
# なので，通常の変数の大小による比較はできなくなるので注意してください．
# なにも選ばなかった場合は通常通り0が格納されます．
# ITEM_SELECT_EXTENDがfalseのときはアイテム選択の処理の挙動はデフォルトと同じです．
# ただしこの場合は選んだアイテムIDしか得られないため，拡張アイテムを直接指定して
# アイテムを減少させたりすることはできなくなります．
#
# ●まとめ売り
# 詳細設定でSHOP_EXTENDをtrueにするとショップ画面での売却を拡張アイテムごとに
# 行うことができます．
# また，複数選択ボタンを押すことでセグメントを一気に指定して
# まとめて売却することができます．
# SHOP_EXTENDがfalseの場合はデフォルトのショップ画面と同じ仕様になり，
# セグメント内のアイテムは先頭から順番に売却されます．
#
# ●VXAceデフォルトの仕様
# 例えば武器だけセグメントサイズを1にして残りのアイテムはデフォルトのままで
# 管理するので，いちいち拡張アイテム選択ウインドウいらないんだけど！
# などのような場合，NEW_SEGMENT，DEFLAG，SHOP_EXTEND，ITEM_SELECT_EXTENDを
# すべてfalseにすることでデフォルトの挙動に近づけることが可能です．
#
# ■注意
# このスクリプトでは
# 「RPG::BaseItem」「RPG::Skill」「RPG::Weapon」「RPG::Armor」
# 「BattleManager」「Game_BaseItem」「Game_Actor」「Game_Party」
# 「Game_Action」「Window_ItemList」「Window_SkillList」「Window_BattleItem」
# 「Window_BattleSkill」「Window_EquipItem」「Window_KeyItem」
# 「Window_Message」「Window_ShopSell」「Window_ShopNumber」
# 「Scene_Shop」「Scene_ItemBase」「Scene_Item」「Scene_Skill」
# 「Scene_Equip」「Scene_Battle」
# のメソッドを改変しています．
# ■情報
# このスクリプトはgentlawkによって作られたものです．
# 利用規約はhttp://blueredzone.comをご覧ください．
#------------------------------------------------------------------------------
module BMSP
  @@includes ||= {}
  @@includes[:ItemSegment] = 1.17
  module ItemSegmentSystem
    #▲▽▲▽▲▽▲▽▲▽▲▽▲▽▲▽
    #詳細設定
    # 各種セグメントサイズのデフォルト
    ITEM_SEGMENT_SIZE = 20  # アイテム
    WEAPON_SEGMENT_SIZE = 1 # 武器
    ARMOR_SEGMENT_SIZE = 1  # 防具
    SKILL_SEGMENT_SIZE = 1  # スキル
    # 各種最大所持数のデフォルト
    ITEM_MAX = 100  # アイテム
    WEAPON_MAX = 20 # 武器
    ARMOR_MAX = 20  # 防具
    SKILL_MAX = 1   # スキル
    # 拡張アイテム選択ウインドウの行数の基本値
    EXTENDWINDOW_ROW_MAX = 5
    # 以下の設定は主にVXAceデフォルトの仕様のままスクリプトを
    # 導入したい時に変更します．
    # 基本的にはすべてtrueにすることを推奨します．
    NEW_SEGMENT = true # 新規アイテム追加時に新しいセグメントで追加するか．
                       # falseの場合なるべく既存のセグメントに追加しようとする．
    DEFLAG = true # セグメントを「まとめる」コマンドを使用するか．
    SHOP_EXTEND = true # ショップの売却画面を拡張するかどうか．
                       # falseの場合各セグメントについて先頭のアイテムから売却されます．
    ITEM_SELECT_EXTEND = true # アイテム選択の拡張をするかどうか．
                              # falseの場合選択したセグメントの先頭のアイテムから
                              # 使用されます．
    #▲▽▲▽▲▽▲▽▲▽▲▽▲▽▲▽
    # メモ欄から設定を抽出する正規表現
    MATCH_MAXSIZE = /==最大所持数([0-9]+)==/o
    MATCH_SEGMENTSIZE = /==セグメントサイズ([0-9]+)==/o
    #--------------------------------------------------------------------------
    # ● 正規表現とのマッチ
    #--------------------------------------------------------------------------
    def self.match_maxsize(str)
      MATCH_MAXSIZE =~ str ? [$1.to_i, 1].max : false
    end
    def self.match_segmentsize(str)
      MATCH_SEGMENTSIZE =~ str ? [$1.to_i, 1].max : false
    end
    #--------------------------------------------------------------------------
    # ● バグの例外クラス
    #--------------------------------------------------------------------------
    class BUG < StandardError
    end
    #--------------------------------------------------------------------------
    # ● 導入スクリプトの例外クラス
    #--------------------------------------------------------------------------
    class REQUIRE < StandardError
    end
  end
  #--------------------------------------------------------------------------
  # ● 必須スクリプトのチェック
  #--------------------------------------------------------------------------
  class << self
    if method_defined?(:check_require)
      alias itemsegment_check_require check_require
    end
  end
  def self.check_require(require, version)
    if methods.include?(:itemsegment_check_require)
      itemsegment_check_require(require, version)
    end
    if !@@includes[require]
      message =
        sprintf("BMSPスクリプト%sが導入されていません．\n%s Ver%1.2f以上を導入してください．",
          require,require,version)
      raise ItemSegmentSystem::REQUIRE, message
    elsif @@includes[require] < version
      message =
        sprintf("BMSPスクリプト%s Ver%1.2fは古いバージョンです．\n%s Ver%1.2f以上を導入してく

ださい．",
          require,@@includes[require],require,version)
      raise ItemSegmentSystem::REQUIRE, message
    end
    return true
  end
end
#==============================================================================
# ■ RPG::BaseItem
#==============================================================================
class RPG::BaseItem
  #--------------------------------------------------------------------------
  # ● 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_accessor :extend # アイテム拡張
  #--------------------------------------------------------------------------
  # ● 拡張されたアイテムか
  #--------------------------------------------------------------------------
  def extended?
    !@extend.nil?
  end
  #--------------------------------------------------------------------------
  # ● セグメントアイテムか
  #--------------------------------------------------------------------------
  def segment?
    return false unless extended?
    @extend.segment?
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムか
  #--------------------------------------------------------------------------
  def extend?
    return false unless extended?
    @extend.extend?
  end
  #--------------------------------------------------------------------------
  # ● 元のIDを取得(IDシフトへの対応)
  #--------------------------------------------------------------------------
  def original_id
    @id
  end
  #--------------------------------------------------------------------------
  # ● セグメントサイズの取得
  #--------------------------------------------------------------------------
  def segmentsize
    @bmsp_segmentsize ||= BMSP::ItemSegmentSystem.match_segmentsize(self.note)
    @bmsp_segmentsize
  end
  #--------------------------------------------------------------------------
  # ● 最大所持数の取得(内部)
  #--------------------------------------------------------------------------
  def maxsize
    @bmsp_maxsize ||= BMSP::ItemSegmentSystem.match_maxsize(self.note)
    @bmsp_maxsize
  end
  private :maxsize
  #--------------------------------------------------------------------------
  # ● アイテムの最大所持数(一般)
  #--------------------------------------------------------------------------
  def max_size
    case self
    when RPG::Item
      default = BMSP::ItemSegmentSystem::ITEM_MAX
    when RPG::Weapon
      default = BMSP::ItemSegmentSystem::WEAPON_MAX
    when RPG::Armor
      default = BMSP::ItemSegmentSystem::ARMOR_MAX
    when RPG::Skill
      default = BMSP::ItemSegmentSystem::SKILL_MAX
    else
      raise BMSP::ItemSegmentSystem::BUG, "[BUG]self item class type mismatch."
    end
    # メモで指定されている場合を考慮
    maxsize ? maxsize : default
  end
end
#==============================================================================
# ■ RPG::Skill
#==============================================================================
class RPG::Skill
  #--------------------------------------------------------------------------
  # ● 消費するかどうか
  #--------------------------------------------------------------------------
  def consumable
    return false
  end
  #--------------------------------------------------------------------------
  # ● 価格
  #--------------------------------------------------------------------------
  def price
    return 0
  end
end
#==============================================================================
# ■ RPG::Weapon
#==============================================================================
class RPG::Weapon
  #--------------------------------------------------------------------------
  # ● 消費するかどうか
  #--------------------------------------------------------------------------
  def consumable
    return false
  end
end
#==============================================================================
# ■ RPG::Armor
#==============================================================================
class RPG::Armor
  #--------------------------------------------------------------------------
  # ● 消費するかどうか
  #--------------------------------------------------------------------------
  def consumable
    return false
  end
end
#==============================================================================
# ■ BMSP::ItemSegmentSystem::Extend
#------------------------------------------------------------------------------
# 　アイテム拡張のコア部分をもつモジュール
#==============================================================================
module BMSP::ItemSegmentSystem::Extend
  @@age = 0 # ソート用番号割付
  alias :myclass :class
  #--------------------------------------------------------------------------
  # ● 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_accessor :class, :id # 拡張アイテムのクラスとid
  attr_reader :age          # 番号
  #--------------------------------------------------------------------------
  # ● インスタンス初期化時に呼ばれるメソッド
  #--------------------------------------------------------------------------
  def init(extend)
    @class = extend.class
    @id = extend.id
    @age = @@age
    @@age += 1
  end
  #--------------------------------------------------------------------------
  # ● クラス判定
  #--------------------------------------------------------------------------
  def is_skill?;   @class == RPG::Skill;   end
  def is_item?;    @class == RPG::Item;    end
  def is_weapon?;  @class == RPG::Weapon;  end
  def is_armor?;   @class == RPG::Armor;   end
  #--------------------------------------------------------------------------
  # ● 元のIDを取得(IDシフトへの対応)
  #--------------------------------------------------------------------------
  def original_id
    @id
  end
  #--------------------------------------------------------------------------
  # ● データベースアイテムオブジェクトの取得
  #--------------------------------------------------------------------------
  def original
    return $data_skills[original_id]  if is_skill?
    return $data_items[original_id]   if is_item?
    return $data_weapons[original_id] if is_weapon?
    return $data_armors[original_id]  if is_armor?
    raise BMSP::ItemSegmentSystem::BUG, "[BUG]Segment item class type mismatch."
  end
  #--------------------------------------------------------------------------
  # ● アイテムオブジェクトの取得
  #--------------------------------------------------------------------------
  def item
    item = self.original.clone
    item.extend = self
    return item
  end
  #--------------------------------------------------------------------------
  # ● セグメントか
  #--------------------------------------------------------------------------
  def segment?
    self.myclass == BMSP::ItemSegment
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムか
  #--------------------------------------------------------------------------
  def extend?
    self.myclass == BMSP::ItemExtend
  end
end
#==============================================================================
# ■ BMSP::ItemSegment
#------------------------------------------------------------------------------
# 　アイテムをまとめるセグメントのクラスです．
#==============================================================================
class BMSP::ItemSegment < Array
  include BMSP::ItemSegmentSystem::Extend
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize(extend)
    super()
    init(extend)
    set_segment
    self.push(extend)
  end
  #--------------------------------------------------------------------------
  # ● セグメントの設定
  #--------------------------------------------------------------------------
  def set_segment
    if @class == RPG::Skill
      @segment_size = BMSP::ItemSegmentSystem::SKILL_SEGMENT_SIZE
    elsif @class == RPG::Item
      @segment_size = BMSP::ItemSegmentSystem::ITEM_SEGMENT_SIZE
    elsif @class == RPG::Weapon
      @segment_size = BMSP::ItemSegmentSystem::WEAPON_SEGMENT_SIZE
    elsif @class == RPG::Armor
      @segment_size = BMSP::ItemSegmentSystem::ARMOR_SEGMENT_SIZE
    else
      raise BMSP::ItemSegmentSystem::BUG, "[BUG]Segment item class type mismatch."
    end
    # メモで指定されている場合
    if self.original.segmentsize
      @segment_size = self.original.segmentsize
    end
  end
  #--------------------------------------------------------------------------
  # ● アイテムオブジェクトの取得
  #--------------------------------------------------------------------------
  alias self_item item
  def item
    if unique? # 単品セグメントの場合は拡張アイテムそのものを返す
      self.first.item
    else
      self_item
    end
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムの追加
  #--------------------------------------------------------------------------
  def push(extend)
    return false if self.size >= @segment_size
    # 整合性チェック済みextendとする
    super(extend)
  end
  #--------------------------------------------------------------------------
  # ● 単品アイテムをあらわすセグメントか
  #--------------------------------------------------------------------------
  def unique?
    @segment_size == 1
  end
end
#==============================================================================
# ■ BMSP::ItemExtend
#------------------------------------------------------------------------------
# 　アイテム拡張のクラスです．
#==============================================================================
class BMSP::ItemExtend
  include BMSP::ItemSegmentSystem::Extend
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize(item)
    init(item)
  end
end
#==============================================================================
# ■ BattleManager
#==============================================================================
module BattleManager
  #--------------------------------------------------------------------------
  # ● 前のコマンド入力へ
  #--------------------------------------------------------------------------
  class << self
    alias bmsp_itemsegment_prior_command prior_command
  end
  def self.prior_command
    # 現在のアクションをクリア
    actor.input.clear if actor
    result = bmsp_itemsegment_prior_command
    # 入力するアクションを一旦クリア
    actor.input.clear if actor
    result
  end
end
#==============================================================================
# ■ Game_BaseItem
#==============================================================================
class Game_BaseItem
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_initialize initialize
  def initialize
    bmsp_itemsegment_initialize
    @bmsp_extend = nil
  end
  #--------------------------------------------------------------------------
  # ● アイテムオブジェクトの取得
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_object object
  def object
    item = bmsp_itemsegment_object
    return nil if item.nil?
    item = item.clone
    item.extend = @bmsp_extend
    return item
  end
  #--------------------------------------------------------------------------
  # ● アイテムオブジェクトの設定
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_object= object=
  def object=(item)
    self.bmsp_itemsegment_object=(item)
    @item_id = item ? item.original_id : 0
    @bmsp_extend = item ? item.extend : nil
  end
  #--------------------------------------------------------------------------
  # ● 装備品を ID で設定
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_set_equip set_equip
  def set_equip(is_weapon, item_id)
    bmsp_itemsegment_set_equip(is_weapon, item_id)
    # 拡張アイテムを作成
    item = bmsp_itemsegment_object
    @bmsp_extend = BMSP::ItemExtend.new(item) if item
  end
end
#==============================================================================
# ■ Game_Battler
#==============================================================================
class Game_Battler < Game_BattlerBase
  #--------------------------------------------------------------------------
  # ● 使用効果のテスト
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_item_effect_test item_effect_test
  def item_effect_test(user, item, effect)
    case effect.code
    when EFFECT_LEARN_SKILL
      return actor? && !skill_learn?($data_skills[effect.data_id])
    end
    bmsp_itemsegment_item_effect_test(user, item, effect)
  end
end
#==============================================================================
# ■ Game_Actor
#==============================================================================
class Game_Actor < Game_Battler
  #--------------------------------------------------------------------------
  # ● セットアップ
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_setup setup
  def setup(actor_id)
    bmsp_itemsegment_setup(actor_id)
    # 追加スキルの初期化
    @bmsp_itemsegment_added_skills = []
  end
  #--------------------------------------------------------------------------
  # ● 装備の破棄(再定義)
  #     item : 破棄する武器／防具
  #--------------------------------------------------------------------------
  def discard_equip(item)
    slot_id = equips.index{|i| i ? i.id == item.id : false }
    @equips[slot_id].object = nil if slot_id
  end
  #--------------------------------------------------------------------------
  # ● 最強装備(再定義)
  #--------------------------------------------------------------------------
  def optimize_equipments
    clear_equipments
    equip_slots.size.times do |i|
      next if !equip_change_ok?(i)
      items = $game_party.extend_equip_items.select do |item|
        item.etype_id == equip_slots[i] &&
        equippable?(item) && item.performance >= 0
      end
      change_equip(i, items.max_by {|item| item.performance })
    end
  end
  #--------------------------------------------------------------------------
  # ● 装備できない装備品を外す(再定義)
  #--------------------------------------------------------------------------
  def release_unequippable_items(item_gain = true)
    loop do
      last_equips = equips.map{|equip| equip ? equip.extend : nil}
      vxace_sp1_release_unequippable_items(item_gain)
      now_equips = equips.map{|equip| equip ? equip.extend : nil}
      return if now_equips == last_equips
    end
  end
  #--------------------------------------------------------------------------
  # ● スキル／アイテムの使用可能判定
  #--------------------------------------------------------------------------
  def usable?(item)
    if item && item.extend?
      case item
      when RPG::Item,RPG::Weapon,RPG::Armor
        return false unless $game_party.has_extenditem?(item)
      when RPG::Skill
        return false unless self.has_extendskill?(item)
      end
    elsif item && item.segment?
      if item.segment? && item.class == RPG::Skill
        return false unless skillsegments.include?(item.extend)
      end
    end
    super
  end
  #--------------------------------------------------------------------------
  # ● スキル／アイテムの使用
  #    行動側に対して呼び出され、使用対象以外に対する効果を適用する。
  #--------------------------------------------------------------------------
  def use_item(item)
    super
    consume_skill(item) if item.is_a?(RPG::Skill)
  end
  #--------------------------------------------------------------------------
  # ● スキルの消耗
  #--------------------------------------------------------------------------
  def consume_skill(skill)
    gain_skill(skill, -1) if skill.consumable
  end
  #--------------------------------------------------------------------------
  # ● 追加スキル一覧の更新
  #--------------------------------------------------------------------------
  def update_added_skills
    old = @bmsp_itemsegment_added_skills.map{|segment| segment.item}
    old_id = old.map{|item| item.id}
    skills = added_skills.select{ |id| !skill_learn?($data_skills[id])}
    @bmsp_itemsegment_added_skills.select!{|segment|
      id = segment.item.id
      if skills.include?(segment.item.id)
        skills.delete(id)
        true
      else
        false
      end
    }
    @bmsp_itemsegment_added_skills.concat skills.map{|id|
      BMSP::ItemSegment.new(BMSP::ItemExtend.new($data_skills[id]))
    }
  end
  #--------------------------------------------------------------------------
  # ● 追加スキルのセグメント配列取得
  #--------------------------------------------------------------------------
  def added_skill_segments
    update_added_skills
  end
  #--------------------------------------------------------------------------
  # ● スキルオブジェクトの配列取得(再定義)
  #--------------------------------------------------------------------------
  def skills
    (@skills + added_skill_segments).sort_by{|segment|
      [segment.id, segment.age]
    }.map{|segment| segment.item }
  end
  #--------------------------------------------------------------------------
  # ● 拡張スキルオブジェクトの配列取得
  #--------------------------------------------------------------------------
  def extend_skills
    (@skills + added_skill_segments).sort_by{|segment|
      [segment.id, segment.age]
    }.map{|segment|
      if segment.unique?
        segment.item
      else
        segment.map{|extend| extend.item}
      end
    }.flatten
  end
  #--------------------------------------------------------------------------
  # ● 拡張スキルセグメントの配列取得
  #--------------------------------------------------------------------------
  def skillsegments
    (@skills + added_skill_segments).sort_by{|segment|
      [segment.id, segment.age]
    }
  end
  #--------------------------------------------------------------------------
  # ● 現在使用できるスキルの配列取得(再定義)
  #--------------------------------------------------------------------------
  def usable_skills
    extend_skills.select {|skill| usable?(skill) }
  end
  #--------------------------------------------------------------------------
  # ● スキルの所持数取得(種類ごと)
  #--------------------------------------------------------------------------
  def skill_number(skill)
    @skills.select{|segment| skill.id == segment.id}.flatten.size
  end
  #--------------------------------------------------------------------------
  # ● スキルの所持数取得(セグメントごと)
  #--------------------------------------------------------------------------
  def skill_segment_number(skill)
    return 0 unless skill.extended?
    skill.segment? ? skill.extend.size : 1
  end
  #--------------------------------------------------------------------------
  # ● スキルの最大所持数取得
  #--------------------------------------------------------------------------
  def max_skill_number(skill)
    n = skill ? skill.max_size : 1
    n ? n : 1
  end
  #--------------------------------------------------------------------------
  # ● スキルを最大まで所持しているか判定
  #--------------------------------------------------------------------------
  def skill_max?(skill)
    skill_number(skill) >= max_skill_number(skill)
  end
  #--------------------------------------------------------------------------
  # ● スキルの所持判定
  #--------------------------------------------------------------------------
  def has_skill?(skill)
    return true if skill_number(skill) > 0
  end
  #--------------------------------------------------------------------------
  # ● 拡張スキルの所持判定
  #--------------------------------------------------------------------------
  def has_extendskill?(skill)
    return false if skill.nil?
    return skills.any?{|learned_skill| learned_skill.extend == skill.extend }
  end
  #--------------------------------------------------------------------------
  # ● スキルの増減
  #--------------------------------------------------------------------------
  def gain_skill(skill, amount)
    if skill.extended? # 拡張アイテムで指定
      gain_extended_skill(skill, amount)
    else # データーベースアイテムで指定
      if amount > 0 # 増加
        if BMSP::ItemSegmentSystem::NEW_SEGMENT
          gain_skill_new_segment(skill, amount)
        else
          gain_skill_add_segment(skill, amount)
        end
      else amount < 0 # 減少
        last_number = skill_number(skill)
        new_number = last_number + amount
        lose_extend_force(skill, -amount)
        @skills.delete_if{|segment| segment.empty? }
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 新しいセグメントでスキルを増加
  #--------------------------------------------------------------------------
  def gain_skill_new_segment(skill, amount)
    segments = []
    amount.times do
      extend = BMSP::ItemExtend.new(skill)
      if segments.empty?
        segments.push(BMSP::ItemSegment.new(extend))
      elsif !segments.last.push(extend)
        segments.push(BMSP::ItemSegment.new(extend))
      end
    end
    segments.each do |segment|
      gain_segment(skill, segment)
    end
  end
  #--------------------------------------------------------------------------
  # ● 既存のセグメントにスキルを追加
  #--------------------------------------------------------------------------
  def gain_skill_add_segment(skill, amount)
    rest = [[amount, max_skill_number(skill) - skill_number(skill)].min, 0].max
    return if rest == 0
    @skills.each do |segment|
      next if segment.id != skill.id
      rest -= 1 while rest > 0 && segment.push(BMSP::ItemExtend.new(skill))
      break if rest == 0
    end
    gain_skill_new_segment(skill, rest) if rest > 0
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムによるスキルの増減
  #--------------------------------------------------------------------------
  def gain_extended_skill(skill, amount)
    if amount > 0 # 増加
      extend = skill.extend
      case extend
      when BMSP::ItemSegment
        gain_segment(skill, extend)
      when BMSP::ItemExtend
        if skill_number(skill) < max_skill_number(skill)
          gain_extend(skill, extend)
        end
      end
    else amount < 0 # 減少
      extend = skill.extend
      case extend
      when BMSP::ItemSegment
        lose_segment(extend)
      when BMSP::ItemExtend
        lose_extend(skill, extend)
      end
      @skills.delete_if{|segment| segment.empty? }
    end
  end
  #--------------------------------------------------------------------------
  # ● セグメントの追加
  #--------------------------------------------------------------------------
  def gain_segment(skill, segment)
    rest_size = max_skill_number(skill) - skill_number(skill)
    popsize = [segment.size - rest_size, 0].max
    segment.pop(popsize)
    @skills.push segment unless segment.empty?
  end
  #--------------------------------------------------------------------------
  # ● 拡張スキルの追加
  #--------------------------------------------------------------------------
  def gain_extend(skill, extend)
    pushed = false
    @skills.each do |segment|
      next if segment.id != skill.id
      (pushed = true;break) if segment.push(extend)
    end
    # 新しいセグメントを作成
    @skills.push(BMSP::ItemSegment.new(extend)) unless pushed
  end
  #--------------------------------------------------------------------------
  # ● セグメントの減少
  #--------------------------------------------------------------------------
  def lose_segment(segment)
    @skills.delete(segment)
  end
  #--------------------------------------------------------------------------
  # ● 拡張スキルの減少
  #--------------------------------------------------------------------------
  def lose_extend(skill, extend)
    @skills.each do |segment|
      next if segment.id != skill.id
      break if segment.delete(skill.extend)
    end
  end
  #--------------------------------------------------------------------------
  # ● 拡張スキルの強制削除
  #--------------------------------------------------------------------------
  def lose_extend_force(skill, amount)
    # 古いものから無差別に削除
    rest = amount
    @skills.each do |segment|
      next if segment.id != skill.id
      rest -= segment.shift(rest).size
      break if rest == 0
    end
  end
  #--------------------------------------------------------------------------
  # ● セグメント内拡張スキルの強制削除
  #--------------------------------------------------------------------------
  def lose_segmentskill(segment, amount)
    # セグメント内から無差別に削除
    segment[0...amount].each do |extend|
      gain_skill(extend.item, -1)
    end
  end
  #--------------------------------------------------------------------------
  # ● セグメントのデフラグメンテーション
  #--------------------------------------------------------------------------
  def deflag(base, skills)
    # セグメントを分解
    extends = skills.map{|skill| skill.extend }.flatten
    # セグメントを削除
    skills.each do |skill|
      lose_segment(skill.extend)
    end
    # 追加
    base_segment = base.extend
    extends.each do |extend|
      unless base_segment.push(extend)
        # 新しいセグメントを作成
        base_segment = BMSP::ItemSegment.new(extend)
        @skills.push base_segment
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 経験値の変更(再定義)
  #--------------------------------------------------------------------------
  def change_exp(exp, show)
    @exp[@class_id] = [exp, 0].max
    last_level = @level
    last_skills = skills.map{|skill| skill.extend}
    level_up while !max_level? && self.exp >= next_level_exp
    level_down while self.exp < current_level_exp
    latest_skills = skills.map{|skill| skill.extend}
    new_skills = (latest_skills - last_skills).map{|extend| extend.item}
    display_level_up(new_skills) if show && @level > last_level
    refresh
  end
  #--------------------------------------------------------------------------
  # ● スキルを覚える(再定義)
  #--------------------------------------------------------------------------
  def learn_skill(skill_id)
    skill = $data_skills[skill_id]
    gain_skill(skill, 1)
  end
  #--------------------------------------------------------------------------
  # ● スキルを忘れる(再定義)
  #--------------------------------------------------------------------------
  def forget_skill(skill_id)
    skill = $data_skills[skill_id]
    gain_skill(skill, -1)
  end
  #--------------------------------------------------------------------------
  # ● スキルの習得済み判定(再定義)
  #--------------------------------------------------------------------------
  def skill_learn?(skill)
    return false unless skill.is_a?(RPG::Skill)
    @skills.each do |segment|
      return true if segment.item.id == skill.id
    end
    return false
  end
  #--------------------------------------------------------------------------
  # ● 装備の変更（ID で指定）(再定義)
  #--------------------------------------------------------------------------
  def change_equip_by_id(slot_id, item_id)
    if equip_slots[slot_id] == 0
      item = $game_party.extend_weapons.find{|item| item.id == item_id}
      change_equip(slot_id, item) if item
    else
      item = $game_party.extend_armors.find{|item| item.id == item_id}
      change_equip(slot_id, item) if item
    end
  end
end
#==============================================================================
# ■ Game_Party
#==============================================================================
class Game_Party < Game_Unit
  #--------------------------------------------------------------------------
  # ● 全アイテムリストの初期化(再定義)
  #--------------------------------------------------------------------------
  def init_all_items
    @items = []
    @weapons = []
    @armors = []
  end
  #--------------------------------------------------------------------------
  # ● アイテムオブジェクトの配列取得処理 
  #--------------------------------------------------------------------------
  def get_items(container)
    container.sort_by{|segment| [segment.id, segment.age] }.map{|segment| segment.item}
  end
  #--------------------------------------------------------------------------
  # ● アイテムオブジェクトの配列取得 (再定義)
  #--------------------------------------------------------------------------
  def items
    get_items(@items)
  end
  #--------------------------------------------------------------------------
  # ● 武器オブジェクトの配列取得 (再定義)
  #--------------------------------------------------------------------------
  def weapons
    get_items(@weapons)
  end
  #--------------------------------------------------------------------------
  # ● 防具オブジェクトの配列取得 (再定義)
  #--------------------------------------------------------------------------
  def armors
    get_items(@armors)
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムオブジェクトの配列取得処理 
  #--------------------------------------------------------------------------
  def get_extend_items(container)
    container.sort_by{|segment| [segment.id, segment.age] }.map{|segment|
      if segment.unique?
        segment.item
      else
        segment.map{|extend| extend.item}
      end
    }.flatten
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムオブジェクトの配列取得 
  #--------------------------------------------------------------------------
  def extend_items
    get_extend_items(@items)
  end
  #--------------------------------------------------------------------------
  # ● 拡張武器オブジェクトの配列取得 
  #--------------------------------------------------------------------------
  def extend_weapons
    get_extend_items(@weapons)
  end
  #--------------------------------------------------------------------------
  # ● 拡張防具オブジェクトの配列取得 
  #--------------------------------------------------------------------------
  def extend_armors
    get_extend_items(@armors)
  end
  #--------------------------------------------------------------------------
  # ● 全ての拡張装備品オブジェクトの配列取得
  #--------------------------------------------------------------------------
  def extend_equip_items
    extend_weapons + extend_armors
  end
  #--------------------------------------------------------------------------
  # ● 全ての拡張アイテムオブジェクトの配列取得
  #--------------------------------------------------------------------------
  def extend_all_items
    extend_items + extend_equip_items
  end
  #--------------------------------------------------------------------------
  # ● アイテムセグメントの配列取得処理 
  #--------------------------------------------------------------------------
  def get_itemsegments(container)
    container.sort_by{|segment| [segment.id, segment.age] }
  end
  #--------------------------------------------------------------------------
  # ● アイテムセグメントの配列取得 
  #--------------------------------------------------------------------------
  def itemsegments
    get_itemsegments(@items)
  end
  #--------------------------------------------------------------------------
  # ● 武器セグメントの配列取得 
  #--------------------------------------------------------------------------
  def weaponsegments
    get_itemsegments(@weapons)
  end
  #--------------------------------------------------------------------------
  # ● 防具セグメントの配列取得 
  #--------------------------------------------------------------------------
  def armorsegments
    get_itemsegments(@armors)
  end
  #--------------------------------------------------------------------------
  # ● 全ての装備品セグメントの配列取得
  #--------------------------------------------------------------------------
  def equip_itemsegments
    weaponsegments + armorsegments
  end
  #--------------------------------------------------------------------------
  # ● 全てのアイテムセグメントの配列取得
  #--------------------------------------------------------------------------
  def all_itemsegments
    itemsegments + equip_itemsegments
  end
  #--------------------------------------------------------------------------
  # ● アイテムの所持数取得(種類ごと)(再定義)
  #--------------------------------------------------------------------------
  def item_number(item)
    container = item_container(item.class)
    return 0 if container.nil?
    container.select{|segment| item.id == segment.id}.flatten.size
  end
  #--------------------------------------------------------------------------
  # ● アイテムの所持数取得(セグメントごと)
  #--------------------------------------------------------------------------
  def segment_number(item)
    return 0 unless item.extended?
    item.segment? ? item.extend.size : 1
  end
  #--------------------------------------------------------------------------
  # ● アイテムの最大所持数取得(再定義)
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_max_item_number max_item_number
  def max_item_number(item)
    n = item ? item.max_size : bmsp_itemsegment_max_item_number(item)
    n ? n : bmsp_itemsegment_max_item_number(item)
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムの所持判定
  #--------------------------------------------------------------------------
  def has_extenditem?(item)
    container = item_container(item.class)
    return false if container.nil?
    container.each{|segment|
      return true if segment.include?(item.extend)
    }
    false
  end
  #--------------------------------------------------------------------------
  # ● 指定アイテムがメンバーの装備品に含まれているかを判定(再定義)
  #--------------------------------------------------------------------------
  def members_equip_include?(item)
    members.any? {|actor|
      actor.equips.compact.index{|i| i ? i.id == item.id : false }
    }
  end
  #--------------------------------------------------------------------------
  # ● アイテムの増加（減少）(再定義)
  #     include_equip : 装備品も含める
  #--------------------------------------------------------------------------
  def gain_item(item, amount, include_equip = false)
    container = item_container(item.class)
    return unless container
    if item.extended? # 拡張アイテムで指定
      gain_extended_item(container, item, amount)
    else # データーベースアイテムで指定
      if amount > 0 # 増加
        if BMSP::ItemSegmentSystem::NEW_SEGMENT
          gain_item_new_segment(container, item, amount)
        else
          gain_item_add_segment(container, item, amount)
        end
      else amount < 0 # 減少
        last_number = item_number(item)
        new_number = last_number + amount
        lose_extend_force(container, item, -amount)
        if include_equip && new_number < 0
          discard_members_equip(item, -new_number)
        end
        container.delete_if{|segment| segment.empty? }
      end
    end
    $game_map.need_refresh = true
  end
  #--------------------------------------------------------------------------
  # ● 新しいセグメントでアイテムを増加
  #--------------------------------------------------------------------------
  def gain_item_new_segment(container, item, amount)
    segments = []
    amount.times do
      extend = BMSP::ItemExtend.new(item)
      if segments.empty?
        segments.push(BMSP::ItemSegment.new(extend))
      elsif !segments.last.push(extend)
        segments.push(BMSP::ItemSegment.new(extend))
      end
    end
    segments.each do |segment|
      gain_segment(container, item, segment)
    end
  end
  #--------------------------------------------------------------------------
  # ● 既存のセグメントにアイテムを追加
  #--------------------------------------------------------------------------
  def gain_item_add_segment(container, item, amount)
    rest = [[amount, max_item_number(item) - item_number(item)].min, 0].max
    return if rest == 0
    container.each do |segment|
      next if segment.id != item.id
      rest -= 1 while rest > 0 && segment.push(BMSP::ItemExtend.new(item))
      break if rest == 0
    end
    gain_item_new_segment(container, item, rest) if rest > 0
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムによるアイテムの増減
  #--------------------------------------------------------------------------
  def gain_extended_item(container, item, amount)
    if amount > 0 # 増加
      extend = item.extend
      case extend
      when BMSP::ItemSegment
        gain_segment(container, item, extend)
      when BMSP::ItemExtend
        if item_number(item) < max_item_number(item)
          gain_extend(container, item, extend)
        end
      end
    else amount < 0 # 減少
      extend = item.extend
      case extend
      when BMSP::ItemSegment
        lose_segment(container, extend)
      when BMSP::ItemExtend
        lose_extend(container, item, extend)
      end
      container.delete_if{|segment| segment.empty? }
    end
  end
  #--------------------------------------------------------------------------
  # ● セグメントの追加
  #--------------------------------------------------------------------------
  def gain_segment(container, item, segment)
    rest_size = max_item_number(item) - item_number(item)
    popsize = [segment.size - rest_size, 0].max
    segment.pop(popsize)
    container.push segment unless segment.empty?
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムの追加
  #--------------------------------------------------------------------------
  def gain_extend(container, item, extend)
    pushed = false
    container.each do |segment|
      next if segment.id != item.id
      (pushed = true;break) if segment.push(extend)
    end
    # 新しいセグメントを作成
    container.push(BMSP::ItemSegment.new(extend)) unless pushed
  end
  #--------------------------------------------------------------------------
  # ● セグメントの減少
  #--------------------------------------------------------------------------
  def lose_segment(container, segment)
    container.delete(segment)
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムの減少
  #--------------------------------------------------------------------------
  def lose_extend(container, item, extend)
    container.each do |segment|
      next if segment.id != item.id
      break if segment.delete(item.extend)
    end
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムの強制削除
  #--------------------------------------------------------------------------
  def lose_extend_force(container, item, amount)
    # 古いものから無差別に削除
    rest = amount
    container.each do |segment|
      next if segment.id != item.id
      rest -= segment.shift(rest).size
      break if rest == 0
    end
  end
  #--------------------------------------------------------------------------
  # ● セグメント内拡張アイテムの強制削除
  #--------------------------------------------------------------------------
  def lose_segmentitem(segment, amount)
    # セグメント内から無差別に削除
    segment[0...amount].each do |extend|
      gain_item(extend.item, -1)
    end
  end
  #--------------------------------------------------------------------------
  # ● セグメントのデフラグメンテ-ション
  #--------------------------------------------------------------------------
  def deflag(base, items)
    container = item_container(base.class)
    return unless container
    # セグメントを分解
    extends = items.map{|item| item.extend }.flatten
    # セグメントを削除
    items.each do |item|
      lose_segment(container, item.extend)
    end
    # 追加
    base_segment = base.extend
    extends.each do |extend|
      unless base_segment.push(extend)
        # 新しいセグメントを作成
        base_segment = BMSP::ItemSegment.new(extend)
        container.push base_segment
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● メンバーの装備品を破棄する(再定義)
  #--------------------------------------------------------------------------
  def discard_members_equip(item, amount)
    n = amount
    members.each do |actor|
      while n > 0 && actor.equips.index{|i| i ? i.id == item.id : false }
        actor.discard_equip(item)
        n -= 1
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● アイテムの消耗(再定義)
  #    指定されたオブジェクトが消耗アイテムであれば、所持数を 1 減らす。
  #--------------------------------------------------------------------------
  def consume_item(item)
    lose_item(item, 1) if item.consumable
  end
end
#==============================================================================
# ■ Game_Action
#==============================================================================
class Game_Action
  #--------------------------------------------------------------------------
  # ● スキルを設定
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_set_skill set_skill
  def set_skill(skill)
    if skill.class == RPG::Skill # スキルオブジェクトで指定
      @item.object = skill
      self
    else # idで指定
      bmsp_itemsegment_set_skill(skill)
    end
  end
  #--------------------------------------------------------------------------
  # ● アイテムを設定
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_set_item set_item
  def set_item(item)
    case item
    when RPG::Item,RPG::Weapon,RPG::Armor # アイテムオブジェクトで指定
      @item.object = item
      self
    else # idで指定
      bmsp_itemsegment_set_item(item)
    end
  end
  #--------------------------------------------------------------------------
  # ● 通常攻撃判定(再定義)
  #--------------------------------------------------------------------------
  def attack?
    return false unless item.is_a?(RPG::Skill)
    item.id == subject.attack_skill_id
  end
end
#==============================================================================
# ■ Window_ItemList
#==============================================================================
class Window_ItemList < Window_Selectable
  #--------------------------------------------------------------------------
  # ● アイテムをインデックスでも取得できるように
  #--------------------------------------------------------------------------
  alias bmsp_itemlist_item item
  def item(i = -1)
    @data && i >= 0 ? @data[i] : bmsp_itemlist_item
  end
  #--------------------------------------------------------------------------
  # ● すべてのアイテムを取得
  #--------------------------------------------------------------------------
  def all_items(include_nil = false)
    include_nil ? @data : @data.compact
  end
  if BMSP::ItemSegmentSystem::ITEM_SELECT_EXTEND #### アイテム選択拡張あり
  #--------------------------------------------------------------------------
  # ● アイテムを許可状態で表示するかどうか
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_enable? enable?
  def enable?(item)
    enable = bmsp_itemsegment_enable?(item)
    enable = true if item && item.segment?
    enable
  end
  end
  #--------------------------------------------------------------------------
  # ● 前回の選択位置を復帰(再定義)
  #--------------------------------------------------------------------------
  def select_last
    index = @data.index{|item|
      next false if item.nil?
      next false if $game_party.last_item.object.nil?
      item.extend == $game_party.last_item.object.extend
    }
    select(index || 0)
  end
  #--------------------------------------------------------------------------
  # ● アイテムの個数を描画(再定義)
  #--------------------------------------------------------------------------
  def draw_item_number(rect, item)
    if item.segment?
      draw_text(rect, sprintf(":%2d", $game_party.segment_number(item)), 2)
    end
  end
end
#==============================================================================
# ■ Window_SkillList
#==============================================================================
class Window_SkillList < Window_Selectable
  #--------------------------------------------------------------------------
  # ● 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_reader   :actor
  #--------------------------------------------------------------------------
  # ● アイテムをインデックスでも取得できるように
  #--------------------------------------------------------------------------
  alias bmsp_itemlist_item item
  def item(i = -1)
    @data && i >= 0 ? @data[i] : bmsp_itemlist_item
  end
  #--------------------------------------------------------------------------
  # ● すべてのアイテムを取得
  #--------------------------------------------------------------------------
  def all_items(include_nil = false)
    include_nil ? @data : @data.compact
  end
  if BMSP::ItemSegmentSystem::ITEM_SELECT_EXTEND #### アイテム選択拡張あり
  #--------------------------------------------------------------------------
  # ● スキルを許可状態で表示するかどうか
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_enable? enable?
  def enable?(item)
    enable = bmsp_itemsegment_enable?(item)
    enable = true if item && item.segment?
    enable
  end
  end
  #--------------------------------------------------------------------------
  # ● 前回の選択位置を復帰(再定義)
  #--------------------------------------------------------------------------
  def select_last
    index = @data.index{|skill|
      next false if skill.nil?
      next false if @actor.last_skill.object.nil?
      skill.extend == @actor.last_skill.object.extend
    }
    select(index || 0)
  end
  #--------------------------------------------------------------------------
  # ● スキルの使用コストを描画
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_draw_skill_cost draw_skill_cost
  def draw_skill_cost(rect, skill)
    if skill.segment?
      # セグメントの場合は個数を表示
      draw_text(rect, sprintf(":%2d", @actor.skill_segment_number(skill)), 2)
    else
      bmsp_itemsegment_draw_skill_cost(rect, skill)
    end
  end
end
#==============================================================================
# ■ Window_BattleItem
#==============================================================================
class Window_BattleItem < Window_ItemList
  #--------------------------------------------------------------------------
  # ● アイテムリストの作成
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_make_item_list make_item_list
  def make_item_list
    # アクターの入力で選択された拡張アイテム一覧を取得
    items = $game_party.members.map{|actor|
      actor.actions.map{|action| action.item}
    }.flatten.compact.select{|item|
      next false if item.nil?
      case item
      when RPG::Item,RPG::Weapon,RPG::Armor
        true
      else
        false
      end
    }
    @actor_input_extends = items.map{|item| item.extend}
    bmsp_itemsegment_make_item_list
  end
  #--------------------------------------------------------------------------
  # ● アイテムをリストに含めるかどうか(再定義)
  #--------------------------------------------------------------------------
  def include?(item)
    return false if item.nil?
    return include_extend?(item) if item.extend? # 拡張アイテム(単品)
    # セグメントが使用可能な拡張アイテムを含んでいれば許可
    item.extend.each do |extend|
      return true if include_extend?(extend.item)
    end
    return false
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムをリストに含めるかどうか
  #--------------------------------------------------------------------------
  def include_extend?(item)
    # 行動決定済みのアクターが選んだアイテムで，消費するものであれば除外する
    return false unless $game_party.usable?(item)
    !@actor_input_extends.include?(item.extend) || !item.consumable
  end
  #--------------------------------------------------------------------------
  # ● アイテムの個数を描画
  #--------------------------------------------------------------------------
  def draw_item_number(rect, item)
    if item.segment?
      number = @data[@data.index(item)].extend.select{|extend|
        include_extend?(extend.item)
      }.size
      draw_text(rect, sprintf(":%2d", number), 2)
    end
  end
end
#==============================================================================
# ■ Window_BattleSkill
#==============================================================================
class Window_BattleSkill < Window_SkillList
  #--------------------------------------------------------------------------
  # ● アイテムリストの作成
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_make_item_list make_item_list
  def make_item_list
    # アクターの入力で選択された拡張アイテム一覧を取得
    items = $game_party.members.map{|actor|
      actor.actions.map{|action| action.item}
    }.flatten.compact.select{|item|
      item ? item.class == RPG::Skill : false
    }
    @actor_input_extends = items.map{|item| item.extend}
    bmsp_itemsegment_make_item_list
  end
  #--------------------------------------------------------------------------
  # ● スキルをリストに含めるかどうか
  #--------------------------------------------------------------------------
  def include?(item)
    return false unless super
    return include_extend?(item) if item.extend? # 拡張アイテム(単品)
    # セグメントが使用可能な拡張アイテムを含んでいれば許可
    item.extend.each do |extend|
      return true if include_extend?(extend.item)
    end
    return false
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムをリストに含めるかどうか
  #--------------------------------------------------------------------------
  def include_extend?(item)
    # 行動決定済みのアクターが選んだアイテムで，消費するものであれば除外する
    !@actor_input_extends.include?(item.extend) || !item.consumable
  end
  #--------------------------------------------------------------------------
  # ● スキルの使用コストを描画
  #--------------------------------------------------------------------------
  def draw_skill_cost(rect, skill)
    if skill.segment?
      # セグメントの場合は個数を表示
      number = @data[@data.index(skill)].extend.select{|extend|
        include_extend?(extend.item)
      }.size
      draw_text(rect, sprintf(":%2d", number), 2)
    else
      bmsp_itemsegment_draw_skill_cost(rect, skill)
    end
  end
end
#==============================================================================
# ■ BMSP::Window_Fitting
#------------------------------------------------------------------------------
# 　あるウインドウの項目にあわせて表示位置や大きさを変えるウインドウです．
#==============================================================================
class BMSP::Window_Fitting < Window_Selectable
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize
    @data = []
    super(0,0,48,self.window_height)
    @item_window = nil
  end
  #--------------------------------------------------------------------------
  # ● ウインドウの高さ
  #--------------------------------------------------------------------------
  def window_height
    line = [@data.size, 1].max
    self.fitting_height(line)
  end
  #--------------------------------------------------------------------------
  # ● アイテムウインドウの設定
  #--------------------------------------------------------------------------
  def item_window=(window)
    return if @item_window == window
    @item_window = window
    self.init
  end
  #--------------------------------------------------------------------------
  # ● アイテムウインドウを取得
  #--------------------------------------------------------------------------
  def item_window
    @item_window
  end
  #--------------------------------------------------------------------------
  # ● 桁数の取得
  #--------------------------------------------------------------------------
  def col_max
    return 1
  end
  #--------------------------------------------------------------------------
  # ● 項目数の取得
  #--------------------------------------------------------------------------
  def item_max
    @data ? @data.size : 1
  end
  #--------------------------------------------------------------------------
  # ● アイテムの取得
  #--------------------------------------------------------------------------
  def item
    @data && index >= 0 ? @data[index] : nil
  end
  #--------------------------------------------------------------------------
  # ● 選択項目の有効状態を取得
  #--------------------------------------------------------------------------
  def current_item_enabled?
    enable?(@data[index])
  end
  #--------------------------------------------------------------------------
  # ● アイテムをリストに含めるかどうか
  #--------------------------------------------------------------------------
  def include?(item)
    !item.nil?
  end
  #--------------------------------------------------------------------------
  # ● アイテムを許可状態で表示するかどうか
  #--------------------------------------------------------------------------
  def enable?(item)
    true
  end
  #--------------------------------------------------------------------------
  # ● アイテムリストの作成
  #--------------------------------------------------------------------------
  def make_item_list
    @data = []
    @data.push(nil) if include?(nil)
  end
  #--------------------------------------------------------------------------
  # ● 前回の選択位置を復帰
  #--------------------------------------------------------------------------
  def select_last
    index = self.index >= self.item_max ? self.item_max - 1 : self.index
    select(index)
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  def refresh
    make_item_list
    create_contents
    draw_all_items
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムウインドウの幅とZ座標の設定
  #--------------------------------------------------------------------------
  def init
    return if @item_window.nil?
    # アイテムウインドウの選択項目を基準にする
    rect = @item_window.item_rect(@item_window.index)
    rect.x -= @item_window.ox
    rect.y -= @item_window.oy
    # Z座標，ウインドウ幅の変更
    self.z = @item_window.z + 1
    self.width = rect.width
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムウインドウの高さと表示位置の再設定
  #--------------------------------------------------------------------------
  def set
    return if @item_window.nil?
    # アイテムリスト更新
    self.make_item_list
    # ウインドウの選択項目を基準にする
    rect = @item_window.item_rect(@item_window.index)
    rect.x -= @item_window.ox
    rect.y -= @item_window.oy
    # 高さの設定
    self.height = self.window_height
    # 表示位置の設定
    self.x = @item_window.x + rect.x + @item_window.standard_padding
    self.y = @item_window.y + rect.y + @item_window.line_height +

@item_window.standard_padding
    # フィッティング(画面外へ切れてしまうのを防止)
    fitting
    # インデックスの修正
    if self.index >= self.item_max
      if self.item_max > 0
        self.select(self.item_max - 1)
      else
        self.select(0)
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムウインドウのフィッティング
  #--------------------------------------------------------------------------
  def fitting
    return unless overflow?
    if fitting_upper # 上に表示することでの回避
    elsif fitting_shrink # 高さを小さくすることで回避
    else
      fitting_on # 仕方ないので選択したアイテムの真上に重ねて表示
    end
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムウインドウが見切れているか
  #--------------------------------------------------------------------------
  def overflow?
    return false if @item_window.nil?
    extend_bottom = self.y + self.height
    if self.viewport.nil?
      viewport_bottom = Graphics.height
    else
      viewport_bottom = self.viewport.rect.y + self.viewport.rect.height
    end
    return (extend_bottom > viewport_bottom) || (self.y < @item_window.y)
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムウインドウを上に表示してフィッティング
  #--------------------------------------------------------------------------
  def fitting_upper
    return false if @item_window.nil?
    last_y = self.y
    self.y -= self.height + @item_window.line_height
    return true unless overflow?
    self.y = last_y
    false
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムウインドウを縮めてフィッティング
  #--------------------------------------------------------------------------
  def fitting_shrink
    return false if @item_window.nil?
    # 縮められる最大サイズ
    shrinkable_size = self.page_row_max - 1
    #----------
    if self.viewport.nil?
      viewport_bottom = Graphics.height
    else
      viewport_bottom = self.viewport.rect.y + self.viewport.rect.height
    end
    extend_bottom = self.y + self.height
    overflow = extend_bottom - viewport_bottom
    shrink_size = overflow.to_f / self.line_height
    shrink_size = shrink_size.ceil
    downer_shrink = shrink_size # 下表示の縮小サイズ
    #----------
    last_y = self.y
    self.y -= self.height + @item_window.line_height
    overflow = @item_window.y - self.y
    shrink_size = overflow.to_f / self.line_height
    shrink_size = shrink_size.ceil
    upper_shrink = shrink_size # 上表示の縮小サイズ
    self.y = last_y
    #----------
    if downer_shrink > shrinkable_size && upper_shrink > shrinkable_size
      return false
    end
    if downer_shrink <= upper_shrink # 縮小サイズの小さいほうを採用
      self.height -= downer_shrink * self.line_height
    else
      self.height -= upper_shrink * self.line_height
      self.y -= self.height + @item_window.line_height
    end
    true
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムウインドウをサイズ1に，
  # 　かつ選択セグメントと重ねてフィッティング
  #--------------------------------------------------------------------------
  def fitting_on
    return if @item_window.nil?
    self.height = self.fitting_height(1)
    self.y -= @item_window.line_height
  end
end
#==============================================================================
# ■ BMSP::Window_ExtendItem
#------------------------------------------------------------------------------
# 　アイテム画面で，セグメントの中身を表示するウインドウです．
#==============================================================================
class BMSP::Window_ExtendItem < BMSP::Window_Fitting
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize
    super
    @segment = nil
    self.openness = 0
  end
  #--------------------------------------------------------------------------
  # ● ウインドウの高さ
  #--------------------------------------------------------------------------
  def window_height
    line = [[@data.size, 1].max, BMSP::ItemSegmentSystem::EXTENDWINDOW_ROW_MAX].min
    self.fitting_height(line)
  end
  #--------------------------------------------------------------------------
  # ● セグメントの設定
  #--------------------------------------------------------------------------
  def segment=(segment)
    return if @segment == segment
    @segment = segment
    self.refresh
    self.height = self.window_height
    self.oy = 0
  end
  #--------------------------------------------------------------------------
  # ● セグメントを取得
  #--------------------------------------------------------------------------
  def segment
    @segment
  end
  #--------------------------------------------------------------------------
  # ● アイテムを許可状態で表示するかどうか
  #--------------------------------------------------------------------------
  def enable?(item)
    $game_party.usable?(item)
  end
  #--------------------------------------------------------------------------
  # ● アイテムリストの作成
  #--------------------------------------------------------------------------
  def make_item_list
    @data = []
    return if @segment.nil?
    @data = @segment.map{|extend| extend.item }.select{|item| include?(item)}
    @data.push(nil) if include?(nil)
  end
  #--------------------------------------------------------------------------
  # ● 項目の描画
  #--------------------------------------------------------------------------
  def draw_item(index)
    item = @data[index]
    if item
      rect = item_rect(index)
      if item.class == RPG::Skill
        draw_skill_cost(rect, item)
        rect.width -= 60
        draw_item_name(item, rect.x, rect.y, enable?(item), rect.width)
      else
        rect.width -= 24
        draw_item_name(item, rect.x, rect.y, enable?(item), rect.width)
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● スキルの使用コストを描画
  #--------------------------------------------------------------------------
  def draw_skill_cost(rect, skill)
    return if @item_window.nil?
    if @item_window.actor.skill_tp_cost(skill) > 0
      change_color(tp_cost_color, enable?(skill))
      draw_text(rect, @item_window.actor.skill_tp_cost(skill), 2)
    elsif @item_window.actor.skill_mp_cost(skill) > 0
      change_color(mp_cost_color, enable?(skill))
      draw_text(rect, @item_window.actor.skill_mp_cost(skill), 2)
    end
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  def refresh
    make_item_list
    create_contents
    draw_all_items
  end
  #--------------------------------------------------------------------------
  # ● ヘルプテキスト更新
  #--------------------------------------------------------------------------
  def update_help
    @help_window.set_item(item)
  end
end
#==============================================================================
# ■ BMSP::Window_BattleExtendItem
#------------------------------------------------------------------------------
# 　バトル中，セグメントの中身を表示するウインドウです．
#==============================================================================
class BMSP::Window_BattleExtendItem < BMSP::Window_ExtendItem
  #--------------------------------------------------------------------------
  # ● アイテムを許可状態で表示するかどうか
  #--------------------------------------------------------------------------
  def enable?(item)
    true
  end
  #--------------------------------------------------------------------------
  # ● アイテムリストの作成
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_make_item_list make_item_list
  def make_item_list
    # アクターの入力で選択された拡張アイテム一覧を取得
    baseitems = $game_party.members.map{|actor|
      actor.actions.map{|action| action.item}
    }.flatten.compact
    items = baseitems.select{|item|
      next false if item.nil?
      case item
      when RPG::Item,RPG::Weapon,RPG::Armor
        true
      else
        false
      end
    }
    skills = baseitems.select{|item|
      item ? item.class == RPG::Skill : false
    }
    @actor_input_extenditems = items.map{|item| item.extend}
    @actor_input_extendskills = skills.map{|skill| skill.extend}
    bmsp_itemsegment_make_item_list
  end
  #--------------------------------------------------------------------------
  # ● アイテムをリストに含めるかどうか(再定義)
  #--------------------------------------------------------------------------
  def include?(item)
    return false if item.nil?
    case item
    when RPG::Item,RPG::Weapon,RPG::Armor
      return include_extenditem?(item)
    when RPG::Skill
      return include_extendskill?(item)
    end
    return false
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムをリストに含めるかどうか
  #--------------------------------------------------------------------------
  def include_extenditem?(item)
    # 行動決定済みのアクターが選んだアイテムで，消費するものであれば除外する
    return false unless $game_party.usable?(item)
    !@actor_input_extenditems.include?(item.extend) || !item.consumable
  end
  #--------------------------------------------------------------------------
  # ● 拡張スキルをリストに含めるかどうか
  #--------------------------------------------------------------------------
  def include_extendskill?(item)
    # 行動決定済みのアクターが選んだアイテムで，消費するものであれば除外する
    !@actor_input_extendskills.include?(item.extend) || !item.consumable
  end
end
#==============================================================================
# ■ Window_EquipItem
#==============================================================================
class Window_EquipItem < Window_ItemList
  #--------------------------------------------------------------------------
  # ● アイテムをリストに含めるかどうか
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_include? include?
  def include?(item)
    return true if item.nil?
    if item.segment?
      # ひとつでも装備可能なアイテムを含んでいれば許可(装備拡張への対応)
      item.extend.each do |ext|
        return true if bmsp_itemsegment_include?(ext.item)
      end
      return false
    else
      return bmsp_itemsegment_include?(item)
    end
  end
end
#==============================================================================
# ■ BMSP::Window_EquipExtendItem
#------------------------------------------------------------------------------
# 　装備画面で，セグメントの中身を表示するウインドウです．
#==============================================================================
class BMSP::Window_EquipExtendItem < BMSP::Window_ExtendItem
  #--------------------------------------------------------------------------
  # ● アイテムウインドウの設定
  #--------------------------------------------------------------------------
  def item_window=(window)
    super
    return if @item_window.nil?
    # 各種アクセサを追加
    class << @item_window
      attr_reader :actor, :slot_id
    end
  end
  #--------------------------------------------------------------------------
  # ● アイテムをリストに含めるかどうか
  #--------------------------------------------------------------------------
  def include?(item)
    return false if @item_window.nil?
    return false if item.nil?
    return false unless item.is_a?(RPG::EquipItem)
    return false if @item_window.slot_id < 0
    return false if item.etype_id != @item_window.actor.equip_slots[@item_window.slot_id]
    return @item_window.actor.equippable?(item)
  end
  #--------------------------------------------------------------------------
  # ● アイテムを許可状態で表示するかどうか
  #--------------------------------------------------------------------------
  def enable?(item)
    return true
  end
  #--------------------------------------------------------------------------
  # ● ヘルプテキスト更新
  #--------------------------------------------------------------------------
  def update_help
    super
    return if @item_window.nil?
    if @item_window.actor && @item_window.status_window
      temp_actor = Marshal.load(Marshal.dump(@item_window.actor))
      temp_actor.force_change_equip(@item_window.slot_id, item)
      @item_window.status_window.set_temp_actor(temp_actor)
    end
  end
end
#==============================================================================
# ■ BMSP::Window_Deflag
#------------------------------------------------------------------------------
# 　セグメントをまとめる際の選択肢のウインドウです．
#==============================================================================
class BMSP::Window_Deflag < BMSP::Window_Fitting
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize
    super
    self.openness = 0
  end
  #--------------------------------------------------------------------------
  # ● アイテムリストの作成
  #--------------------------------------------------------------------------
  def make_item_list
    @data = ["全部まとめる","選んでまとめる"]
  end
  #--------------------------------------------------------------------------
  # ● 項目の描画
  #--------------------------------------------------------------------------
  def draw_item(index)
    item = @data[index]
    rect = item_rect(index)
    draw_text(rect, item)
  end
  #--------------------------------------------------------------------------
  # ● ヘルプテキスト更新
  #--------------------------------------------------------------------------
  def update_help
    case self.index
    when 0
      mes = "すべてのセグメントをまとめます。"
    when 1
      mes = "選んだセグメントをまとめます。"
    else
      mes = ""
    end
    @help_window.set_text(mes)
  end
end
#==============================================================================
# ■ Window_KeyItem
#==============================================================================
class Window_KeyItem < Window_ItemList
  #--------------------------------------------------------------------------
  # ● 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_accessor :extend_window
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_key_initialize initialize
  def initialize(message_window)
    bmsp_itemsegment_key_initialize(message_window)
    @extend_window = nil
  end
  #--------------------------------------------------------------------------
  # ● 決定時の処理
  #--------------------------------------------------------------------------
  if BMSP::ItemSegmentSystem::ITEM_SELECT_EXTEND #### アイテム選択拡張あり
  alias bmsp_itemsegment_on_ok on_ok
  def on_ok
    if item.extend? # 単品アイテム
      bmsp_itemsegment_on_ok
      # アイテムオブジェクトをそのまま代入
      $game_variables[$game_message.item_choice_variable_id] = item
    else
      # セグメントの設定
      extend_window.segment = item.extend
      @extend_window.set
      @extend_window.refresh
      @extend_window.open
      @extend_window.activate
      @extend_window.index = 0
    end
  end
  end
end
#==============================================================================
# ■ BMSP::Window_KeyExtendItem
#------------------------------------------------------------------------------
# 　アイテム選択の処理中，セグメントの中身を表示するウインドウです．
#==============================================================================
class BMSP::Window_KeyExtendItem < BMSP::Window_ExtendItem
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize
    super
    set_handler(:ok,     method(:on_ok))
    set_handler(:cancel, method(:on_cancel))
  end
  #--------------------------------------------------------------------------
  # ● 決定時の処理
  #--------------------------------------------------------------------------
  def on_ok
    # アイテムオブジェクトをそのまま代入
    $game_variables[$game_message.item_choice_variable_id] = item
    close
    @item_window.close
  end
  #--------------------------------------------------------------------------
  # ● キャンセル時の処理
  #--------------------------------------------------------------------------
  def on_cancel
    close
    @item_window.activate
  end
end
#==============================================================================
# ■ Window_Message
#==============================================================================
class Window_Message < Window_Base
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_message_initialize initialize
  def initialize
    bmsp_itemsegment_message_initialize
    create_extend_window
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムウィンドウの作成
  #--------------------------------------------------------------------------
  def create_extend_window
    @extend_window = BMSP::Window_KeyExtendItem.new
    @extend_window.viewport = @viewport
    @extend_window.item_window = @item_window
    @item_window.extend_window = @extend_window
    @extend_window.init
  end
  #--------------------------------------------------------------------------
  # ● 全ウィンドウの解放
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_dispose_all_windows dispose_all_windows
  def dispose_all_windows
    bmsp_itemsegment_dispose_all_windows
    @extend_window.dispose
  end
  #--------------------------------------------------------------------------
  # ● 全ウィンドウの更新
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_update_all_windows update_all_windows
  def update_all_windows
    bmsp_itemsegment_update_all_windows
    @extend_window.update
  end
  #--------------------------------------------------------------------------
  # ● 全ウィンドウが完全に閉じているか判定
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_all_close? all_close?
  def all_close?
    bmsp_itemsegment_all_close? && @extend_window.close?
  end
  #--------------------------------------------------------------------------
  # ● アイテムの選択処理(再定義)
  #--------------------------------------------------------------------------
  def input_item
    @item_window.start
    Fiber.yield while @item_window.active || @extend_window.active
  end
end
#==============================================================================
# ■ Window_ShopSell
#==============================================================================
class Window_ShopSell < Window_ItemList
  #--------------------------------------------------------------------------
  # ● アイテムを許可状態で表示するかどうか
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_shopsell_enable? enable?
  def enable?(item)
    return false if item.nil?
    return bmsp_itemsegment_shopsell_enable?(item) if item.extend?
    # セグメント内に売れるアイテムが無ければ無効
    item.extend.each do |extend|
      return true if enable?(extend.item)
    end
    return false
  end
end
#==============================================================================
# ■ BMSP::Window_ShopExtendItem
#------------------------------------------------------------------------------
# 　ショップ画面で，セグメントの中身を表示するウインドウです．
#==============================================================================
class BMSP::Window_ShopExtendItem < BMSP::Window_ExtendItem
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize(x, y, height)
    @window_height = height
    super()
    self.move(x, y, window_width, window_height)
    self.openness = 255
    self.hide
    @currency_unit = nil
    @pricelist = []
  end
  #--------------------------------------------------------------------------
  # ● ウィンドウ幅の取得
  #--------------------------------------------------------------------------
  def window_width
    return 304
  end
  #--------------------------------------------------------------------------
  # ● ウインドウの高さ
  #--------------------------------------------------------------------------
  def window_height
    @window_height
  end
  #--------------------------------------------------------------------------
  # ● アイテムを許可状態で表示するかどうか
  #--------------------------------------------------------------------------
  def enable?(item)
    item && item.price > 0
  end
  #--------------------------------------------------------------------------
  # ● 通貨単位の設定
  #--------------------------------------------------------------------------
  def currency_unit=(currency_unit)
    @currency_unit = currency_unit
    refresh
  end
  #--------------------------------------------------------------------------
  # ● 売却価格一覧の設定
  #--------------------------------------------------------------------------
  def pricelist=(list)
    @pricelist = list
    refresh
  end
  #--------------------------------------------------------------------------
  # ● 項目の描画
  #--------------------------------------------------------------------------
  def draw_item(index)
    item = @data[index]
    if item
      rect = item_rect(index)
      rect.height /= 2
      rect.width -= 24
      draw_item_name(item, rect.x, rect.y, enable?(item), rect.width)
      rect.y += rect.height
      price = @pricelist[index] ? @pricelist[index] : 0
      if price > 0
        draw_currency_value(price, @currency_unit, rect.x, rect.y, rect.width)
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 項目の高さを取得
  #--------------------------------------------------------------------------
  def item_height
    return (super * 2)
  end
end
#==============================================================================
# ■ Window_ShopNumber
#==============================================================================
unless BMSP::ItemSegmentSystem::SHOP_EXTEND #### ショップ拡張なし
class Window_ShopNumber < Window_Selectable
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_initialize initialize
  def initialize(x, y, height)
    bmsp_itemsegment_initialize(x, y, height)
    @bmsp_decide = false
  end
  #--------------------------------------------------------------------------
  # ● アイテム、最大個数、価格、通貨単位の設定
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_set set
  def set(item, max, price, currency_unit = nil)
    @bmsp_decide = max == -1
    bmsp_itemsegment_set(item, max, price)
  end
  #--------------------------------------------------------------------------
  # ● 個数の描画(再定義)
  #--------------------------------------------------------------------------
  def draw_number
    change_color(normal_color)
    if @bmsp_decide
      draw_text(cursor_x + 4, item_y, cursor_width, line_height, "売却")
    else
      draw_text(cursor_x - 28, item_y, 22, line_height, "×")
      draw_text(cursor_x, item_y, cursor_width - 4, line_height, @number, 2)
    end
  end
  #--------------------------------------------------------------------------
  # ● カーソルの幅を取得(再定義)
  #--------------------------------------------------------------------------
  def cursor_width
    @bmsp_decide ? 48 : figures * 10 + 12
  end
end
end
#==============================================================================
# ■ BMSP::Window_MultiSell
#------------------------------------------------------------------------------
# 　ショップ画面で，アイテムをまとめて売る時の選択肢のウインドウです．
#==============================================================================
class BMSP::Window_MultiSell < BMSP::Window_Fitting
  #--------------------------------------------------------------------------
  # ● 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_accessor :sellitems
  attr_accessor :sellprice
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize
    super
    self.openness = 0
    @currency_unit = nil
    @sellitems = []
    @sellprice = 0
  end
  #--------------------------------------------------------------------------
  # ● アイテムリストの作成
  #--------------------------------------------------------------------------
  def make_item_list
    @data = ["まとめて売る","やめる"]
  end
  #--------------------------------------------------------------------------
  # ● 通貨単位の設定
  #--------------------------------------------------------------------------
  def currency_unit=(currency_unit)
    @currency_unit = currency_unit
    refresh
  end
  #--------------------------------------------------------------------------
  # ● 項目の描画
  #--------------------------------------------------------------------------
  def draw_item(index)
    item = @data[index]
    rect = item_rect(index)
    change_color(normal_color)
    if index == 0
      rect.height /= 2
      draw_text(rect, item, 1)
      rect.y += rect.height
      rect.width -= 12
      draw_currency_value(@sellprice, @currency_unit, rect.x, rect.y, rect.width)
    else
      draw_text(rect, item, 1)
    end
  end
  #--------------------------------------------------------------------------
  # ● ヘルプテキスト更新
  #--------------------------------------------------------------------------
  def update_help
    case self.index
    when 0
      mes = "選んだアイテムをすべて売ります。"
    when 1
      mes = "やっぱりやめます。"
    else
      mes = ""
    end
    @help_window.set_text(mes)
  end
  #--------------------------------------------------------------------------
  # ● ウインドウの高さ
  #--------------------------------------------------------------------------
  def window_height
    line = [@data.size, 1].max
    self.fitting_height(line*2)
  end
  #--------------------------------------------------------------------------
  # ● 項目の高さを取得
  #--------------------------------------------------------------------------
  def item_height
    return (super * 2)
  end
end
#==============================================================================
# ■ Scene_Shop
#==============================================================================
class Scene_Shop < Scene_MenuBase
  #--------------------------------------------------------------------------
  # ● 最大売却可能個数の取得(再定義)
  #--------------------------------------------------------------------------
  def max_sell
    $game_party.segment_number(@item)
  end
  if BMSP::ItemSegmentSystem::SHOP_EXTEND #### ショップ拡張あり
  #--------------------------------------------------------------------------
  # ● 開始処理
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_start start
  def start
    bmsp_itemsegment_start
    create_extend_window
    create_multisell_window
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムウィンドウの作成
  #--------------------------------------------------------------------------
  def create_extend_window
    wy = @dummy_window.y
    wh = @dummy_window.height
    @extend_window = BMSP::Window_ShopExtendItem.new(0, wy, wh)
    @extend_window.viewport = @viewport
    @extend_window.hide
    @extend_window.set_handler(:ok,     method(:on_extend_ok))
    @extend_window.set_handler(:cancel, method(:on_extend_cancel))
  end
  #--------------------------------------------------------------------------
  # ● まとめ売りウィンドウの作成
  #--------------------------------------------------------------------------
  def create_multisell_window
    @multisell_window = BMSP::Window_MultiSell.new
    @multisell_window.viewport = @viewport
    @multisell_window.set_handler(:ok,     method(:on_multisell_ok))
    @multisell_window.set_handler(:cancel, method(:on_multisell_cancel))
    @multisell_window.item_window = @sell_window
    @multisell_window.help_window = @help_window
    # 複数選択のハンドラ
    if BMSP::ItemSegmentSystem::DEFLAG && BMSP.check_require(:MultiSelect, 1.00)
      @sell_window.set_handler(:multiselect, method(:on_sell_multiselect))
      @sell_window.set_handler(:multi_ok, method(:on_sell_multi_ok))
      @sell_window.set_handler(:multi_cancel, method(:on_sell_multi_cancel))
      @sell_window.set_handler(:multi_multiselect, method(:on_sell_multi_multiselect))
    end
  end
  #--------------------------------------------------------------------------
  # ● 売却［決定］(再定義)
  #--------------------------------------------------------------------------
  def on_sell_ok
    @item = @sell_window.item
    @status_window.item = @item
    @category_window.hide
    @sell_window.hide
    if @item.segment? # セグメント
      @extend_window.segment = @item.extend
    else # 拡張アイテム
      # その拡張アイテムを含むセグメントを検索
      items = $game_party.all_itemsegments
      index = items.index{|segment|
        segment.include?(@item.extend)
      }
      @extend_window.segment = index ? items[index] : nil
    end
    pricelist = @extend_window.segment.map{|extend|
      @item = extend.item
      selling_price
    }
    @extend_window.pricelist = pricelist
    @extend_window.currency_unit = currency_unit
    @extend_window.show.activate
    @extend_window.select(0)
    @status_window.show
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテム［決定］
  #--------------------------------------------------------------------------
  def on_extend_ok
    Sound.play_shop
    @item =  @extend_window.item
    do_sell(1)
    @gold_window.refresh
    @status_window.refresh
    @extend_window.activate
    @extend_window.refresh
    if @extend_window.index >= @extend_window.item_max
      @extend_window.select([@extend_window.item_max - 1, 0].max)
    end
    # セグメントが空なら拡張ウインドウを閉じる
    if @extend_window.item_max == 0
      end_extend_window
    end
  end
  #--------------------------------------------------------------------------
  # ● 拡張ウインドウの終了
  #--------------------------------------------------------------------------
  def end_extend_window
    @extend_window.hide.deactivate
    case @command_window.current_symbol
    when :sell
      activate_sell_window
    end
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテム［キャンセル］
  #--------------------------------------------------------------------------
  def on_extend_cancel
    @extend_window.hide.deactivate
    activate_sell_window
  end
  #--------------------------------------------------------------------------
  # ● まとめ売り［決定］
  #--------------------------------------------------------------------------
  def on_multisell_ok
    if @multisell_window.index == 0 # 決定
      Sound.play_shop
      @multisell_window.sellitems.each do |item|
        @item = item
        do_sell(1)
      end
      @gold_window.refresh
      @multisell_window.close.deactivate
      @sell_window.multiselect = false
      activate_sell_window
    else # キャンセル
      on_multisell_cancel
    end
  end
  #--------------------------------------------------------------------------
  # ● まとめ売り［キャンセル］
  #--------------------------------------------------------------------------
  def on_multisell_cancel
    @multisell_window.close.deactivate
    activate_sell_window
  end
  #--------------------------------------------------------------------------
  # ● 売却ウインドウ［複数選択中決定］
  #--------------------------------------------------------------------------
  def on_sell_multi_ok
    Sound.play_ok
    activate_multisell_window(true)
    @sell_window.deactivate
  end
  #--------------------------------------------------------------------------
  # ● 売却ウインドウ［複数選択中キャンセル］
  #--------------------------------------------------------------------------
  def on_sell_multi_cancel
    Sound.play_cancel
    @sell_window.multiselect = false
  end
  #--------------------------------------------------------------------------
  # ● 売却ウインドウ［複数選択中選択］
  #--------------------------------------------------------------------------
  def on_sell_multi_multiselect
    if @sell_window.item.nil? || !@sell_window.enable?(@sell_window.item)
       # nil or 売れないアイテム
      Sound.play_buzzer
    else
      
      @sell_window.change_multiselect(@sell_window.index)
      if @sell_window.multiselect_index.empty? # キャンセル
        on_sell_multi_cancel
      else
        Sound.play_multiselect
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 売却ウインドウ［選択］
  #--------------------------------------------------------------------------
  def on_sell_multiselect
    if @sell_window.item.nil? || !@sell_window.enable?(@sell_window.item)
      # nil or 売れないアイテム
      Sound.play_buzzer
    else
      Sound.play_multiselect
      @sell_window.multiselect = true
      @sell_window.change_multiselect(@sell_window.index)
    end
  end
  #--------------------------------------------------------------------------
  # ● 売却ウィンドウのアクティブ化
  #--------------------------------------------------------------------------
  alias bmsp_itegsegment_activate_sell_window activate_sell_window
  def activate_sell_window
    bmsp_itegsegment_activate_sell_window
    if @sell_window.index >= @sell_window.item_max
      @sell_window.select([@sell_window.item_max - 1, 0].max)
    end
  end
  #--------------------------------------------------------------------------
  # ● まとめ売りウインドウのアクティブ化
  #--------------------------------------------------------------------------
  def activate_multisell_window(init_index = false)
    # 表示位置と高さの変更
    @multisell_window.set
    # 各種設定
    @multisell_window.currency_unit = currency_unit
    items = @sell_window.multiselect_index.map{|index| @sell_window.item(index)}
    extenditems = items.map{|item|
      if item.segment?
        item.extend.map{|extend| extend.item}
      else
        item
      end
    }.flatten
    @multisell_window.sellitems = extenditems
    pricelist = extenditems.map{|item|
      if @extend_window.enable?(item)
        @item = item
        selling_price
      else
        0
      end
    }
    @multisell_window.sellprice = pricelist.inject(:+)
    
    @multisell_window.refresh
    @multisell_window.open.activate
    @multisell_window.index = 0 if init_index
  end
  else #### ショップ拡張なし
  #--------------------------------------------------------------------------
  # ● 売却［決定］
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_noextend_on_sell_ok on_sell_ok
  def on_sell_ok
    bmsp_itemsegment_noextend_on_sell_ok
    @number_window.set(@item, -1, selling_price, currency_unit) if @item.extend?
    @number_window.update_cursor
  end
  #--------------------------------------------------------------------------
  # ● 売却の実行(再定義)
  #--------------------------------------------------------------------------
  def do_sell(number)
    $game_party.gain_gold(number * selling_price)
    if @item.extend?
      $game_party.lose_item(@item, number)
    else
      $game_party.lose_segmentitem(@item.extend, number)
    end
  end
  end
end
#==============================================================================
# ■ Scene_ItemBase
#==============================================================================
class Scene_ItemBase < Scene_MenuBase
  #--------------------------------------------------------------------------
  # ● 開始処理
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_itembase_start start
  def start
    @active_flag = false
    @active_item_window = nil
    bmsp_itemsegment_itembase_start
    create_extend_window if BMSP::ItemSegmentSystem::ITEM_SELECT_EXTEND
    create_deflag_window
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムウィンドウの作成
  #--------------------------------------------------------------------------
  def create_extend_window
    @extend_window = BMSP::Window_ExtendItem.new
    @extend_window.viewport = @viewport
    @extend_window.set_handler(:ok,     method(:on_extend_ok))
    @extend_window.set_handler(:cancel, method(:on_extend_cancel))
  end
  #--------------------------------------------------------------------------
  # ● まとめるウィンドウの作成
  #--------------------------------------------------------------------------
  def create_deflag_window
    @deflag_window = BMSP::Window_Deflag.new
    @deflag_window.viewport = @viewport
    @deflag_window.set_handler(:ok,     method(:on_deflag_ok))
    @deflag_window.set_handler(:cancel, method(:on_deflag_cancel))
  end
  if BMSP::ItemSegmentSystem::ITEM_SELECT_EXTEND #### アイテム選択拡張あり
  #--------------------------------------------------------------------------
  # ● 現在選択されているアイテムの取得
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_item item
  def item
    if @active_item_window == @extend_window.object_id
      @extend_window.item
    else
      bmsp_itemsegment_item
    end
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  def update
    super
    if @active_flag
      @active_flag = false
      if @item_window.item.nil? || @active_item_window != @extend_window.object_id
        activate_item_window
      else
        activate_extend_window
      end
    end
    if @extend_window.active && @extend_window.segment
      # セグメントが空になったら自動的に拡張アイテムウインドウを閉じる
      if @extend_window.segment.empty?
        @extend_window.close.deactivate
        activate_item_window
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● サブウィンドウの非表示(再定義)
  #--------------------------------------------------------------------------
  def hide_sub_window(window)
    @viewport.rect.x = @viewport.ox = 0
    @viewport.rect.width = Graphics.width
    window.hide.deactivate
    @active_flag = true
  end
  #--------------------------------------------------------------------------
  # ● アクター［決定］
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_on_actor_ok on_actor_ok
  def on_actor_ok
    item_usable = item_usable?
    consumable = item ? item.consumable : false
    bmsp_itemsegment_on_actor_ok
    hide_sub_window(@actor_window) if item_usable && consumable
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテム［決定］
  #--------------------------------------------------------------------------
  def on_extend_ok
    if item.for_friend?
      show_sub_window(@actor_window)
      @actor_window.select_for_item(item)
    else
      use_item
      activate_extend_window
    end
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテム［キャンセル］
  #--------------------------------------------------------------------------
  def on_extend_cancel
    @extend_window.close.deactivate
    activate_item_window
  end
  #--------------------------------------------------------------------------
  # ● アイテムの決定
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_determine_item determine_item
  def determine_item
    if item.extend? # 単品アイテム
      bmsp_itemsegment_determine_item
    else
      activate_extend_window(true)
    end
  end
  #--------------------------------------------------------------------------
  # ● アイテムウィンドウのアクティブ化
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_activate_item_window activate_item_window
  def activate_item_window
    bmsp_itemsegment_activate_item_window
    @active_item_window = @item_window.object_id
    # インデックスの修正
    if @item_window.index >= @item_window.item_max
      if @item_window.item_max > 0
        @item_window.select(@item_window.item_max - 1)
      else
        @item_window.select(0)
      end
    end
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムウインドウのアクティブ化
  #--------------------------------------------------------------------------
  def activate_extend_window(init_index = false)
    @active_item_window = @extend_window.object_id
    # セグメントの設定
    @extend_window.segment = @item_window.item.extend
    # 表示位置と高さの変更
    @extend_window.set
    
    @extend_window.refresh
    @extend_window.open.activate
    @extend_window.index = 0 if init_index
  end
  else #### アイテム選択拡張なし
  #--------------------------------------------------------------------------
  # ● アイテムの使用(再定義)
  #--------------------------------------------------------------------------
  def use_item
    play_se_for_item
    if item.segment?
      user.use_item(item.extend.first.item)
    else
      user.use_item(item)
    end
    use_item_to_actors
    check_common_event
    check_gameover
    @actor_window.refresh
  end
  end
  #--------------------------------------------------------------------------
  # ● まとめる［決定］
  #--------------------------------------------------------------------------
  def on_deflag_ok
    case @deflag_window.index
    when 0 # 全部まとめる
      base = @item_window.item(@item_window.index)
      items = @item_window.all_items.select{|item|
        base.id == item.id && base != item
      }
      determine_deflag(items.unshift(base))
    when 1 # 選んでまとめる
      @item_window.multiselect = true
      @item_window.change_multiselect(@item_window.index)
    end
    @deflag_window.close.deactivate
    activate_item_window
  end
  #--------------------------------------------------------------------------
  # ● まとめる［キャンセル］
  #--------------------------------------------------------------------------
  def on_deflag_cancel
    @deflag_window.close.deactivate
    activate_item_window
  end
  #--------------------------------------------------------------------------
  # ● アイテム［複数選択中決定］
  #--------------------------------------------------------------------------
  def on_item_multi_ok
    Sound.play_ok
    items = @item_window.multiselect_index.map{|index|
      @item_window.item(index)
    }
    determine_deflag(items)
    @item_window.multiselect = false
    @item_window.refresh
  end
  #--------------------------------------------------------------------------
  # ● アイテム［複数選択中キャンセル］
  #--------------------------------------------------------------------------
  def on_item_multi_cancel
    Sound.play_cancel
    @item_window.multiselect = false
  end
  #--------------------------------------------------------------------------
  # ● アイテム［複数選択中選択］
  #--------------------------------------------------------------------------
  def on_item_multi_multiselect
    selectitem = @item_window.item(@item_window.index)
    baseitem = @item_window.item(@item_window.multiselect_index.first)
    if selectitem.id == baseitem.id
      if selectitem != baseitem
        Sound.play_multiselect
        @item_window.change_multiselect(@item_window.index)
      else # まとめられるメインセグメントは変更できない
        Sound.play_buzzer
      end
    else # 種類が違う
      Sound.play_buzzer
    end
  end
  #--------------------------------------------------------------------------
  # ● アイテム［選択］
  #--------------------------------------------------------------------------
  def on_item_multiselect
    if item.nil? || item.extend? # nil or 単品アイテム
      # まとめられない
      Sound.play_buzzer
    else
      Sound.play_ok
      activate_deflag_window(true)
      @item_window.deactivate
    end
  end
  #--------------------------------------------------------------------------
  # ● まとめるの決定
  #--------------------------------------------------------------------------
  def determine_deflag(items)
    base = items.shift
    case base
    when RPG::Skill # スキル
      @item_window.actor.deflag(base, items)
    else # アイテム
      $game_party.deflag(base, items)
    end
  end
  #--------------------------------------------------------------------------
  # ● まとめるウインドウのアクティブ化
  #--------------------------------------------------------------------------
  def activate_deflag_window(init_index = false)
    # 表示位置と高さの変更
    @deflag_window.set
    
    @deflag_window.refresh
    @deflag_window.open.activate
    @deflag_window.index = 0 if init_index
  end
end
#==============================================================================
# ■ Scene_Item
#==============================================================================
class Scene_Item < Scene_ItemBase
  #--------------------------------------------------------------------------
  # ● 開始処理
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_item_start start
  def start
    bmsp_itemsegment_item_start
    # 関連付け
    if BMSP::ItemSegmentSystem::ITEM_SELECT_EXTEND
      @extend_window.item_window = @item_window
      @extend_window.help_window = @help_window
    end
    @deflag_window.item_window = @item_window
    @deflag_window.help_window = @help_window
    # 複数選択のハンドラ
    if BMSP::ItemSegmentSystem::DEFLAG && BMSP.check_require(:MultiSelect, 1.00)
      @item_window.set_handler(:multiselect, method(:on_item_multiselect))
      @item_window.set_handler(:multi_ok, method(:on_item_multi_ok))
      @item_window.set_handler(:multi_cancel, method(:on_item_multi_cancel))
      @item_window.set_handler(:multi_multiselect, method(:on_item_multi_multiselect))
    end
  end
end
#==============================================================================
# ■ Scene_Skill
#==============================================================================
class Scene_Skill < Scene_ItemBase
  #--------------------------------------------------------------------------
  # ● アイテムの使用(再定義)
  #--------------------------------------------------------------------------
  def use_item
    super
    @status_window.refresh
    @item_window.redraw_current_item
  end
  #--------------------------------------------------------------------------
  # ● 開始処理
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_skill_start start
  def start
    bmsp_itemsegment_skill_start
    # 関連付け
    if BMSP::ItemSegmentSystem::ITEM_SELECT_EXTEND
      @extend_window.item_window = @item_window
      @extend_window.help_window = @help_window
    end
      @deflag_window.item_window = @item_window
      @deflag_window.help_window = @help_window
    # 複数選択のハンドラ
    if BMSP::ItemSegmentSystem::DEFLAG && BMSP.check_require(:MultiSelect, 1.00)
      @item_window.set_handler(:multiselect, method(:on_item_multiselect))
      @item_window.set_handler(:multi_ok, method(:on_item_multi_ok))
      @item_window.set_handler(:multi_cancel, method(:on_item_multi_cancel))
      @item_window.set_handler(:multi_multiselect, method(:on_item_multi_multiselect))
    end
  end
end
#==============================================================================
# ■ Scene_Equip
#==============================================================================
class Scene_Equip < Scene_MenuBase
  #--------------------------------------------------------------------------
  # ● 開始処理
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_start start
  def start
    @active_item_window = nil
    bmsp_itemsegment_start
    create_extend_window if BMSP::ItemSegmentSystem::ITEM_SELECT_EXTEND
  end
  if BMSP::ItemSegmentSystem::ITEM_SELECT_EXTEND #### アイテム選択拡張あり
  #--------------------------------------------------------------------------
  # ● 拡張アイテムウィンドウの作成
  #--------------------------------------------------------------------------
  def create_extend_window
    @extend_window = BMSP::Window_EquipExtendItem.new
    @extend_window.viewport = @viewport
    @extend_window.help_window = @help_window
    @extend_window.set_handler(:ok,     method(:on_extend_ok))
    @extend_window.set_handler(:cancel, method(:on_extend_cancel))
    # アイテムウインドウの設定
    @extend_window.item_window = @item_window
  end
  #--------------------------------------------------------------------------
  # ● 現在選択されているアイテムの取得
  #--------------------------------------------------------------------------
  def item
    if @active_item_window == @extend_window.object_id
      @extend_window.item
    else
      @item_window.item
    end
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテム［決定］
  #--------------------------------------------------------------------------
  def on_extend_ok
    change_equip
    @extend_window.close.deactivate
    @active_item_window = nil
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテム［キャンセル］
  #--------------------------------------------------------------------------
  def on_extend_cancel
    @extend_window.close.deactivate
    @active_item_window = nil
    activate_item_window
  end
  #--------------------------------------------------------------------------
  # ● 選択したアイテムへ装備の変更
  #--------------------------------------------------------------------------
  def change_equip
    Sound.play_equip
    @actor.change_equip(@slot_window.index, item)
    @slot_window.activate
    @slot_window.refresh
    @item_window.unselect
    @item_window.refresh
  end
  #--------------------------------------------------------------------------
  # ● アイテム［決定］
  #--------------------------------------------------------------------------
  alias bmsp_item_segment_on_item_ok on_item_ok
  def on_item_ok
    if item.nil? || item.extend? # 単品アイテム
      bmsp_item_segment_on_item_ok
    else
      activate_extend_window(true)
    end
  end
  #--------------------------------------------------------------------------
  # ● アイテムウインドウのアクティブ化(再定義)
  #--------------------------------------------------------------------------
  def activate_item_window
    @item_window.activate
    @active_item_window = @item_window.object_id
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムウインドウのアクティブ化
  #--------------------------------------------------------------------------
  def activate_extend_window(init_index = false)
    @active_item_window = @extend_window.object_id
    # セグメントの設定
    @extend_window.segment = @item_window.item.extend
    # 表示位置と高さの変更
    @extend_window.set
    
    @extend_window.refresh
    @extend_window.open.activate
    @extend_window.index = 0 if init_index
  end
  else #### アイテム選択拡張なし
  #--------------------------------------------------------------------------
  # ● アイテム［決定］
  #--------------------------------------------------------------------------
  alias bmsp_item_segment_on_item_ok on_item_ok
  def on_item_ok
    if @item_window.item.nil? || @item_window.item.extend? # 単品アイテム
      bmsp_item_segment_on_item_ok
    else
      Sound.play_equip
      equip_item = @item_window.item.extend.first.item
      @actor.change_equip(@slot_window.index, equip_item)
      @slot_window.activate
      @slot_window.refresh
      @item_window.unselect
      @item_window.refresh
    end
  end
  end
end
#==============================================================================
# ■ Scene_Battle
#==============================================================================
class Scene_Battle < Scene_Base
  #--------------------------------------------------------------------------
  # ● 開始処理
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_start start
  def start
    bmsp_itemsegment_start
    create_extend_window if BMSP::ItemSegmentSystem::ITEM_SELECT_EXTEND
  end
  if BMSP::ItemSegmentSystem::ITEM_SELECT_EXTEND #### アイテム選択拡張あり
  #--------------------------------------------------------------------------
  # ● 拡張アイテムウィンドウの作成
  #--------------------------------------------------------------------------
  def create_extend_window
    @extend_window = BMSP::Window_BattleExtendItem.new
    @extend_window.help_window = @help_window
    @extend_window.set_handler(:ok,     method(:on_extend_ok))
    @extend_window.set_handler(:cancel, method(:on_extend_cancel))
  end
  #--------------------------------------------------------------------------
  # ● アクター［決定］
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_on_actor_ok on_actor_ok
  def on_actor_ok
    @extend_window.openness = 0
    @extend_window.close
    @extend_window_valid = false
    bmsp_itemsegment_on_actor_ok
  end
  #--------------------------------------------------------------------------
  # ● アクター［キャンセル］
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_on_actor_cancel on_actor_cancel
  def on_actor_cancel
    if @extend_window_valid
      @actor_window.hide
      @extend_window.activate
    else
      bmsp_itemsegment_on_actor_cancel
    end
  end
  #--------------------------------------------------------------------------
  # ● 敵キャラ［決定］
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_on_enemy_ok on_enemy_ok
  def on_enemy_ok
    @extend_window.openness = 0
    @extend_window.close
    @extend_window_valid = false
    bmsp_itemsegment_on_enemy_ok
  end
  #--------------------------------------------------------------------------
  # ● 敵キャラ［キャンセル］
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_on_enemy_cancel on_enemy_cancel
  def on_enemy_cancel
    if @extend_window_valid
      @enemy_window.hide
      @extend_window.activate
    else
      bmsp_itemsegment_on_enemy_cancel
    end
  end
  #--------------------------------------------------------------------------
  # ● スキル［決定］
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_on_skill_ok on_skill_ok
  def on_skill_ok
    if @skill_window.item.extend? # 単品アイテム
      input = BattleManager.actor.input
      bmsp_itemsegment_on_skill_ok
      # オブジェクトで再設定
      input.set_skill(@skill_window.item)
    else
      activate_extend_window(@skill_window, true)
    end
  end
  #--------------------------------------------------------------------------
  # ● アイテム［決定］
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_on_item_ok on_item_ok
  def on_item_ok
    if @item_window.item.extend? # 単品アイテム
      input = BattleManager.actor.input
      bmsp_itemsegment_on_item_ok
      # オブジェクトで再設定
      input.set_item(@item_window.item)
    else
      activate_extend_window(@item_window, true)
    end
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテム［決定］
  #--------------------------------------------------------------------------
  def on_extend_ok
    if @extend_window.item.class == RPG::Skill
      @skill = @extend_window.item
      select = @skill
      BattleManager.actor.last_skill.object = select
      BattleManager.actor.input.set_skill(select)
    else
      @item = @extend_window.item
      select = @item
      $game_party.last_item.object = select
      BattleManager.actor.input.set_item(select)
    end
    if !select.need_selection?
      @extend_window.openness = 0
      @extend_window.close
      @extend_window_valid = false
      @item_window.hide
      @skill_window.hide
      next_command
    elsif select.for_opponent?
      select_enemy_selection
    else
      select_actor_selection
    end
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテム［キャンセル］
  #--------------------------------------------------------------------------
  def on_extend_cancel
    @extend_window.close
    @extend_window_valid = false
    if @extend_window.item_window == @item_window
      @item_window.activate
    else
      @skill_window.activate
    end
  end
  #--------------------------------------------------------------------------
  # ● 拡張アイテムウインドウのアクティブ化
  #--------------------------------------------------------------------------
  def activate_extend_window(window, init_index = false)
    @extend_window_valid = true
    @extend_window.item_window = window
    # ウインドウがinfo_viewportにかぶるのを防ぐためのビューポート
    x = 0
    y = 0
    w = window.x + window.width
    h = window.y + window.height
    viewport = Viewport.new(x,y,w,h)
    viewport.z = window.z + 1
    @extend_window.viewport = viewport
    # セグメントの設定
    @extend_window.segment = window.item.extend
    # 表示位置と高さの変更
    @extend_window.set
    
    @extend_window.refresh
    @extend_window.open.activate
    @extend_window.index = 0 if init_index
  end
  else #### アイテム選択拡張なし
  #--------------------------------------------------------------------------
  # ● スキル［決定］
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_on_skill_ok on_skill_ok
  def on_skill_ok
    input = BattleManager.actor.input
    bmsp_itemsegment_on_skill_ok
    if @skill_window.item.extend? # 単品アイテム
      # オブジェクトで再設定
      input.set_skill(@skill_window.item)
    else
      segment = @skill_window.item.extend
      index = segment.index{|extend|
        @skill_window.include_extend?(extend.item)
      }
      index = index ? index : 0
      input.set_skill(segment[index].item)
    end
  end
  #--------------------------------------------------------------------------
  # ● アイテム［決定］
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_on_item_ok on_item_ok
  def on_item_ok
    input = BattleManager.actor.input
    bmsp_itemsegment_on_item_ok
    if @item_window.item.extend? # 単品アイテム
      # オブジェクトで再設定
      input.set_item(@item_window.item)
    else
      # オブジェクトで再設定
      segment = @item_window.item.extend
      index = segment.index{|extend|
        @item_window.include_extend?(extend.item)
      }
      index = index ? index : 0
      input.set_item(segment[index].item)
    end
  end
  end
end
#==============================================================================
# ■ Game_Interpreter
#==============================================================================
class Game_Interpreter
  #--------------------------------------------------------------------------
  # ● 条件分岐
  #--------------------------------------------------------------------------
  alias bmsp_itemsegment_command_111 command_111
  def command_111
    handle = false
    case @params[0]
    when 4  # アクター
      actor = $game_actors[@params[1]]
      if actor
        case @params[2]
        when 4  # 武器
          handle = true
          result = actor.weapons.map{|weapon|
            weapon.extend? ? weapon.extend.original : weapon
          }.include?($data_weapons[@params[3]])
        when 5  # 防具
          handle = true
          result = actor.armors.map{|armor|
            armor.extend? ? armor.extend.original : armor
          }.include?($data_armors[@params[3]])
        end
      end
    end
    if handle
      @branch[@indent] = result
      command_skip if !@branch[@indent]
      return
    end
    bmsp_itemsegment_command_111
  end
end

|ページトップへ|

更新履歴

2014/04/22…スキル習得アイテムがスキルを習得済みでも使用できるバグを修正
2014/02/06…イベントコマンドによる装備の変更に関するバグを修正
2014/01/21…条件分岐にて装備中判定が正常に行われないバグを修正
2014/01/16…攻撃回数追加の特徴が反映されないバグを修正
2013/10/20…バージョン番号のズレを修正
2013/02/11…装備の特徴で追加されたスキルが使用不可になる問題，レベルアップ時に何度もスキル習得が表示される問題を修正
2012/09/12…アイテムIDシフトによる個別化に対応するための更新
2012/08/31…公開

|ページトップへ|

使用方法

スクリプトに丸ごと貼り付けていただければ使用できます．

まずこのスクリプトの概念の説明をします．
VXAceデフォルトの仕様ではアイテムはアイテムIDごとに個数(整数)で管理されています．
このスクリプトではアイテム一つ一つを別のオブジェクトとして管理します．
この一つ一つを拡張アイテムと呼ぶことにします．
なので，同じアイテムでも一つだけ効果が違ったり，強化したりすることが可能になります．

また，アイテムごとに最大所持数を変更でき，セグメントとよばれるアイテムをひとまとまりにする単位の個数もアイテムごとに指定できます．
例えば，最大所持数50，セグメントサイズ10のアイテムAは
A:10，A:10，A:10，A:10，A:10
と所持したり
A:10，A:5，A:6，A:5，A:5，A:8，A:8，A:1
と所持したりすることができます．

セグメントサイズの設定

詳細設定から各種セグメントサイズのデフォルトを指定できます．
また，アイテムごとに設定するにはアイテムのメモ欄に以下の様に記述します．
すると，そのアイテムのセグメントサイズはがxになります．

==セグメントサイズx==

セグメントサイズを1にするとそのアイテムは一つずつ個別に所持します．

最大所持数の設定

詳細設定から各種最大所持数のデフォルトを指定できます．
また，アイテムごとに設定するにはアイテムのメモ欄に以下のように記述することで，そのアイテムの最大所持数をxにできます．

==最大所持数x==

最大所持数をセグメントサイズの倍数にしておくとアイテムを綺麗にまとめられます．

スキルについて

このスクリプトでは拡張のためにスキルについてもセグメントを導入しています．
しかし，このスクリプト単体ではスキルの最大所持数やセグメントサイズを変えても利点は特にありません．

アイテム画面

詳細設定のITEM_SELECT_EXTENDがtrueのとき，アイテム画面にてセグメントを選択すると拡張アイテム選択ウインドウが開き，セグメント内の任意の拡張アイテムを選択することができます．
ITEM_SELECT_EXTENDをfalseにするとセグメントを選択すると自動的にセグメント内の先頭のアイテムが選択されます．
セグメントサイズ1のアイテムのみしか効果に差異をつけないとわかっているような場合ではITEM_SELECT_EXTENDをfalseにしても良いでしょう．

デフラグ

アイテムの追加や売却などで同じ種類のセグメントが無駄に増えてきます．
このとき詳細設定でDEFLAGをtrueにしておけば「まとめる」コマンドが使用でき，セグメント数ができるだけ少なくなるようにまとめることができます．
この機能には「BMSP 複数選択機能」を使用していて，アイテム画面で複数選択ボタンを押すとまとめるためのウインドウが表示されます．
「全部まとめる」を選ぶと，選択しているアイテムのセグメントをすべてまとめます．
「選んでまとめる」を選ぶと，選択しているアイテムを基準にして同じ種類のセグメントを任意個選択し，それらをまとめることができます．

アイテムの増減について

イベントコマンドでアイテムの減少を行うと，対応するセグメント一覧の最初から順番に削除されていきます．

アイテム選択の処理

イベントコマンド「アイテム選択の処理」は，詳細設定のITEM_SELECT_EXTENDがtrueのとき，選んだ拡張アイテムのアイテムオブジェクトが指定した変数に格納されます．
なので，通常の変数の大小による比較はできなくなるので注意してください．
なにも選ばなかった場合は通常通り0が格納されます．
ITEM_SELECT_EXTENDがfalseのときはアイテム選択の処理の挙動はデフォルトと同じです．
ただしこの場合は選んだアイテムIDしか得られないため，拡張アイテムを直接指定してアイテムを減少させたりすることはできなくなります．

まとめ売り

詳細設定でSHOP_EXTENDをtrueにするとショップ画面での売却を拡張アイテムごとに行うことができます．
また，複数選択ボタンを押すことでセグメントを一気に指定してまとめて売却することができます．
SHOP_EXTENDがfalseの場合はデフォルトのショップ画面と同じ仕様になり，セグメント内のアイテムは先頭から順番に売却されます．

VXAceデフォルトの仕様

例えば武器だけセグメントサイズを1にして残りのアイテムはデフォルトのままで管理するので，いちいち拡張アイテム選択ウインドウいらないんだけど！などのような場合，NEW_SEGMENT，DEFLAG，SHOP_EXTEND，ITEM_SELECT_EXTENDをすべてfalseにすることでデフォルトの挙動に近づけることが可能です．

注意

このスクリプトでは「RPG::BaseItem」「RPG::Skill」「RPG::Weapon」「RPG::Armor」「BattleManager」「Game_BaseItem」「Game_Actor」「Game_Party」「Game_Action」「Window_ItemList」「Window_SkillList」「Window_BattleItem」「Window_BattleSkill」「Window_EquipItem」「Window_KeyItem」「Window_Message」「Window_ShopSell」「Window_ShopNumber」「Scene_Shop」「Scene_ItemBase」「Scene_Item」「Scene_Skill」「Scene_Equip」「Scene_Battle」のメソッドを改変しています．

|ページトップへ|

|前のページへ|

BlueRedZone

パンくずリスト

コンテンツ

アイテムセグメント(RGSS3)
Ver1.17(2015/09/01)

メニュー

概要

位置

スクリプト

更新履歴

使用方法

セグメントサイズの設定

最大所持数の設定

スキルについて

アイテム画面

デフラグ

アイテムの増減について

アイテム選択の処理

まとめ売り

VXAceデフォルトの仕様

注意

BlueRedZone

パンくずリスト

コンテンツ

アイテムセグメント(RGSS3) Ver1.17(2015/09/01)

メニュー

概要

位置

スクリプト

更新履歴

使用方法

セグメントサイズの設定

最大所持数の設定

スキルについて

アイテム画面

デフラグ

アイテムの増減について

アイテム選択の処理

まとめ売り

VXAceデフォルトの仕様

注意

アイテムセグメント(RGSS3)
Ver1.17(2015/09/01)