Project1

标题: 这个脚本怎么用商店脚本 [打印本页]

作者: 魔力的觉醒 时间: 2013-10-30 19:41
标题: 这个脚本怎么用商店脚本
本帖最后由 Sion 于 2013-10-30 19:59 编辑

[pre lang="ruby" line="1"]#==============================================================================
# ■ VXAce-RGSS3-30 マルチカテゴリショップ [Ver.1.0.0]    by Claimh
#------------------------------------------------------------------------------
# カテゴリ分類を細分化できるショップです。
#＜機能概要＞
#・購入・売却リストをカテゴリ分類する
#・武器タイプ・防具タイプで分類する
#・アクターが装備可能な武器・防具で分類する
#・ショップ画面からの装備変更
#・購入した装備品をすぐに装備する
#・購入・売却不可のアイテムを設定できる
#・購入・売却の価格レートの変更
#------------------------------------------------------------------------------
# ＜操作＞
# Cボタン    : 購入/売買
# ←/→ボタン  : アクター情報切り替え
# ↑/↓ボタン  : 購入/売却数 ±10
# L/Rボタン : カテゴリ切り替え
#------------------------------------------------------------------------------
# ＜メモ欄設定＞
# ・売却不可 : <not_sell>
#------------------------------------------------------------------------------
#＜売買不可設定＞
# ・購入不可アイテム追加
# $game_system.shop.buy.add_ng_item(type, id)
#    type : 種別(0:アイテム, 1:武器, 2:防具)
#    id : ID
# ・購入不可アイテム解除
# $game_system.shop.buy.del_ng_item(type, id)
# ・売却不可アイテム追加
# $game_system.shop.sell.add_ng_item(type, id)
# ・売却不可アイテム解除
# $game_system.shop.sell.del_ng_item(type, id)
#------------------------------------------------------------------------------
# ＜全体売買レート変更＞
#・購入レート
#  $game_system.shop.buy.rate = レート(%)
#・売却レート
#  $game_system.shop.sell.rate  = レート(%)
#------------------------------------------------------------------------------
# ＜個別売買レート変更＞
#※全体レートよりも個別レートが優先されます。(全体×個別というレート計算はしません)
#・個別購入レート
#  $game_system.shop.buy.item_rate(type, id, rate)
#    type : 種別(0:アイテム, 1:武器, 2:防具)
#    id : ID
#    rate : レート(%)
#・個別売却レート
#  $game_system.shop.sell.item_rate(type, id, rate)
#・個別購入レート情報削除
#  $game_system.shop.buy.del_item_rate(type, id)
#・個別売却レート情報削除
#  $game_system.shop.sell.del_item_rate(type, id)
#------------------------------------------------------------------------------
# ＜合計金額取得＞
#・購入合計：  $game_system.shop.buy.gold
#・売却合計：  $game_system.shop.sell.gold
#------------------------------------------------------------------------------
# ＜購入不可判定について＞
# 以下のいずれかに当てはまる場合は購入不可
# ・お金が足りない
# ・アイテムの最大数超過($game_party.item_max?)
# ・購入不可アイテムの対象($game_system.shop.buy.add_ng_item)
#------------------------------------------------------------------------------
# ＜売却不可判定について＞
# 以下のいずれかに当てはまる場合は売却不可
# ・データベース上の値段が0 (※レート計算で値段が0になる場合は除く)
# ・メモ欄に <not_sell>指定がある
# ・売却不可アイテムの対象($game_system.shop.sell.add_ng_item)
#------------------------------------------------------------------------------
# ＜アクターが装備可能な武器・防具で分類＞
# BUY_CTにACTORを入れた時の動作
# ・カテゴリ切り替えでACTORカテゴリに変わった時にアクターステータスも切り替え
# ・アイコンはキャラクターを表示
#------------------------------------------------------------------------------
# ＜購入した装備品をすぐに装備する＞
# アクターステータスウィンドウに表示されているアクターが装備できる武器・防具を
# 購入したときに装備するか否かの選択が表示されます。
#==============================================================================

module ExShop
  ALL=0;ITEM=1;WEAPON=2;ARMOR=3;KEY=4;ACTOR=5
  #----------------------------------------------------------------------------
  # レート設定
  #----------------------------------------------------------------------------
  # 初期購入レート(％)
  BUY_RATE  = 100.0
  # 初期売却レート(％)
  SELL_RATE = 50.0

  # 値段指定あり時も購入レートを適応する
  USE_P_RATE = true

  #----------------------------------------------------------------------------
  # 分類設定
  #----------------------------------------------------------------------------
  # 購入分類設定
  # ALL    : すべて
  # ITEM : アイテム
  # WEAPON  : 武器
  # ARMOR : 防具
  # ACTOR : アクターが装備できる武器・防具
  BUY_CT = [ALL, ITEM, WEAPON, ARMOR]
  #BUY_CT = [ALL, ITEM, ACTOR]  # アクター装備別の例

  # 売却分類設定
  # ALL    : すべて
  # ITEM : アイテム
  # WEAPON  : 武器
  # ARMOR : 防具
  # KEY    : 大事なもの
  SELL_CT = [ALL, ITEM, WEAPON, ARMOR, KEY]

  # 武器をさらに分類する
  # (分類設定のWEAPONを武器タイプで分類します)
  USE_W_TYPE = true
  # 防具をさらに分類する
  # (分類設定のARMORを防具タイプ/防具種別で分類します)
  # 0 : 分類しない
  # 1 : 防具タイプで分類
  # 2 : 装備タイプ(盾/頭/身体/装飾品)で分類
  USE_A_TYPE = 2

  # アイコン設定
  #       [ALL用, ITEM用, WEAPON用, ARMOR用, KEY用]
  CT_ICON = [  125, 261,    147,    168, 259]
  # 武器タイプアイコン設定
  #          [0, 武器タイプ1, 武器タイプ2, …]
  CT_W_ICON = [0, 144, 145, 146, 147, 148, 149, 150, 151, 152, 153]
  # 防具タイプアイコン設定
  #          [0, 防具タイプ1, 防具タイプ2, …]
  CT_A_ICON = [0, 168, 171, 169, 170, 160, 161]
  # 防具種別アイコン設定
  #          [0,  盾,　頭, 身体, 装飾品]
  CT_E_ICON = [0, 160, 164,  169, 176]

  #----------------------------------------------------------------------------
  # 表示設定
  #----------------------------------------------------------------------------
  # 購入不可アイテムの値段表示(""の時は値段を表示)
  V_N_BUY = "售价"

  #----------------------------------------------------------------------------
  # レイアウト設定
  #----------------------------------------------------------------------------
  # 所持金ウィンドウを左下に配置する
  # true  : 左下に配置（カテゴリ多用）
  # false : 右上に配置（カテゴリ小用）
  GOLD_LD = false
end

module ExShop
  #--------------------------------------------------------------------------
  # ● 購入レート変換(購入価格計算)
  #--------------------------------------------------------------------------
  def self.buy_price(item, price, fix=false)
return price if fix and !USE_P_RATE
$game_system.shop.buy.price(item_type(item), item.id, price)
  end
  #--------------------------------------------------------------------------
  # ● 売却レート変換(売却価格計算)
  #--------------------------------------------------------------------------
  def self.sell_price(item, price)
$game_system.shop.sell.price(item_type(item), item.id, price)
  end
  #--------------------------------------------------------------------------
  # ● atype => symbol
  #--------------------------------------------------------------------------
  def self.actor_sym
$game_party.members.collect {|a| a.id.to_s.to_sym }
  end
  #--------------------------------------------------------------------------
  # ● CT設定 => symbol
  #--------------------------------------------------------------------------
  def self.ct_sym(ct)
ct.inject([]) do |r, c|
   case c
   when WEAPON;  r += wtype_sym
   when ARMOR; r += atype_sym
   when ACTOR; r += actor_sym
   else;       r.push([:all, :item, :weapon, :armor, :key_item][c])
   end
end
  end
  #--------------------------------------------------------------------------
  # ● wtype => symbol
  #--------------------------------------------------------------------------
  def self.wtype_sym
return [:weapon] unless ExShop::USE_W_TYPE
$data_system.weapon_types[1, $data_system.weapon_types.size].collect {|a| a.to_sym}
  end
  #--------------------------------------------------------------------------
  # ● atype => symbol
  #--------------------------------------------------------------------------
  def self.atype_sym
case ExShop::USE_A_TYPE
when 1  # 防具タイプ
   $data_system.armor_types[1, $data_system.armor_types.size].collect {|a| a.to_sym}
when 2  # 装備タイプ
   [:shield, :helmet, :clothes, :accessory]
else
   [:armor]
end
  end
  #--------------------------------------------------------------------------
  # ● symbol => wtype or atype
  #--------------------------------------------------------------------------
  def self.sym_type(sym)
str = sym.id2name
return WEAPON if $data_system.weapon_types.include?(str)
return ARMOR  if $data_system.armor_types.include?(str)
ACTOR
  end
  #--------------------------------------------------------------------------
  # ● sym => wtype
  #--------------------------------------------------------------------------
  def self.sym_wtype(sym)
$data_system.weapon_types.index(sym.id2name)
  end
  #--------------------------------------------------------------------------
  # ● sym => atype
  #--------------------------------------------------------------------------
  def self.sym_atype(sym)
$data_system.armor_types.index(sym.id2name)
  end
  #--------------------------------------------------------------------------
  # ● symbol => 設定
  #--------------------------------------------------------------------------
  def self.sym2id(sym)
case sym
when :all;    return ALL
when :item;    return ITEM
when :weapon; return WEAPON
when :armor; return ARMOR
when :key_item; return KEY
when :shield, :helmet, :clothes, :accessory;  return ARMOR
else  return sym_type(sym)
end
  end
  #--------------------------------------------------------------------------
  # ● symbol => アイコン
  #--------------------------------------------------------------------------
  def self.sym2icon(sym)
case sym
when :all;       return CT_ICON[ALL]
when :none;    return 0
when :item;    return CT_ICON[ITEM]
when :weapon;    return CT_ICON[WEAPON]
when :armor;    return CT_ICON[ARMOR]
when :key_item; return CT_ICON[KEY]
when :shield;    return CT_E_ICON[1]
when :helmet;    return CT_E_ICON[2]
when :clothes; return CT_E_ICON[3]
when :accessory;  return CT_E_ICON[4]
else
   case sym_type(sym)
   when WEAPON;  return CT_W_ICON[sym_wtype(sym)]
   when ARMOR; return CT_A_ICON[sym_atype(sym)]
   when ACTOR; return 0
   end
end
  end
  #--------------------------------------------------------------------------
  # ● symbol => Actor
  #--------------------------------------------------------------------------
  def self.sym2actor(sym)
$game_actors[sym.id2name.to_i]
  end
  #--------------------------------------------------------------------------
  # ● アイテムをリストに含めるかどうか
  #--------------------------------------------------------------------------
  def self.item_include?(sym, item)
case sym
when :all
   true
when :none
   false
when :item
   item.is_a?(RPG::Item) && !item.key_item?
when :weapon
   item.is_a?(RPG::Weapon)
when :armor
   item.is_a?(RPG::Armor)
when :key_item
   item.is_a?(RPG::Item) && item.key_item?
when :shield
   item.is_a?(RPG::Armor) && item.etype_id == 1
when :helmet
   item.is_a?(RPG::Armor) && item.etype_id == 2
when :clothes
   item.is_a?(RPG::Armor) && item.etype_id == 3
when :accessory
   item.is_a?(RPG::Armor) && item.etype_id == 4
else
   case sym_type(sym)
   when WEAPON
      item.is_a?(RPG::Weapon) and item.wtype_id == sym_wtype(sym)
   when ARMOR
      item.is_a?(RPG::Armor)  and item.atype_id == sym_atype(sym)
   when ACTOR
      sym2actor(sym).equippable?(item)
   else
      false
   end
end
  end
  #--------------------------------------------------------------------------
  # ● アイテムタイプ
  #--------------------------------------------------------------------------
  def self.item_type(item)
case item
when RPG::Item; return 0
when RPG::Weapon; return 1
when RPG::Armor;  return 2
end
  end
  #--------------------------------------------------------------------------
  # ● 購入可否判定
  #--------------------------------------------------------------------------
  def self.buy_enable?(item)
not $game_system.shop.buy.ng_item?(item_type(item), item.id)
  end
  #--------------------------------------------------------------------------
  # ● 売却可否判定
  #--------------------------------------------------------------------------
  def self.sell_enable?(item)
not $game_system.shop.sell.ng_item?(item_type(item), item.id)
  end
  #--------------------------------------------------------------------------
  # ● 購入不可文字
  #--------------------------------------------------------------------------
  def self.not_buy(item, price)
return price if V_N_BUY == ""
buy_enable?(item) ? price : V_N_BUY
  end
end

#==============================================================================
# ■ RPG::Item
#==============================================================================
class RPG::Item < RPG::UsableItem
  #--------------------------------------------------------------------------
  # ● 売却可能か？
  #--------------------------------------------------------------------------
  def sell?
@price > 0 and !@note.include?("<not_sell>")
  end
end

#==============================================================================
# ■ RPG::EquipItem
#==============================================================================
class RPG::EquipItem < RPG::BaseItem
  #--------------------------------------------------------------------------
  # ● 売却可能か？
  #--------------------------------------------------------------------------
  def sell?
@price > 0 and !@note.include?("<not_sell>")
  end
end

#==============================================================================
# ■ ExShop::ShopStatus
#==============================================================================
class ExShop::ShopStatus
  #--------------------------------------------------------------------------
  # ● 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_reader :buy # 購入ステータス
  attr_reader :sell  # 売却ステータス
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize
reset
  end
  #--------------------------------------------------------------------------
  # ● リセット
  #--------------------------------------------------------------------------
  def reset
@buy  = Status.new(ExShop::BUY_RATE)
@sell = Status.new(ExShop::SELL_RATE)
  end
  #--------------------------------------------------------------------------
  # ● レートリセット
  #--------------------------------------------------------------------------
  def rate_reset
@buy.rate  = ExShop::BUY_RATE
@sell.rate = ExShop::SELL_RATE
@buy.i_rate_reset
@sell.i_rate_reset
  end
  #--------------------------------------------------------------------------
  # ● 売買不可アイテム情報リセット
  #--------------------------------------------------------------------------
  def ng_reset
@buy.ng_reset
@sell.ng_reset
  end

  #============================================================================
  # ■ Status  : 売買情報
  #============================================================================
  class Status
attr_accessor :rate       # レート
attr_accessor :gold       # 金額
#------------------------------------------------------------------------
# ● オブジェクト初期化
#------------------------------------------------------------------------
def initialize(rate)
   @rate = rate
   @gold = 0
   i_rate_reset
   ng_reset
end
#------------------------------------------------------------------------
# ● 個別レート設定リセット
#------------------------------------------------------------------------
def i_rate_reset
   @i_rate = []
end
#------------------------------------------------------------------------
# ● 売買不可アイテムリセット
#------------------------------------------------------------------------
def ng_reset
   @ng_items = []
end
#------------------------------------------------------------------------
# ● レート：百分率 => 浮動小数点数
#------------------------------------------------------------------------
def rate_f
   (@rate / 100.0)
end
#------------------------------------------------------------------------
# ● アイテム価格計算
#------------------------------------------------------------------------
def price(type, id, price)
   (price * i_rate_f(type, id)).truncate
end
#------------------------------------------------------------------------
# ● 対象アイテムレート取得
#------------------------------------------------------------------------
def i_rate_f(type, id)
   it = find_i_rate(type, id)
   it.nil? ? rate_f : it.rate_f
end
#------------------------------------------------------------------------
# ● 対象アイテムレート取得
#------------------------------------------------------------------------
def i_rate(type, id)
   it = find_i_rate(type, id)
   it.nil? ? @rate : it.rate
end
#------------------------------------------------------------------------
# ● 個別レート設定アイテム？
#------------------------------------------------------------------------
def item_rate?(type, id)
   find_i_rate(type, id) != nil
end
#------------------------------------------------------------------------
# ● 個別レート設定アイテム情報取得
#------------------------------------------------------------------------
def find_i_rate(type, id)
   @i_rate.find {|a| a.include?(type, id)}
end
#------------------------------------------------------------------------
# ● 個別レート設定
#------------------------------------------------------------------------
def item_rate(type, id, rate)
   it = find_i_rate(type, id)
   if it.nil?
      @i_rate.push(Item_Rate.new(type, id, rate))
   else
      it.rate = rate
   end
end
#------------------------------------------------------------------------
# ● 個別レート設定削除
#------------------------------------------------------------------------
def del_item_rate(type, id)
   @i_rate.reject! {|item| item.include?(type, id)}
end
#------------------------------------------------------------------------
# ● 売買不可アイテム？
#------------------------------------------------------------------------
def ng_item?(type, id)
   @ng_items.any? {|item| item.include?(type, id)}
end
#------------------------------------------------------------------------
# ● 売買不可アイテム追加
#------------------------------------------------------------------------
def add_ng_item(type, id)
   return if ng_item?(type, id)
   @ng_items.push(NG_Item.new(type, id))
end
#------------------------------------------------------------------------
# ● 売買不可アイテム解除
#------------------------------------------------------------------------
def del_ng_item(type, id)
   @ng_items.reject! {|item| item.include?(type, id)}
end
#==========================================================================
# ■ NG_Item : 売買不可アイテム情報
#==========================================================================
class NG_Item
   #----------------------------------------------------------------------
   # ● オブジェクト初期化
   #    type : 種別(0..RPG:Item, 1..RPG::Weapon, 2..RPG::Armor)
   #    id : ID
   #----------------------------------------------------------------------
   def initialize(type, id)
      @type = type; @id = id
   end
   #----------------------------------------------------------------------
   # ● 売買不可アイテム？
   #----------------------------------------------------------------------
   def include?(type, id)
      @type == type and @id == id
   end
end
#==========================================================================
# ■ Item_Rate : アイテム売買レート
#==========================================================================
class Item_Rate
   #----------------------------------------------------------------------
   # ● 公開インスタンス変数
   #----------------------------------------------------------------------
   attr_accessor :rate    # レート(％)
   #----------------------------------------------------------------------
   # ● オブジェクト初期化
   #    type : 種別(0..RPG:Item, 1..RPG::Weapon, 2..RPG::Armor)
   #    id : ID
   #    rate : レート(%)
   #----------------------------------------------------------------------
   def initialize(type, id, rate)
      @type = type; @id = id; @rate = rate
   end
   #----------------------------------------------------------------------
   # ● レート：百分率 => 浮動小数点数
   #----------------------------------------------------------------------
   def rate_f
      (@rate / 100.0)
   end
   #----------------------------------------------------------------------
   # ● 売買レート対象アイテム？
   #----------------------------------------------------------------------
   def include?(type, id)
      @type == type and @id == id
   end
end
  end
end

#==============================================================================
# ■ Game_System
#==============================================================================
class Game_System
  #--------------------------------------------------------------------------
  # ● 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_reader :shop       # ショップ情報
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  alias initialize_shop_ex initialize
  def initialize
initialize_shop_ex
@shop = ExShop::ShopStatus.new
  end
end

#==============================================================================
# ■ Window_ExShopCommand
#------------------------------------------------------------------------------
# 　ショップ画面で、購入／売却／装備を選択するウィンドウです。
#==============================================================================
class Window_ExShopCommand < Window_Command
  #--------------------------------------------------------------------------
  # ● クラス変数
  #--------------------------------------------------------------------------
  @@last_command_symbol = :buy
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize(window_width, purchase_only)
@window_width = window_width
@purchase_only = purchase_only
super(0, 0)
select_last
  end
  #--------------------------------------------------------------------------
  # ● ウィンドウ幅の取得
  #--------------------------------------------------------------------------
  def window_width
@window_width
  end
  #--------------------------------------------------------------------------
  # ● 表示行数の取得
  #--------------------------------------------------------------------------
  def visible_line_number
4
  end
  #--------------------------------------------------------------------------
  # ● コマンドリストの作成
  #--------------------------------------------------------------------------
  def make_command_list
add_command(Vocab::ShopBuy, :buy)
add_command(Vocab::ShopSell, :sell, !@purchase_only)
add_command(Vocab.equip,    :equip,  $game_party.members.size > 0)
add_command(Vocab::ShopCancel, :cancel)
  end
  #--------------------------------------------------------------------------
  # ● 決定ボタンが押されたときの処理
  #--------------------------------------------------------------------------
  def process_ok
@@last_command_symbol = (current_symbol == :equip ? :equip : :buy)
super
  end
  #--------------------------------------------------------------------------
  # ● 前回の選択位置を復帰
  #--------------------------------------------------------------------------
  def select_last
select_symbol(@@last_command_symbol)
  end
end

#==============================================================================
# ■ Window_ExShopCategory
#------------------------------------------------------------------------------
# 　ショップ画面で、カテゴリを選択するウィンドウです。
#==============================================================================
class Window_ExShopCategory < Window_HorzCommand
  #--------------------------------------------------------------------------
  # ● 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_reader :item_window
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize(x, y, w)
@win_width = w
super(x, y)
  end
  #--------------------------------------------------------------------------
  # ● ウィンドウ幅の取得
  #--------------------------------------------------------------------------
  def window_width
@win_width
  end
  #--------------------------------------------------------------------------
  # ● 桁数の取得
  #--------------------------------------------------------------------------
  def col_max
ExShop::GOLD_LD ? 10 : 5
  end
  #--------------------------------------------------------------------------
  # ● 先頭の桁の設定
  #--------------------------------------------------------------------------
  def top_col=(col)
col = 0 if col < 0
# col = col_max - 1 if col > col_max - 1
self.ox = col * (item_width + spacing)
  end
  #--------------------------------------------------------------------------
  # ● シンボルリスト
  #--------------------------------------------------------------------------
  def symlist
[:all, :item, :weapon, :armor, :key_item]
  end
  #--------------------------------------------------------------------------
  # ● コマンドリストの作成
  #--------------------------------------------------------------------------
  def make_command_list
symlist.each {|s| add_command(ExShop.sym2icon(s), s, true, ExShop.sym2id(s))}
  end
  #--------------------------------------------------------------------------
  # ● 項目を描画する矩形の取得
  #--------------------------------------------------------------------------
  def item_rect(index)
r = super(index)
r.x += (r.width - 24) / 2
r.width = 24
r
  end
  #--------------------------------------------------------------------------
  # ● 項目の描画
  #--------------------------------------------------------------------------
  def draw_item(index)
r = item_rect(index)
if @list[index][:ext] == ExShop::ACTOR
   draw_charicon(ExShop.sym2actor(@list[index][:symbol]), r.x, r.y, command_enabled?(index))
else
   draw_icon(command_name(index), r.x, r.y, command_enabled?(index))
end
  end
  #--------------------------------------------------------------------------
  # ● 歩行グラフィックの描画
  #--------------------------------------------------------------------------
  def draw_charicon(actor, x, y, enabled)
return if actor.nil?
return unless actor.character_name
bitmap = Cache.character(actor.character_name)
sign = actor.character_name[/^[\!\$]./]
if sign && sign.include?('$')
   cw = bitmap.width / 3
   ch = bitmap.height / 4
else
   cw = bitmap.width / 12
   ch = bitmap.height / 8
end
n = actor.character_index
src_rect = Rect.new((n%4*3+1)*cw + (cw - 20) / 2, (n/4*4)*ch, 20, 20)
contents.blt(x+2, y+2, bitmap, src_rect)
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  def update
super
@item_window.category = current_symbol if @item_window
  end
  #--------------------------------------------------------------------------
  # ● アイテムウィンドウの設定
  #--------------------------------------------------------------------------
  def item_window=(item_window)
@item_window = item_window
update
  end
end

#==============================================================================
# ■ Window_ExShopCategory
#------------------------------------------------------------------------------
# 　ショップ画面で、購入カテゴリを選択するウィンドウです。
#==============================================================================
class Window_ExShopBuyCt < Window_ExShopCategory
  #--------------------------------------------------------------------------
  # ● シンボルリスト
  #--------------------------------------------------------------------------
  def symlist
ExShop.ct_sym(ExShop::BUY_CT)
  end
end

#==============================================================================
# ■ Window_ExShopCategory
#------------------------------------------------------------------------------
# 　ショップ画面で、売却カテゴリを選択するウィンドウです。
#==============================================================================
class Window_ExShopSellCt < Window_ExShopCategory
  #--------------------------------------------------------------------------
  # ● シンボルリスト
  #--------------------------------------------------------------------------
  def symlist
ExShop.ct_sym(ExShop::SELL_CT)
  end
end

#==============================================================================
# ■ Sprite_ShopTAG
#==============================================================================
class Sprite_ShopTAG < Sprite
  W = 100
  H = 14
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize(x, y, tag)
super(Viewport.new(x, y, W, H))
self.viewport.z = 200
self.bitmap = Bitmap.new(W, H)
self.bitmap.font.size = 12
self.bitmap.font.color = system_color
self.bitmap.draw_text(0, 0, W, H, tag)
  end
  #--------------------------------------------------------------------------
  # ● 文字色取得
  #    n : 文字色番号（0..31）
  #--------------------------------------------------------------------------
  def text_color(n)
Cache.system("Window").get_pixel(64 + (n % 8) * 8, 96 + (n / 8) * 8)
  end
  #--------------------------------------------------------------------------
  # ● 各種文字色の取得
  #--------------------------------------------------------------------------
  def normal_color;    text_color(0); end; # 通常
  def system_color;    text_color(16);  end; # システム
end

#==============================================================================
# ■ Window_ShopBuy
#==============================================================================
class Window_ShopBuy < Window_Selectable
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize(x, y, width, height, shop_goods)
super(x, y, width, height)
@shop_goods = shop_goods
@Money = 0
@category = :none
refresh
select(0)
create_sprites
  end
  #--------------------------------------------------------------------------
  # ● 解放
  #--------------------------------------------------------------------------
  def dispose
super
dispose_sprites
  end
  #--------------------------------------------------------------------------
  # ● タグスプライト生成
  #--------------------------------------------------------------------------
  def create_sprites
@sprite_price = Sprite_ShopTAG.new(self.x+280, self.y+2, "价格")
@sprite_num = Sprite_ShopTAG.new(self.x+340, self.y+2, "拥有数目")
  end
  #--------------------------------------------------------------------------
  # ● タグスプライト解放
  #--------------------------------------------------------------------------
  def dispose_sprites
@sprite_price.dispose
@sprite_num.dispose
  end
  #--------------------------------------------------------------------------
  # ● ウィンドウの表示/非表示
  #--------------------------------------------------------------------------
  def visible=(flag)
super(flag)
@sprite_price.visible = @sprite_num.visible = flag
  end
  #--------------------------------------------------------------------------
  # ● ウィンドウ幅の取得
  #--------------------------------------------------------------------------
  def window_width
width
  end
  #--------------------------------------------------------------------------
  # ● カテゴリの設定
  #--------------------------------------------------------------------------
  def category=(category)
return if @category == category
@category = category
refresh
self.oy = 0
  end
  #--------------------------------------------------------------------------
  # ● アイテムリストの作成 <再定義>
  #--------------------------------------------------------------------------
  def make_item_list
@data = []
@price = {}
@shop_goods.each do |goods|
   case goods[0]
   when 0;  item = $data_items[goods[1]]
   when 1;  item = $data_weapons[goods[1]]
   when 2;  item = $data_armors[goods[1]]
   end
   if item
      next unless include?(item)
      @data.push(item)
      i_price = goods[2] == 0 ? item.price : goods[3]
      @price[item] = ExShop.buy_price(item, i_price, goods[2] != 0)
   end
end
  end
  #--------------------------------------------------------------------------
  # ● アイテムをリストに含めるかどうか
  #--------------------------------------------------------------------------
  def include?(item)
item && ExShop.item_include?(@category, item)
  end
  #--------------------------------------------------------------------------
  # ● 項目の描画
  #--------------------------------------------------------------------------
  def draw_item(index)
item = @data[index]
rect = item_rect(index)
draw_item_name(item, rect.x, rect.y, enable?(item))
rect.width -= 64
draw_text(rect, ExShop.not_buy(item, price(item)), 2)
rect.width += 60
draw_text(rect, $game_party.item_number(item), 2)
  end
  #--------------------------------------------------------------------------
  # ● アイテムを許可状態で表示するかどうか
  #--------------------------------------------------------------------------
  def enable?(item)
item && price(item) <= @Money && !$game_party.item_max?(item) && ExShop.buy_enable?(item)
  end
  #--------------------------------------------------------------------------
  # ● ヘルプテキスト更新
  #--------------------------------------------------------------------------
  def update_help
@help_window.set_item(item) if @help_window
if @status_window
   @status_window.item = item
   if ExShop.sym2id(@category) == ExShop::ACTOR
      @status_window.page_index = ExShop.sym2actor(@category).index
   end
end
  end
end

#==============================================================================
# ■ Window_ShopSell
#==============================================================================
class Window_ShopSell < Window_ItemList
  #--------------------------------------------------------------------------
  # ● 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_reader :status_window          # ステータスウィンドウ
  #--------------------------------------------------------------------------
  # ● 桁数の取得
  #--------------------------------------------------------------------------
  def col_max
1
  end
  #--------------------------------------------------------------------------
  # ● アイテムをリストに含めるかどうか
  #--------------------------------------------------------------------------
  def include?(item)
item && ExShop.item_include?(@category, item)
  end
  #--------------------------------------------------------------------------
  # ● アイテムを許可状態で表示するかどうか
  #--------------------------------------------------------------------------
  def enable?(item)
item && item.sell? && ExShop.sell_enable?(item)
  end
  #--------------------------------------------------------------------------
  # ● ステータスウィンドウの設定
  #--------------------------------------------------------------------------
  def status_window=(status_window)
@status_window = status_window
call_update_help
  end
  #--------------------------------------------------------------------------
  # ● ヘルプテキスト更新
  #--------------------------------------------------------------------------
  def update_help
super
@status_window.item = item if @status_window
  end
end

#==============================================================================
# ■ Window_ShopNumber
#==============================================================================
class Window_ShopNumber < Window_Selectable
  #--------------------------------------------------------------------------
  # ● 公開インスタンス変数
  #--------------------------------------------------------------------------
  attr_reader :number                # 入力された個数
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize(x, y, width, height)
super(x, y, width, height)
@item = nil
@Max = 1
@price = 0
@Number = 1
@currency_unit = Vocab::currency_unit
  end
end

#==============================================================================
# ■ Window_ShopStatus
#==============================================================================
class Window_ShopStatus < Window_Base
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize(x, y, width, height, actor)
super(x, y, width, height)
@item = nil
@page_index = actor.index
self.ox = 1 if page_max > 1
refresh
  end
  #--------------------------------------------------------------------------
  # ● ウィンドウ内容の幅を計算
  #--------------------------------------------------------------------------
  def contents_width
super + (page_max > 1 ? 2 : 0)
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  def refresh
contents.clear
actor = current_actor
enabled = @item.is_a?(RPG::EquipItem) ? actor.equippable?(@item) : false
draw_actor_face(actor, self.ox + contents_width - 96, 0, enabled)
change_color(normal_color, enabled)
draw_text(self.ox, 0, 112, line_height, actor.name)
return unless @item.is_a?(RPG::EquipItem)
draw_actor_equip_info(self.ox, line_height*2, actor, enabled)
  end
  #--------------------------------------------------------------------------
  # ● 顔グラフィックの描画
  #--------------------------------------------------------------------------
  def draw_actor_face(actor, x, y, enabled = true)
bitmap = Cache.face(actor.face_name)
rect = Rect.new(actor.face_index % 4 * 96,
                  actor.face_index / 4 * 96 + 16, 96, line_height*2)
contents.blt(x, y, bitmap, rect, enabled ? 255 : translucent_alpha)
bitmap.dispose
  end
  #--------------------------------------------------------------------------
  # ● アイテムの設定
  #--------------------------------------------------------------------------
  def item=(item)
@item = item
refresh
  end
  #--------------------------------------------------------------------------
  # ● 表示中アクター
  #--------------------------------------------------------------------------
  def current_actor
$game_party.members[@page_index]
  end
  #--------------------------------------------------------------------------
  # ● 一度に表示できるアクターの人数
  #--------------------------------------------------------------------------
  def page_size
return 1
  end
  #--------------------------------------------------------------------------
  # ● 最大ページ数の取得
  #--------------------------------------------------------------------------
  def page_max
$game_party.members.size
  end
  #--------------------------------------------------------------------------
  # ● アクターの装備情報を描画
  #--------------------------------------------------------------------------
  def draw_actor_equip_info(x, y, actor, enabled)
item1 = current_equipped_item(actor, @item.etype_id)
prms = ExShop::GOLD_LD ? [2, 3, 4, 5] : [2, 3, 4, 5, 6, 7]
prms.each do |prm|
   draw_actor_param_change(x, y, actor, item1, prm, enabled)
   y += line_height
end
  end
  #--------------------------------------------------------------------------
  # ● アクターの能力値変化を描画
  #--------------------------------------------------------------------------
  def draw_actor_param_change(x, y, actor, item1, prm_id, enabled)
rect = Rect.new(x, y, contents.width - 4 - x, line_height)
change = @item.params[prm_id] - (item1 ? item1.params[prm_id] : 0)
change_color(system_color, enabled)
draw_text(rect, $data_system.terms.params[prm_id])
if enabled
   change_color(param_change_color(change), enabled)
   draw_text(rect, sprintf("%+d", change), 2)
else
   change_color(normal_color, enabled)
   draw_text(rect, "―", 2)
end
  end
  #--------------------------------------------------------------------------
  # ● フレーム更新
  #--------------------------------------------------------------------------
  def update
super
update_page
  end
  #--------------------------------------------------------------------------
  # ● ページの更新
  #--------------------------------------------------------------------------
  def update_page
if active && visible && page_max > 1
   next_page if Input.trigger?(:RIGHT)
   prev_page if Input.trigger?(:LEFT)
end
  end
  #--------------------------------------------------------------------------
  # ● 指定ページへ
  #--------------------------------------------------------------------------
  def page_index=(index)
@page_index = index
refresh
  end
  #--------------------------------------------------------------------------
  # ● 次のページへ
  #--------------------------------------------------------------------------
  def next_page
Sound.play_cursor
@page_index = (@page_index + 1) % page_max
refresh
  end
  #--------------------------------------------------------------------------
  # ● 前のページへ
  #--------------------------------------------------------------------------
  def prev_page
Sound.play_cursor
@page_index = (@page_index - 1 + page_max) % page_max
refresh
  end
end

#==============================================================================
# ■ Window_ShopEquip
#==============================================================================
class Window_ShopEquip < Window_HorzCommand
  #--------------------------------------------------------------------------
  # ● オブジェクト初期化
  #--------------------------------------------------------------------------
  def initialize(x, y, width, height)
@ww = width
@wh = height
super(x, y)
  end
  #--------------------------------------------------------------------------
  # ● ウィンドウ幅の取得
  #--------------------------------------------------------------------------
  def window_width
@ww
  end
  #--------------------------------------------------------------------------
  # ● ウィンドウ高さの取得
  #--------------------------------------------------------------------------
  def window_height
@wh
  end
  #--------------------------------------------------------------------------
  # ● 桁数の取得
  #--------------------------------------------------------------------------
  def col_max
2
  end
  #--------------------------------------------------------------------------
  # ● ウィンドウ内容の高さを計算
  #--------------------------------------------------------------------------
  def contents_height
height - standard_padding * 3
  end
  #--------------------------------------------------------------------------
  # ● 項目を描画する矩形の取得
  #--------------------------------------------------------------------------
  def item_rect(index)
rect = super
rect.y = 0
rect.width = 80
rect.x = 180 + index * (rect.width + spacing)
rect
  end
  #--------------------------------------------------------------------------
  # ● コマンドリストの作成
  #--------------------------------------------------------------------------
  def make_command_list
add_command("是", :equip)
add_command("没有", :cancel)
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  def set(actor=nil, item=nil)
@actor = actor
@item  = item
refresh
  end
  #--------------------------------------------------------------------------
  # ● リフレッシュ
  #--------------------------------------------------------------------------
  def refresh
super
if !@actor.nil? and !@item.nil?
   draw_text(0, 0, 150, line_height,"是否配备？")
   draw_horz_line(line_height)
   draw_actor_equip(line_height * 2)
end
  end
  #--------------------------------------------------------------------------
  # ● 水平線の描画
  #--------------------------------------------------------------------------
  def draw_horz_line(y)
line_y = y + line_height / 2 - 1
contents.fill_rect(0, line_y, contents_width, 2, line_color)
  end
  #--------------------------------------------------------------------------
  # ● 水平線の色を取得
  #--------------------------------------------------------------------------
  def line_color
color = normal_color
color.alpha = 48
color
  end
  #--------------------------------------------------------------------------
  # ● アクターの装備情報を描画
  #--------------------------------------------------------------------------
  def draw_actor_equip(y)
draw_actor_name(@actor, 4, y)
item1 = current_equipped_item
draw_item_name(item1, 140, y)
draw_actor_param_changes(4, y + line_height, item1)
  end
  #--------------------------------------------------------------------------
  # ● 現在の装備品を取得
  # 二刀流など、同じ種類の装備が複数ある場合は弱い方を返す。
  #--------------------------------------------------------------------------
  def current_equipped_item
list = []
@actor.equip_slots.each_with_index do |slot_etype_id, i|
   list.push(@actor.equips) if slot_etype_id == @item.etype_id
end
list.min_by {|item| item ? item.params[param_id] : 0 }
  end
  #--------------------------------------------------------------------------
  # ● 選択中のアイテムに対応する能力値 ID の取得
  # デフォルトでは武器なら攻撃力、防具なら防御力とする。
  #--------------------------------------------------------------------------
  def param_id
@item.is_a?(RPG::Weapon) ? 2 : 3
  end
  #--------------------------------------------------------------------------
  # ● アクターの装備情報を描画
  #--------------------------------------------------------------------------
  def draw_actor_param_changes(x, y, item)
prms = [0, 1, 2, 3, 4, 5, 6, 7]
rect = Rect.new(x, y, (contents_width-8) / 2, line_height)
prms.each_index do |i|
   draw_actor_param_change(rect, item, prms)
   rect.y += rect.height
end
  end
  #--------------------------------------------------------------------------
  # ● アクターの能力値変化を描画
  #--------------------------------------------------------------------------
  def draw_actor_param_change(rect, item1, prm_id)
change = @item.params[prm_id] - (item1 ? item1.params[prm_id] : 0)
change_color(system_color)
draw_text(rect, $data_system.terms.params[prm_id])
change_color(normal_color)
r = Rect.new(rect.x + 70, rect.y, 80, rect.height)
draw_text(r, @actor.param(prm_id), 2)
return if change == 0
r.x += r.width + 4
draw_text(r, "→")
change_color(param_change_color(change))
draw_text(r, @actor.param(prm_id) + change , 2)
  end
end

#==============================================================================
# ■ Scene_Shop
#==============================================================================
class Scene_Shop < Scene_MenuBase
  #--------------------------------------------------------------------------
  # ● 準備
  #--------------------------------------------------------------------------
  def prepare(goods, purchase_only)
@goods = goods
@purchase_only = purchase_only
@actor = $game_party.members[0]
  end
  #--------------------------------------------------------------------------
  # ● 準備
  #--------------------------------------------------------------------------
  def prepare_actor(actor)
@actor = actor
  end
  #--------------------------------------------------------------------------
  # ● 開始処理
  #--------------------------------------------------------------------------
  def start
super
create_help_window
create_gold_window
create_command_window
create_dummy_window
create_status_window
create_category_window
create_buy_window
create_sell_window
create_number_window
create_equip_window
  end
  #--------------------------------------------------------------------------
  # ● ゴールドウィンドウの作成
  #--------------------------------------------------------------------------
  def create_gold_window
@gold_window = Window_Gold.new
@gold_window.viewport = @viewport
if ExShop::GOLD_LD
   @gold_window.y = Graphics.height - @gold_window.height
else
   @gold_window.x = Graphics.width - @gold_window.width
   @gold_window.y = @help_window.height
   @gold_window.z = 200
end
  end
  #--------------------------------------------------------------------------
  # ● コマンドウィンドウの作成
  #--------------------------------------------------------------------------
  def create_command_window
@command_window = Window_ExShopCommand.new(@gold_window.width, @purchase_only)
@command_window.viewport = @viewport
@command_window.y = @help_window.height
@command_window.set_handler(:buy, method(:command_buy))
@command_window.set_handler(:sell, method(:command_sell))
@command_window.set_handler(:equip,  method(:command_equip))
@command_window.set_handler(:cancel, method(:return_scene))
  end
  #--------------------------------------------------------------------------
  # ● ダミーウィンドウの作成
  #--------------------------------------------------------------------------
  def create_dummy_window
wx = @command_window.width
wy = @help_window.height
ww = Graphics.width  - wx
wh = Graphics.height - wy
@dummy_window = Window_Base.new(wx, wy, ww, wh)
@dummy_window.viewport = @viewport
  end
  #--------------------------------------------------------------------------
  # ● 個数入力ウィンドウの作成
  #--------------------------------------------------------------------------
  def create_number_window
wx = @buy_window.x
wy = @buy_window.y
ww = @buy_window.width
wh = @buy_window.height
@number_window = Window_ShopNumber.new(wx, wy, ww, wh)
@number_window.viewport = @viewport
@number_window.hide
@number_window.set_handler(:ok,    method(:on_number_ok))
@number_window.set_handler(:cancel, method(:on_number_cancel))
  end
  #--------------------------------------------------------------------------
  # ● ステータスウィンドウの作成
  #--------------------------------------------------------------------------
  def create_status_window
wy = @command_window.y + @command_window.height
ww = @command_window.width
wh = Graphics.height - wy
wh -= @gold_window.height if ExShop::GOLD_LD
@status_window = Window_ShopStatus.new(0, wy, ww, wh, @actor)
@status_window.viewport = @viewport
  end
  #--------------------------------------------------------------------------
  # ● カテゴリウィンドウの作成
  #--------------------------------------------------------------------------
  def create_category_window
wx = @command_window.width
wy = @help_window.height
ww = Graphics.width - wx
ww -= @gold_window.width unless ExShop::GOLD_LD
@buy_ct_window = Window_ExShopBuyCt.new(wx, wy, ww)
@buy_ct_window.viewport = @viewport
@buy_ct_window.hide.deactivate

@sell_ct_window = Window_ExShopSellCt.new(wx, wy, ww)
@sell_ct_window.viewport = @viewport
@sell_ct_window.hide.deactivate
  end
  #--------------------------------------------------------------------------
  # ● 購入ウィンドウの作成
  #--------------------------------------------------------------------------
  def create_buy_window
wx = @dummy_window.x
wy = @buy_ct_window.y + @buy_ct_window.height
ww = Graphics.width - wx
wh = Graphics.height - wy
@buy_window = Window_ShopBuy.new(wx, wy, ww, wh, @goods)
@buy_window.viewport = @viewport
@buy_window.help_window = @help_window
@buy_window.status_window = @status_window
@buy_window.hide
@buy_window.set_handler(:ok,    method(:on_buy_ok))
@buy_window.set_handler(:cancel, method(:on_buy_cancel))
@buy_window.set_handler(:pagedown, method(:next_buy_ct))
@buy_window.set_handler(:pageup, method(:prev_buy_ct))
@buy_ct_window.item_window = @buy_window
  end
  #--------------------------------------------------------------------------
  # ● 売却ウィンドウの作成
  #--------------------------------------------------------------------------
  def create_sell_window
wx = @command_window.width
wy = @sell_ct_window.y + @sell_ct_window.height
ww = Graphics.width - wx
wh = Graphics.height - wy
@sell_window = Window_ShopSell.new(wx, wy, ww, wh)
@sell_window.viewport = @viewport
@sell_window.help_window = @help_window
@sell_window.status_window = @status_window
@sell_window.hide
@sell_window.set_handler(:ok,    method(:on_sell_ok))
@sell_window.set_handler(:cancel, method(:on_sell_cancel))
@sell_window.set_handler(:pagedown, method(:next_sell_ct))
@sell_window.set_handler(:pageup, method(:prev_sell_ct))
@sell_ct_window.item_window = @sell_window
  end
  #--------------------------------------------------------------------------
  # ● 装備ウィンドウの作成
  #--------------------------------------------------------------------------
  def create_equip_window
wx = @number_window.x
wy = @number_window.y
ww = @number_window.width
wh = @number_window.height
@equip_window = Window_ShopEquip.new(wx, wy, ww, wh)
@equip_window.hide.deactivate
@equip_window.set_handler(:equip,  method(:on_equip_ok))
@equip_window.set_handler(:cancel, method(:on_equip_cancel))
  end
  #--------------------------------------------------------------------------
  # ● コマンドウィンドウのアクティブ化
  #--------------------------------------------------------------------------
  def activate_cmd_window
@command_window.activate
@dummy_window.show
@buy_ct_window.hide
@buy_window.hide
@sell_ct_window.hide
@sell_window.hide
@status_window.item = nil
@help_window.clear
  end
  #--------------------------------------------------------------------------
  # ● 購入ウィンドウのアクティブ化
  #--------------------------------------------------------------------------
  def activate_buy_window
@buy_ct_window.show
@buy_window.money = money
@buy_window.refresh
@buy_window.show.activate
@status_window.activate
  end
  #--------------------------------------------------------------------------
  # ● 売却ウィンドウのアクティブ化
  #--------------------------------------------------------------------------
  def activate_sell_window
@sell_ct_window.show
@sell_window.refresh
@sell_window.show.activate
@status_window.activate
  end
  #--------------------------------------------------------------------------
  # ● 装備ウィンドウのアクティブ化
  #--------------------------------------------------------------------------
  def activate_equip_window
@equip_window.set(@status_window.current_actor, @item)
@equip_window.show.activate
@equip_window.select(0)
@status_window.deactivate
  end
  #--------------------------------------------------------------------------
  # ● コマンド［購入する］
  #--------------------------------------------------------------------------
  def command_buy
@dummy_window.hide
activate_buy_window
@buy_window.select(0)
  end
  #--------------------------------------------------------------------------
  # ● コマンド［売却する］
  #--------------------------------------------------------------------------
  def command_sell
@dummy_window.hide
activate_sell_window
@sell_window.select(0)
  end
  #--------------------------------------------------------------------------
  # ● コマンド［装備］
  #--------------------------------------------------------------------------
  def command_equip
SceneManager.call(Scene_ShopEquip)
SceneManager.scene.prepare(@status_window.current_actor)
  end
  #--------------------------------------------------------------------------
  # ● 購入［決定］
  #--------------------------------------------------------------------------
  def on_buy_ok
@item = @buy_window.item
@buy_window.hide
@number_window.set(@item, max_buy, buying_price, currency_unit)
@number_window.show.activate
@status_window.deactivate
  end
  #--------------------------------------------------------------------------
  # ● 購入［キャンセル］
  #--------------------------------------------------------------------------
  def on_buy_cancel
activate_cmd_window
  end
  #--------------------------------------------------------------------------
  # ● 次の購入カテゴリに切り替え
  #--------------------------------------------------------------------------
  def next_buy_ct
@buy_ct_window.cursor_right(true)
@buy_ct_window.update_cursor
@buy_ct_window.update
@buy_window.activate.select(0)
@buy_window.update_help
  end
  #--------------------------------------------------------------------------
  # ● 前の購入カテゴリに切り替え
  #--------------------------------------------------------------------------
  def prev_buy_ct
@buy_ct_window.cursor_left(true)
@buy_ct_window.update_cursor
@buy_ct_window.update
@buy_window.activate.select(0)
@buy_window.update_help
  end
  #--------------------------------------------------------------------------
  # ● 売却［決定］
  #--------------------------------------------------------------------------
  def on_sell_ok
@item = @sell_window.item
@sell_window.hide
@number_window.set(@item, max_sell, selling_price, currency_unit)
@number_window.show.activate
@status_window.deactivate
  end
  #--------------------------------------------------------------------------
  # ● 売却［キャンセル］
  #--------------------------------------------------------------------------
  def on_sell_cancel
activate_cmd_window
  end
  #--------------------------------------------------------------------------
  # ● 次の売却カテゴリに切り替え
  #--------------------------------------------------------------------------
  def next_sell_ct
@sell_ct_window.cursor_right(true)
@sell_ct_window.update_cursor
@sell_ct_window.update
@sell_window.activate.select(0)
@sell_window.update_help
  end
  #--------------------------------------------------------------------------
  # ● 前の売却カテゴリに切り替え
  #--------------------------------------------------------------------------
  def prev_sell_ct
@sell_ct_window.cursor_left(true)
@sell_ct_window.update_cursor
@sell_ct_window.update
@sell_window.activate.select(0)
@sell_window.update_help
  end
  #--------------------------------------------------------------------------
  # ● 個数入力［決定］
  #--------------------------------------------------------------------------
  def on_number_ok
Sound.play_shop
case @command_window.current_symbol
when :buy
   do_buy(@number_window.number)
when :sell
   do_sell(@number_window.number)
end
end_number_input(true)
@gold_window.refresh
@status_window.refresh
  end
  #--------------------------------------------------------------------------
  # ● 個数入力［キャンセル］
  #--------------------------------------------------------------------------
  def on_number_cancel
Sound.play_cancel
end_number_input(false)
  end
  #--------------------------------------------------------------------------
  # ● 購入の実行
  #--------------------------------------------------------------------------
  def do_buy(number)
$game_party.lose_gold(number * buying_price)
$game_party.gain_item(@item, number)
$game_system.shop.buy.gold += number * buying_price
  end
  #--------------------------------------------------------------------------
  # ● 売却の実行
  #--------------------------------------------------------------------------
  def do_sell(number)
$game_party.gain_gold(number * selling_price)
$game_party.lose_item(@item, number)
$game_system.shop.sell.gold += number * selling_price
  end
  #--------------------------------------------------------------------------
  # ● 個数入力の終了
  #--------------------------------------------------------------------------
  def end_number_input(buy=true)
@number_window.hide
case @command_window.current_symbol
when :buy
   if buy && @status_window.current_actor.equippable?(@item)
      activate_equip_window
   else
      activate_buy_window
   end
when :sell
   activate_sell_window
end
  end
  #--------------------------------------------------------------------------
  # ● 装備［決定］
  #--------------------------------------------------------------------------
  def on_equip_ok
Sound.play_equip
@equip_window.hide
actor = @status_window.current_actor
actor.change_equip(actor.empty_slot(@item.etype_id), @item)
activate_buy_window
  end
  #--------------------------------------------------------------------------
  # ● 装備［キャンセル］
  #--------------------------------------------------------------------------
  def on_equip_cancel
@equip_window.hide
activate_buy_window
  end
  #--------------------------------------------------------------------------
  # ● 最大購入可能個数の取得
  #--------------------------------------------------------------------------
  def max_buy
max = $game_party.max_item_number(@item) - $game_party.item_number(@item)
buying_price == 0 ? max : [max, money / buying_price].min
  end
  #--------------------------------------------------------------------------
  # ● 売値の取得
  #--------------------------------------------------------------------------
  def selling_price
ExShop::sell_price(@item, @item.price)
  end
end

#==============================================================================
# ■ Scene_ShopEquip
#------------------------------------------------------------------------------
# ショップ画面から呼び出す装備画面。メニューのものとは処理を分離。
# ($game_party.menu_actorは変化させない)
#==============================================================================
class Scene_ShopEquip < Scene_Equip
  #--------------------------------------------------------------------------
  # ● 準備
  #--------------------------------------------------------------------------
  def prepare(actor)
@start_actor = actor
  end
  #--------------------------------------------------------------------------
  # ● 開始処理
  #--------------------------------------------------------------------------
  def start
tmp_actor = $game_party.menu_actor
$game_party.menu_actor = @start_actor
super
$game_party.menu_actor = tmp_actor
  end
  #--------------------------------------------------------------------------
  # ● 次のアクターに切り替え
  #--------------------------------------------------------------------------
  def next_actor
tmp_actor = $game_party.menu_actor
@actor = $game_party.menu_actor_next
$game_party.menu_actor = tmp_actor
on_actor_change
  end
  #--------------------------------------------------------------------------
  # ● 前のアクターに切り替え
  #--------------------------------------------------------------------------
  def prev_actor
tmp_actor = $game_party.menu_actor
@actor = $game_party.menu_actor_prev
$game_party.menu_actor = tmp_actor
on_actor_change
  end
  #--------------------------------------------------------------------------
  # ● 呼び出し元のシーンへ戻る
  #--------------------------------------------------------------------------
  def return_scene
super
SceneManager.scene.prepare_actor(@actor)
  end
end[/pre]

作者: 布里蓝 时间: 2013-10-30 19:52
记得插入后就能直接用了啊，不过似乎要重新开始游戏
作者: 魔力的觉醒 时间: 2013-10-30 20:07

布里蓝发表于 2013-10-30 19:52
记得插入后就能直接用了啊，不过似乎要重新开始游戏

好的  谢谢  已经ok
作者: tan12345 时间: 2013-10-30 20:16
直接插入到脚本里main以前，这个脚本会替换掉商店系统，使用方式：在事件里调用商店处理即可，这个脚本的开始阶段有一些设置以及说明。
另外这个脚本貌似会报错（反正我新建默认系统把脚本放进去会提示出错），如果出错了并且错误提示是906行，那么把906行的price(item) <= @money改成price(item) <= @money.to_i即可。
作者: 魔力的觉醒 时间: 2013-10-30 20:17

布里蓝发表于 2013-10-30 19:52
记得插入后就能直接用了啊，不过似乎要重新开始游戏

再次弱弱的问句  能帮我这个图标分类改成只留3种吗？
一个是所有消耗品类  一个是武器累  一个是护甲类

作者: 魔力的觉醒 时间: 2013-10-30 20:18

tan12345 发表于 2013-10-30 20:16
直接插入到脚本里main以前，这个脚本会替换掉商店系统，使用方式：在事件里调用商店处理即可，这个脚本的开 ...

谢谢  暂时没有出错
作者: 魔力的觉醒 时间: 2013-10-30 21:10
没人回答下么！！！！一直在做等呢！！！
作者: tseyik 时间: 2013-10-30 21:47

魔力的觉醒发表于 2013-10-30 20:17
再次弱弱的问句  能帮我这个图标分类改成只留3种吗？
一个是所有消耗品类  一个是武器累  一个是护甲类
...

改行 117和行123
# 武器をさらに分類する
  # (分類設定のWEAPONを武器タイプで分類します)
  USE_W_TYPE = false　　#行 117
  # 防具をさらに分類する
  # (分類設定のARMORを防具タイプ/防具種別で分類します)
  # 0 : 分類しない
  # 1 : 防具タイプで分類
  # 2 : 装備タイプ(盾/頭/身体/装飾品)で分類
  USE_A_TYPE = 0　　#行123
作者: tan12345 时间: 2013-10-30 21:48
第117行USE_W_TYPE = true改为USE_W_TYPE = false
第123行USE_A_TYPE = 2改为USE_A_TYPE = 0

欢迎光临 Project1 (https://rpg.blue/) Powered by Discuz! X5.0