随机出售商品报错问题

是猪别乱叫

一旦使用物品触发随机商店就会报错，而用地图上的人物对话却不会，求大神帮忙

是猪别乱叫

1. =begin
   
2. 
   
3.   說明：
   
4.   
   
5.   事件中執行腳本呼叫隨機物品商店
   
6.   
   
7.     random_shop(group, number)
   
8.     例：隨機出售組:A中的三件商品:  random_shop(:A, 3)
   
9.   
   
10.    
    
11.   打折出售
    
12.   
    
13.     random_shop(group, number, disount)
    
14.     例：8折出售商品: random_shop(:B, 4, 0.8)
    
15.    
    
16.    
    
17.   不讓玩家出售物品
    
18.   
    
19.     random_shop(group, number, discount, purchase_only)
    
20.     例（須設定折扣）：random_shop(:C, 20, 1, 1)
    
21.    
    
22. =end
    
23. 
    
24. 
    
25. class Game_Interpreter
    
26.   Random_Goods = { #在這裡定義你的商品列表
    
27.     :A => [:i1_6, :i18_20, :i23_40], #i物品，w武器，每個組用逗號隔開 :i1_6, :i18_20, :i23_40
    
28.     :B => [:i1_6, :i18_20, :a1_10],   #:i1_6, :i18_20, :a1_10
    
29.            #這樣代表i物品1~10，w武器1~12，a護甲5~9
    
30.     :C => [:w1_60]
    
31.   }
    
32.   # 設置變數號碼，當變數改變后商人才會更新商品
    
33.   # 設置為 nil 的話，每次跟商人對話商品都會更新
    
34.   Goods_Change_Var = nil
    
35.   #
    
36.   def random_shop(group, num, discount = 1, purchase_only = false)
    
37.     return if $game_party.in_battle
    
38.     goods = [] #空
    
39.     Random_Goods[group].each {|g|
    
40.       g = g.to_s
    
41.       type = g[0]=="i" ? 0 : g[0]=="w" ? 1 : 2
    
42.       if g.include?("_")
    
43.         a, b = g.scan(/\d+/)
    
44.         for i in a.to_i..b.to_i
    
45.           begin
    
46.             goods.push(random_goods_info(discount, type, i))
    
47.           rescue
    
48.             report_random_goods_crash(group, g)
    
49.             return
    
50.           end
    
51.         end
    
52.       else
    
53.         g =~ /(\d+)/
    
54.         begin
    
55.           goods.push(random_goods_info(discount, type, $1.to_i))
    
56.         rescue
    
57.           report_random_goods_crash(group, g)
    
58.           return
    
59.         end
    
60.       end
    
61.     }
    
62.     SceneManager.call(Scene_Shop)
    
63.     SceneManager.scene.prepare(new_random_goods(goods, num), purchase_only)
    
64.     Fiber.yield
    
65.   end
    
66.   #
    
67.   def new_random_goods(goods, num)
    
68.     return unless event = get_character(0)
    
69.     if Goods_Change_Var
    
70.       key = [@map_id, @event_id, :random_goods]
    
71.       var = $game_variables[Goods_Change_Var]
    
72.       unless $game_self_switches.get_value(key) &&
    
73.              $game_self_switches.get_value(key)[0] == var
    
74.         goods = goods.sample(num).sort
    
75.         $game_self_switches.set_without_refresh(key, [var, goods])
    
76.         return goods
    
77.       else
    
78.         return $game_self_switches.get_value(key)[1]
    
79.       end
    
80.     else
    
81.       return goods.sample(num).sort
    
82.     end
    
83.   end
    
84.   #
    
85.   def random_goods_info(discount, type, i)
    
86.     discount == 1 ?
    
87.       [type, i, 0, which_random_goods(type)[i].price] :
    
88.       [type, i, 1, (which_random_goods(type)[i].price * discount).round]
    
89.   end
    
90.   def which_random_goods(type)
    
91.     case type
    
92.     when 0; $data_items
    
93.     when 1; $data_weapons
    
94.     when 2; $data_armors
    
95.     end
    
96.   end
    
97.   #
    
98.   def report_random_goods_crash(group, g)
    
99.     msgbox("隨機商店發生錯誤：Group :#{group}  Element :#{g}") if $TEST
    
100.   end
     
101. end
     
102. 
     
103. class Game_SelfSwitches
     
104.   def set_without_refresh(key, value)
     
105.     @data[key] = value
     
106.   end
     
107.   def get_value(key)
     
108.     @data[key]
     
109.   end
     
110. end
     
111. 
     

复制代码

是猪别乱叫

好吧，我用开关触发地图上的人物事件解决了。。。