#==============================================================================
# ■ RGSS2 売却不能アイテム Ver1.00　by 星潟
#------------------------------------------------------------------------------
# デフォルトでは価格1G以上のアイテムは売却が出来てしまいますが
# このスクリプトではそのようなアイテムも売却出来ないように出来ます。
# なお、あくまで通常のショップシーンのみを対象としている為
# 特殊な売買を行うシーンの場合、漏れがあるかもしれません。
#==============================================================================
# アイテム・武器・防具のメモ欄に設定。
#------------------------------------------------------------------------------
# <売却不可>
# 
# このアイテムは価格設定が1G以上か否かを問わず売却出来なくなります。
#==============================================================================
module UnsellablePricedItem
  
  #売却不可の設定用キーワードを指定。
  
  Word = "売却不可"
  
end
class Game_Temp
  attr_accessor :unsellable_priced_item_check
end
class Scene_Shop < Scene_Base
  #--------------------------------------------------------------------------
  # 売却アイテム選択の更新
  #--------------------------------------------------------------------------
  alias update_sell_selection_unsellable_priced_item update_sell_selection
  def update_sell_selection
    $game_temp.unsellable_priced_item_check = true
    update_sell_selection_unsellable_priced_item
    $game_temp.unsellable_priced_item_check = nil
  end
end
class Window_ShopSell < Window_Item
  #--------------------------------------------------------------------------
  # アイテムを許可状態で表示するかどうか
  #--------------------------------------------------------------------------
  alias enable_unsellable_priced_item? enable?
  def enable?(item)
    $game_temp.unsellable_priced_item_check = true
    r = enable_unsellable_priced_item?(item)
    $game_temp.unsellable_priced_item_check = nil
    r
  end
end
class RPG::BaseItem
  #--------------------------------------------------------------------------
  # 売却が許可されたアイテムか？
  #--------------------------------------------------------------------------
  def unsellable_item
    (@unsellable_item ||= /<#{UnsellablePricedItem::Word}>/ =~ note ? 1 : 0) == 1
  end
end
class RPG::Item < RPG::UsableItem
  #--------------------------------------------------------------------------
  # 価格
  #--------------------------------------------------------------------------
  alias price_unsellable_priced_item price unless $!
  def price
    (unsellable_item && $game_temp.unsellable_priced_item_check) ? 0 : price_unsellable_priced_item
  end
end
class RPG::Weapon < RPG::BaseItem
  #--------------------------------------------------------------------------
  # 価格
  #--------------------------------------------------------------------------
  alias price_unsellable_priced_item price unless $!
  def price
    (unsellable_item && $game_temp.unsellable_priced_item_check) ? 0 : price_unsellable_priced_item
  end
end
class RPG::Armor < RPG::BaseItem
  #--------------------------------------------------------------------------
  # 価格
  #--------------------------------------------------------------------------
  alias price_unsellable_priced_item price unless $!
  def price
    (unsellable_item && $game_temp.unsellable_priced_item_check) ? 0 : price_unsellable_priced_item
  end
end