Ace 스크립트

출처 : http://www.rpgmakervxace.net/topic/12848-shop-stock/

 

 

=begin
#===============================================================================
 Title: Shop Stock
 Author: Tsukihime
 Date: Feb 22, 2013
--------------------------------------------------------------------------------
 ** Change log
 Feb 22, 2013
   - Initial release
--------------------------------------------------------------------------------   
 ** Terms of Use
 * Free to use in commercial/non-commercial projects
 * No real support. The script is provided as-is
 * Will do bug fixes, but no compatibility patches
 * Features may be requested but no guarantees, especially if it is non-trivial
 * Preserve this header
--------------------------------------------------------------------------------
 ** Required
 
 -Shop Manager
 (http://himeworks.wordpress.com/2013/02/22/shop-manager/)
--------------------------------------------------------------------------------
 ** Description
 
 This script adds a "stock" count to each shop good.
 Once a good's stock reaches 0, it will no longer be available in the shop.

--------------------------------------------------------------------------------
 ** Usage
 
 In your event, before the Shop Processing command, use a script call
 
   @shop_stock[id] = amount
   
 Where
   `id` is the ID of the shop good, which is the index they appear in the
        shop list. The first item has ID of 1.
   
   `amount` is how much of the item they have in stock
   
--------------------------------------------------------------------------------
 ** Developers   
 
 How much stock that a shop has remaining of a shop good is stored in the
 "stock" attribute of that good. There are three cases

   stock < 0, then there is no limit
   stock == 0, then there is none left
   stock > 0, then there is that much left

#===============================================================================
=end
$imported = {} if $imported.nil?
$imported["TH_ShopStock"] = true
#===============================================================================
# ** Configuration
#=============================================================================== 
module TH
  module Shop_Stock
  end
end
#===============================================================================
# ** Rest of the Script
#=============================================================================== 
class Game_Interpreter
  
  alias :th_shop_stock_clear :clear
  def clear
    th_shop_stock_clear
    @shop_stock = []
  end
  
  alias :th_shop_stock_setup_good :setup_good
  def setup_good(good, id)
    th_shop_stock_setup_good(good, id)
    stock = @shop_stock[id]
    return unless stock
    good.stock = stock
  end
end
class Game_ShopGood
  attr_reader :stock
  
  alias :th_shop_stock_init :initialize
  def initialize(*args)
    th_shop_stock_init(*args)
    @stock = -1
    @unlimited = true
  end
  
  def stock=(amount)
    @stock = amount
    @unlimited = (amount < 0)
  end
  
  def unlimited?
    @unlimited
  end
  
  def increase_stock(amount)
    @stock += amount
  end
  
  def decrease_stock(amount)
    return if @unlimited
    @stock = [@stock - amount, 0].max
  end
end

class Game_Shop
  
  alias :th_shop_stock_include? :include?
  def include?(index)
    return false if stock(index) == 0
    th_shop_stock_include?(index)
  end
  
  def stock(index)
    @shop_goods[index].stock
  end
end

class Window_ShopBuy < Window_Selectable
  
  alias :th_shop_stock_include? :include?
  def include?(shopGood)
    return false if shopGood.stock == 0
    th_shop_stock_include?(shopGood)
  end
  
  alias :th_shop_stock_draw_item :draw_item
  def draw_item(index)
    th_shop_stock_draw_item(index)
    rect = item_rect(index)
    item = @data[index]
    shopGood = @goods[item]
    draw_text(rect, shopGood.stock, 1) unless shopGood.unlimited?
  end

  alias :th_shop_stock_process_ok :process_ok
  def process_ok
    unless @data[index]
      Sound.play_buzzer 
      return
    end
    th_shop_stock_process_ok
  end
end

class Scene_Shop < Scene_MenuBase
  
  #--------------------------------------------------------------------------
  # Get amount you could buy, compared to the amount in-stock
  #--------------------------------------------------------------------------
  alias :th_shop_stock_max_buy :max_buy
  def max_buy
    party_max = th_shop_stock_max_buy
    @selected_good.unlimited? ? party_max : [party_max, @selected_good.stock].min
  end
  
  #--------------------------------------------------------------------------
  # Decrease the amount of stock of the selected good
  #--------------------------------------------------------------------------
  alias :th_shop_stock_do_buy :do_buy
  def do_buy(number)
    th_shop_stock_do_buy(number)
    @selected_good.decrease_stock(number)
  end
end
 
 
사용법
이벤트 : 상점을했을때, 이벤트 페이지에 나열되는 목록의 맨 위부터 ID:1, ID:2, …로 명함
 
상점 표시 전 이벤트 - 스크립트로
@shop_stock[n] = n
 
괄호의 n은 물건의 아이디, =의 n은 판매가능한 물건 수를 뜻함.
 
shopStock1.jpg

Who's 스리아씨

?
뺘라뺘뺘
Atachment
첨부 '1'
  • ?
    marshall 2013.09.30 20:44
    이 스크립트만 넣으면 작동하지 않습니다.
    본문의 링크에서 샵매니져 스크립트를 추가로 넣어야 적용됩니다.
  • ?
    스리아씨 2013.09.30 20:49
    Aㅏ
    그렇군요.

List of Articles
번호 분류 제목 글쓴이 날짜 조회 수
공지 스크립트 자료 게시물 작성시 주의사항 습작 2012.12.24 5109
공지 RPG VX ACE 유용한 링크 모음 16 아방스 2012.01.03 28921
157 파티 맵에서 4명 이상 대열 이동 가능수 조절하는 스크립트 5 Omegaroid 2013.10.17 1785
156 기타 게임속 이벤트를 텍스트 파일로 추출 2 file 영감쟁e 2013.10.15 3769
155 전투 스킬 캐스팅 시스템 3 스리아씨 2013.10.12 32150
154 전투 자동전투 명령어 추가 스크립트 2 스리아씨 2013.10.11 1953
153 전투 공격시 반동데미지 스크립트 8 스리아씨 2013.10.11 1882
152 변수/스위치 Simple self switches(간단한 셀프 스위치) 4 한국사수련생 2013.10.04 1433
151 변수/스위치 Mog Event Sensor Range 4 file 이클립스 2013.09.30 1570
150 전투 Symbol Encounter 5 파송송뇌진탕 2013.09.29 2530
» 상점 Shop Stock < 상점에서 판매하는 아이템의 수량 제한 > 2 file 스리아씨 2013.09.26 1876
148 기타 아이템 합성 스크립트 4 file 스리아씨 2013.09.26 3138
147 메시지 Text Skip [ 메시지 스킵 ] 4 file 스리아씨 2013.09.26 2989
146 타이틀/게임오버 No Game Over 1 file 스리아씨 2013.09.26 2399
145 HUD 동방프로젝트(풍신록) 맵 이름 표시 3 file 스리아씨 2013.09.24 3253
144 기타 크리스탈 엔진 : 포켓몬 배틀 시스템 7 file 스리아씨 2013.09.24 3894
143 액터 액터 스탯 분배 스크립트 14 file 스리아씨 2013.09.23 2678
142 기타 이동제한 스크립트 5 file 스리아씨 2013.09.23 1768
141 HUD ReinoRpg Hudre 5 file 스리아씨 2013.09.22 2786
140 기타 KGC 스텟 포인트 분배 스크립트 4 file 스리아씨 2013.09.21 1812
139 버그픽스 Event Jitter Fix/Display Rounding Error Fix by Neon Black Alkaid 2013.08.31 1003
138 메뉴 저장금지시 메뉴에 저장 안 뜨게 하기 5 file Bunny_Boy 2013.08.24 2519
Board Pagination Prev 1 2 3 4 5 6 7 8 9 10 11 Next
/ 11