【萌新提问】关于商店

1233214_

可不可以实现像2000和2003那样可以只卖出？

真の玛娜君

喵呜喵5大佬的脚本

1. =begin
   
2. ===============================================================================
   
3.   高价回收物品的商店 By喵呜喵5
   
4. ===============================================================================
   
5. 
   
6. 【说明】
   
7. 
   
8.   指定的开关打开时，事件指令中的商店处理会进入特定的物品回收商店
   
9. 
   
10.   在物品回收商店中无法购买物品，只能贩卖物品
    
11. 
    
12.   物品的售价则为商店处理中设置的物品价格（而非数据库中设置的价格）
    
13. 
    
14. =end
    
15. $m5script ||= {}
    
16. $m5script[:M5SS20151022] = 20151022
    
17. module M5SS20151022
    
18. #==============================================================================
    
19. # 设定部分
    
20. #==============================================================================
    
21. 
    
22.   SWI = 13
    
23. 
    
24.   #这里设置一个开关ID，当开关打开时使用商店处理将进入物品回收商店
    
25. 
    
26.   SHOW1 = true    # true / false
    
27. 
    
28.   #设置为true时，在物品回收商店也能以正常价格（原价除2）贩卖没有设置价格的物品
    
29. 
    
30.   SHOW2 = false    # true / false
    
31. 
    
32.   #设置为true时，在物品回收商店中也会显示玩家不拥有但有设置价格的物品
    
33. 
    
34. #==============================================================================
    
35. # 设定结束
    
36. #==============================================================================
    
37. class Sell < Window_ShopSell
    
38.   attr_writer :shop_goods
    
39.   def initialize *args
    
40.     super *args
    
41.     @shop_goods = []
    
42.   end
    
43.   def make_item_list
    
44.     @data = []
    
45.     @price = {}
    
46.     @shop_goods.each do |goods|
    
47.       item = ( case goods[0]
    
48.                when 0 then $data_items
    
49.                when 1 then $data_weapons
    
50.                when 2 then $data_armors
    
51.                end )[ goods[1] ]
    
52.       if item
    
53.         next unless include?(item)
    
54.         @data << item
    
55.         @price[item] = goods[2] == 0 ? item.price : goods[3]
    
56.       end
    
57.     end
    
58.     if SHOW1
    
59.       @data += $game_party.all_items.select {|item| include?(item)}
    
60.       @data.uniq!
    
61.     end
    
62.     @data = @data.select{|item| $game_party.has_item?(item)} unless SHOW2
    
63.     @data.push(nil) if include?(nil)
    
64.   end
    
65.   def enable?(item)
    
66.     item && (@price[item] ? @price[item] > 0 : item.price > 0) && $game_party.has_item?(item)
    
67.   end
    
68. end
    
69. class Command < Window_ShopCommand
    
70.   def col_max; @list.size; end
    
71.   def make_command_list
    
72.     super
    
73.     @list.delete_if { |command| command[:symbol] == :buy }
    
74.   end
    
75. end
    
76. Scene_Clone = Scene_Shop.clone
    
77. class Scene_Clone
    
78.   Window_ShopCommand = M5SS20151022::Command
    
79.   Window_ShopSell = M5SS20151022::Sell
    
80. end
    
81. class Scene < Scene_Clone
    
82.   def create_sell_window
    
83.     super
    
84.     @sell_window.shop_goods = @goods
    
85.   end
    
86.   def selling_price; buying_price || super; end
    
87. end
    
88. 
    
89. end # module M5SS20151022
    
90. 
    
91. class Game_Interpreter
    
92.   alias m5_20140320_command_302 command_302
    
93.   def command_302
    
94.     temp_scene = Scene_Shop
    
95.     if $game_switches[M5SS20151022::SWI]
    
96.       Object.const_set(:Scene_Shop, M5SS20151022::Scene)
    
97.       ( @params = @params.clone )[4] = false
    
98.     end
    
99.     m5_20140320_command_302
    
100.     Object.const_set(:Scene_Shop, temp_scene)
     
101.   end
     
102. end

复制代码

1233214_

真の玛娜君 发表于 2019-10-7 12:48
喵呜喵5大佬的脚本

感谢分享！