ショップアイテム試着(RGSS3) | BMSP(スクリプト)

サイトマップ :

ショップアイテム試着(RGSS3)
Ver1.00(2012/09/12)

|前のページへ|

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

web拍手

概要

ショップの装備アイテムを装備画面で試着することができます．

複数選択機能ver1.00以上，アイテムセグメントver1.10以上が必須です．

|ページトップへ|

位置

アイテムセグメントより下

|ページトップへ|

スクリプト

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

#==============================================================================
# ■ BMSP ショップアイテム試着[FITTINGROOM] Ver1.00 2012/09/12
#------------------------------------------------------------------------------
# 　ショップの装備アイテムを装備画面で試着することができます．
#==============================================================================
#------------------------------------------------------------------------------
# ■内容
# ショップで販売されている装備を実際に装備画面で装備してみることができます．
#
# 位置：「BMSP アイテムセグメント」より下
#
# ■必須
# 「BMSP アイテムセグメントver1.10以上」「BMSP 複数選択機能ver1.00以上」が必須です．
#
# ■使用方法
# スクリプトに丸ごと貼り付けていただければ使用できます．
#
# ショップの購入ウインドウ内で，装備アイテムを複数選択し決定キーを押すと
# 選んだ装備を持った状態で装備画面に移行し，ショップの装備を試着することができます．
#
# ショップのアイテムは試着アイテムであることを表すアイコンが表示されます．
#
# 複数選択の方法については「BMSP 複数選択機能」をご覧ください．
#
# 詳細設定の欄では、
# ○FITTING_ICON : 試着アイテムを示すアイコンのファイル名です．
#                  Graphics/Picturesフォルダのファイルを参照します．
# が設定できます．
#
# ■注意
# このスクリプトでは
# 「RPG::BaseItem」「Window_ShopBuy」「Window_Base」「Scene_Shop」
# のメソッドを改変しています．
# ■情報
# このスクリプトはgentlawkによって作られたものです．
# 利用規約はhttp://blueredzone.comをご覧ください．
#------------------------------------------------------------------------------
module BMSP
  @@includes ||= {}
  @@includes[:FittingRoom] = 1.00
  module FittingRoom
    #▲▽▲▽▲▽▲▽▲▽▲▽▲▽▲▽
    #詳細設定
    FITTING_ICON = "tryon.png" # 試着アイテムを示すアイコンファイル
    #▲▽▲▽▲▽▲▽▲▽▲▽▲▽▲▽
    FITTING_SHIFT = 4789_000 # 試着アイテムのIDシフト量(4789->しちゃく(笑))
    @fitting = false # 試着中フラグ
    def self.fitting; @fitting; end
    def self.fitting=(f); @fitting=f; end
    #--------------------------------------------------------------------------
    # ● バグの例外クラス
    #--------------------------------------------------------------------------
    class BUG < StandardError
    end
    #--------------------------------------------------------------------------
    # ● 導入スクリプトの例外クラス
    #--------------------------------------------------------------------------
    class REQUIRE < StandardError
    end
  end
  #--------------------------------------------------------------------------
  # ● 必須スクリプトのチェック
  #--------------------------------------------------------------------------
  class << self
    if method_defined?(:check_require)
      alias fittingroom_check_require check_require
    end
  end
  def self.check_require(require, version)
    if methods.include?(:fittingroom_check_require)
      fittingroom_check_require(require, version)
    end
    if !@@includes[require]
      message =
        sprintf("BMSPスクリプト%sが導入されていません．\n%s Ver%1.2f以上を導入してください．",
          require,require,version)
      raise FittingRoom::REQUIRE, message
    elsif @@includes[require] < version
      message =
        sprintf("BMSPスクリプト%s Ver%1.2fは古いバージョンです．\n%s Ver%1.2f以上を導入してください．",
          require,@@includes[require],require,version)
      raise FittingRoom::REQUIRE, message
    end
    return true
  end
end
BMSP.check_require(:ItemSegment, 1.10)
#==============================================================================
# ■ RPG::BaseItem
#==============================================================================
class RPG::BaseItem
  #--------------------------------------------------------------------------
  # ● 試着アイテムかどうか
  #--------------------------------------------------------------------------
  def tryon?
    return false unless extended?
    self.extend.tryon?
  end
  #--------------------------------------------------------------------------
  # ● IDの取得
  #--------------------------------------------------------------------------
  alias bmsp_fittingroom_id id
  def id
    bmsp_fittingroom_id + (tryon? ? BMSP::FittingRoom::FITTING_SHIFT : 0)
  end
end
#==============================================================================
# ■ BMSP::ItemSegmentSystem::Extend
#==============================================================================
module BMSP::ItemSegmentSystem::Extend
  #--------------------------------------------------------------------------
  # ● インスタンス初期化時に呼ばれるメソッド
  #--------------------------------------------------------------------------
  alias bmsp_fitting_room_init init
  def init(extend)
    bmsp_fitting_room_init(extend)
    @tryon = true if extend && extend.tryon?
  end
  #--------------------------------------------------------------------------
  # ● 試着アイテム化
  #--------------------------------------------------------------------------
  def set_try_item
    @tryon = true
    @id += BMSP::FittingRoom::FITTING_SHIFT
  end
  #--------------------------------------------------------------------------
  # ● 試着アイテムかどうか
  #--------------------------------------------------------------------------
  def tryon?; @tryon; end
  #--------------------------------------------------------------------------
  # ● 元のIDを取得(IDシフトへの対応)
  #--------------------------------------------------------------------------
  alias bmsp_fitting_room_original_id original_id
  def original_id
    id = bmsp_fitting_room_original_id
    tryon? ? id - BMSP::FittingRoom::FITTING_SHIFT : id
  end
end
#==============================================================================
# ■ Window_ShopBuy
#==============================================================================
class Window_ShopBuy < Window_Selectable
  #--------------------------------------------------------------------------
  # ● アイテムをインデックスでも取得できるように
  #--------------------------------------------------------------------------
  alias bmsp_shopbuy_item item
  def item(i = -1)
    @data && i >= 0 ? @data[i] : bmsp_shopbuy_item
  end
end
#==============================================================================
# ■ Window_Base
#==============================================================================
class Window_Base < Window
  #--------------------------------------------------------------------------
  # ● アイテム名の描画
  #--------------------------------------------------------------------------
  alias bmsp_fittingroom_draw_item_name draw_item_name
  def draw_item_name(item, x, y, enabled = true, width = 172)
    bmsp_fittingroom_draw_item_name(item, x, y, enabled, width)
    return unless item
    return unless item.tryon?
    # 試着アイコンの描画
    bitmap = Cache.picture(BMSP::FittingRoom::FITTING_ICON)
    rect = Rect.new(0, 0, 24, 24)
    contents.blt(x, y, bitmap, rect, enabled ? 255 : translucent_alpha)
  end
end
#==============================================================================
# ■ Scene_Shop
#==============================================================================
class Scene_Shop < Scene_MenuBase
  #--------------------------------------------------------------------------
  # ● 開始処理
  #--------------------------------------------------------------------------
  alias bmsp_fittingroom_start start
  def start
    bmsp_fittingroom_start
    bmsp_fittingroom_init_multiselect
  end
  #--------------------------------------------------------------------------
  # ● 試着から戻った時の処理
  #--------------------------------------------------------------------------
  def bmsp_fittingroom_init_multiselect
    return unless BMSP::FittingRoom.fitting
    # 現在装備の復元
    $game_party.all_members.each{|actor| actor.clear_equipments}
    $game_party.all_members.each do |actor|
      BMSP::FittingRoom.fitting[actor].each_with_index do |item, i|
        actor.change_equip(i, item)
      end
    end
    # 試着アイテムの削除
    BMSP::FittingRoom.fitting[:extends].each do |extend|
      $game_party.gain_item(extend.item, -1)
    end
    # 項目の選択
    @command_window.deactivate
    command_buy
    @buy_window.multiselect = true
    BMSP::FittingRoom.fitting[:multi_index].each do |index|
      @buy_window.change_multiselect(index)
    end
    @buy_window.select(BMSP::FittingRoom.fitting[:select_index])
    @buy_window.refresh
    BMSP::FittingRoom.fitting = false
  end
  #--------------------------------------------------------------------------
  # ● 購入ウィンドウの作成
  #--------------------------------------------------------------------------
  alias bmsp_fittingroom_create_buy_window create_buy_window
  def create_buy_window
    bmsp_fittingroom_create_buy_window
    @buy_window.set_handler(:multiselect, method(:on_buy_multiselect))
    @buy_window.set_handler(:multi_ok, method(:multi_on_buy_ok))
    @buy_window.set_handler(:multi_cancel, method(:multi_on_buy_cancel))
    @buy_window.set_handler(:multi_multiselect, method(:multi_on_buy_multiselect))
  end
  #--------------------------------------------------------------------------
  # ● 購入［選択］
  #--------------------------------------------------------------------------
  def on_buy_multiselect
    case @buy_window.item
    when RPG::Weapon,RPG::Armor
      @buy_window.multiselect = true
      @buy_window.change_multiselect(@buy_window.index)
      if @buy_window.multiselect_index.empty?
        multi_on_buy_cancel
      else
        Sound.play_multiselect
      end
    else
      Sound.play_buzzer
    end
  end
  #--------------------------------------------------------------------------
  # ● 購入［複数選択中決定］
  #--------------------------------------------------------------------------
  def multi_on_buy_ok
    Sound.play_ok
    BMSP::FittingRoom.fitting = {
      :multi_index => @buy_window.multiselect_index,
      :select_index => @buy_window.index
    }
    # 試着アイテムの入手
    extends = @buy_window.multiselect_index.map{ |index|
      extend = BMSP::ItemExtend.new(@buy_window.item(index))
      extend.set_try_item
      extend
    }
    extends.each{|extend| $game_party.gain_item(extend.item, 1) }
    BMSP::FittingRoom.fitting[:extends] = extends
    # 現在装備の保存
    $game_party.all_members.each do |actor|
      equips = actor.instance_eval{@equips}.map{|item| item.object}
      BMSP::FittingRoom.fitting[actor] = equips
    end
    SceneManager.call(Scene_Equip)
  end
  #--------------------------------------------------------------------------
  # ● 購入［複数選択中キャンセル］
  #--------------------------------------------------------------------------
  def multi_on_buy_cancel
    @buy_window.multiselect = false
    Sound.play_cancel
  end
  #--------------------------------------------------------------------------
  # ● 購入［複数選択中選択］
  #--------------------------------------------------------------------------
  def multi_on_buy_multiselect
    case @buy_window.item
    when RPG::Weapon,RPG::Armor
      @buy_window.change_multiselect(@buy_window.index)
      if @buy_window.multiselect_index.empty?
        multi_on_buy_cancel
      else
        Sound.play_multiselect
      end
    else
      Sound.play_buzzer
    end
  end
end

|ページトップへ|

更新履歴

2012/09/12…公開

|ページトップへ|

使用方法

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

ショップの購入ウインドウ内で，装備アイテムを複数選択し決定キーを押すと選んだ装備を持った状態で装備画面に移行し，ショップの装備を試着することができます．
複数選択の方法については「BMSP 複数選択機能」をご覧ください．

ショップのアイテムは試着アイテムであることを表すアイコンが表示されます．
アイコンは自作していただくか，以下の画像をご利用ください．
試着アイテムアイコン：

詳細設定の欄では以下の項目が設定可能です．

FITTING_ICON: 試着アイテムを示すアイコンのファイル名です．
Graphics/Picturesフォルダのファイルを参照します

注意

このスクリプトでは「RPG::BaseItem」「Window_ShopBuy」「Window_Base」「Scene_Shop」のメソッドを改変しています．

|ページトップへ|

|前のページへ|

BlueRedZone

パンくずリスト

コンテンツ

ショップアイテム試着(RGSS3)
Ver1.00(2012/09/12)

メニュー

概要

位置

スクリプト

更新履歴

使用方法

注意

BlueRedZone

パンくずリスト

コンテンツ

ショップアイテム試着(RGSS3) Ver1.00(2012/09/12)

メニュー

概要

位置

スクリプト

更新履歴

使用方法

注意

ショップアイテム試着(RGSS3)
Ver1.00(2012/09/12)