问一个物品掉落的算法……

saturnfjh

先奉上原脚本《掉落扩张》：

1. #_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
   
2. #_/    ◆ ドロップアイテム拡張 - KGC_ExtraDropItem ◆ VX ◆
   
3. #_/    ◇ Last update : 2008/08/28 ◇
   
4. #_/----------------------------------------------------------------------------
   
5. #_/  敵が落とすアイテムの種類を増やします。
   
6. #_/============================================================================
   
7. #_/ 【特殊システム】≪戦闘難易度≫ より上に導入してください。
   
8. #_/ 【メニュー】≪モンスター図鑑≫ より下に導入してください。
   
9. #_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/_/
   
10. 
    
11. $imported = {} if $imported == nil
    
12. $imported["ExtraDropItem"] = true
    
13. 
    
14. module KGC
    
15. module ExtraDropItem
    
16.   # 正規表現
    
17.   module Regexp
    
18.     # エネミー
    
19.     module Enemy
    
20.       # ドロップアイテム
    
21.       DROP_ITEM = /<(?:DROP|ドロップ)\s*([IWA]):(\d+)\s+(\d+)([%％])?>/i
    
22.     end
    
23.   end
    
24. end
    
25. end
    
26. 
    
27. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
28. 
    
29. #==============================================================================
    
30. # ■ RPG::Enemy
    
31. #==============================================================================
    
32. 
    
33. class RPG::Enemy
    
34.   #--------------------------------------------------------------------------
    
35.   # ○ ドロップアイテム拡張のキャッシュ生成
    
36.   #--------------------------------------------------------------------------
    
37.   def create_extra_drop_item_cache
    
38.     @__extra_drop_items = []
    
39. 
    
40.     self.note.each_line { |line|
    
41.       case line
    
42.       when KGC::ExtraDropItem::Regexp::Enemy::DROP_ITEM
    
43.         # ドロップアイテム
    
44.         item = RPG::Enemy::DropItem.new
    
45.         case $1.upcase
    
46.         when "I"  # アイテム
    
47.           item.kind = 1
    
48.           item.item_id = $2.to_i
    
49.         when "W"  # 武器
    
50.           item.kind = 2
    
51.           item.weapon_id = $2.to_i
    
52.         when "A"  # 防具
    
53.           item.kind = 3
    
54.           item.armor_id = $2.to_i
    
55.         else
    
56.           next
    
57.         end
    
58.         # ドロップ率
    
59.         if $4 != nil
    
60.           item.drop_prob = $3.to_i
    
61.         else
    
62.           item.denominator = $3.to_i
    
63.         end
    
64.         @__extra_drop_items << item
    
65.       end
    
66.     }
    
67.   end
    
68.   #--------------------------------------------------------------------------
    
69.   # ○ 拡張ドロップアイテム
    
70.   #--------------------------------------------------------------------------
    
71.   def extra_drop_items
    
72.     create_extra_drop_item_cache if @__extra_drop_items == nil
    
73.     return @__extra_drop_items
    
74.   end
    
75. end
    
76. 
    
77. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
78. 
    
79. #==============================================================================
    
80. # ■ RPG::Enemy::DropItem
    
81. #==============================================================================
    
82. 
    
83. unless $@
    
84. class RPG::Enemy::DropItem
    
85.   #--------------------------------------------------------------------------
    
86.   # ● 公開インスタンス変数
    
87.   #--------------------------------------------------------------------------
    
88.   attr_writer   :drop_prob                # ドロップ率
    
89.   #--------------------------------------------------------------------------
    
90.   # ○ ドロップ率取得
    
91.   #--------------------------------------------------------------------------
    
92.   def drop_prob
    
93.     @drop_prob = 0 if @drop_prob == nil
    
94.     return @drop_prob
    
95.   end
    
96. end
    
97. end
    
98. 
    
99. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
    
100. 
     
101. #==============================================================================
     
102. # ■ Game_Enemy
     
103. #==============================================================================
     
104. 
     
105. class Game_Enemy < Game_Battler
     
106.   #--------------------------------------------------------------------------
     
107.   # ○ 拡張ドロップアイテムの取得
     
108.   #--------------------------------------------------------------------------
     
109.   def extra_drop_items
     
110.     return enemy.extra_drop_items
     
111.   end
     
112. end
     
113. 
     
114. #★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★☆★
     
115. 
     
116. #==============================================================================
     
117. # ■ Game_Troop
     
118. #==============================================================================
     
119. 
     
120. class Game_Troop < Game_Unit
     
121.   #--------------------------------------------------------------------------
     
122.   # ● ドロップアイテムの配列作成
     
123.   #--------------------------------------------------------------------------
     
124.   alias make_drop_items_KGC_ExtraDropItem make_drop_items
     
125.   def make_drop_items
     
126.     drop_items = make_drop_items_KGC_ExtraDropItem
     
127. 
     
128.     dead_members.each { |enemy|
     
129.       enemy.extra_drop_items.each_with_index { |di, i|
     
130.         next if di.kind == 0
     
131.         if di.drop_prob > 0
     
132.           # 確率指定
     
133.           next if di.drop_prob < rand(100)
     
134.             
     
135.         else
     
136.           # 分母指定
     
137.           next if rand(di.denominator) != 0
     
138.         end
     
139.         if di.kind == 1
     
140.           drop_items.push($data_items[di.item_id])
     
141.         elsif di.kind == 2
     
142.           drop_items.push($data_weapons[di.weapon_id])
     
143.         elsif di.kind == 3
     
144.           drop_items.push($data_armors[di.armor_id])
     
145.         end
     
146.         # ドロップ済みフラグをセット
     
147.         if $imported["EnemyGuide"]
     
148.           KGC::Commands.set_enemy_item_dropped(enemy.enemy.id, i + 2)
     
149.         end
     
150.       }
     
151.     }
     
152.     return drop_items
     
153.   end
     
154. end
     

复制代码

问题如下：
现在我想修改一下物品掉落的算法，不再一个一个物品判断，而是从N件物品中选取X件掉落：
设想如下：
STEP1 利用以上脚本读取掉落列表中的各物品掉落率
STEP2 加总掉落率总和，以此判断掉落件数，例如，总和T满足：T<100则掉落一件，100<T<200则掉落2件……以此类推
STEP3 从掉落列表中用rand(T)函数获取第1件掉落
STEP4 从掉落列表中用rand(T)函数获取第2件掉落（如果有的话），与第1件相同则重复此步骤
STEP5 从掉落列表中用rand(T)函数获取第3件掉落（如果有的话），与第1、2件相同则重复此步骤
STEP6 ...
FINAL STEP 确定掉落

以上算法要用脚本应该怎么写？替换原脚本哪一节？我刚接触脚本不久，对于里面一些函数的用法不熟悉，想请高手指点一二；另，有没有更优的算法？

saturnfjh

自顶……求大师指点一二啊……我不是伸手党，只是不知道怎么写这个算法。。555。。

saturnfjh

再顶……豁出去了……求指点……

summer92

提示:自己写算法,有时候不要死钻一点

saturnfjh

回复 summer92 的帖子
=。= 现在就是找不到更好地算法才来求救的。。
关键是我不太熟悉脚本的循环。。

   

saturnfjh

自顶。。。求安慰。。

禾西

make_drop_items是關鍵
作用就是讀取物品 push 進 drop_items 這個數組中

saturnfjh

1. class Game_Troop < Game_Unit
   
2.   #--------------------------------------------------------------------------
   
3.   # ● ドロップアイテムの配列作成
   
4.   #--------------------------------------------------------------------------
   
5.   alias make_drop_items_KGC_ExtraDropItem make_drop_items
   
6.   def make_drop_items
   
7.     drop_items = make_drop_items_KGC_ExtraDropItem
   
8.     drop_count = 0
   
9.     drop_piece = 0
   
10.     drop_make = 0
    
11.     drop_price = 0
    
12.     dead_members.each { |enemy|
    
13.       enemy.extra_drop_items.each_with_index { |di, i|
    
14.         drop_count += i
    
15.     next if di.kind == 0
    
16.     #判断掉落件数
    
17.     if drop_count <= 100
    
18.       drop_piece = drop_count > rand(100)? 1:0
    
19.     elsif drop_count <= 200
    
20.       drop_piece = drop_count > rand(200)? 2:1
    
21.     else
    
22.       drop_piece = drop_count > rand(300)? 3:2
    
23.     end
    
24.     #根据件数判断物品
    
25.     case drop_piece
    
26.     when 0
    
27.       return
    
28.     when 1
    
29.       drop_price = rand(100)
    
30.       enemy.extra_drop_items.each_with_index { |di, i|
    
31.       drop_make += i
    
32.       next if drop_make < drop_price
    
33.         if di.kind == 1
    
34.           drop_items.push($data_items[di.item_id])
    
35.         elsif di.kind == 2
    
36.           drop_items.push($data_weapons[di.weapon_id])
    
37.         elsif di.kind == 3
    
38.           drop_items.push($data_armors[di.armor_id])
    
39.         end
    
40.       }
    
41.     when 2
    
42.       for a in 1..2
    
43.         drop_price = rand(200)
    
44.         enemy.extra_drop_items.each_with_index { |di, i|
    
45.         drop_make += i
    
46.         next if drop_make < drop_price
    
47.           if di.kind == 1
    
48.             drop_items.push($data_items[di.item_id])
    
49.           elsif di.kind == 2
    
50.             drop_items.push($data_weapons[di.weapon_id])
    
51.           elsif di.kind == 3
    
52.             drop_items.push($data_armors[di.armor_id])
    
53.           end
    
54.       }
    
55.         next
    
56.       end
    
57.     when 3
    
58.       for a in 1..3
    
59.         drop_price = rand(300)
    
60.         enemy.extra_drop_items.each_with_index { |di, i|
    
61.         drop_make += i
    
62.         next if drop_make < drop_price
    
63.           if di.kind == 1
    
64.             drop_items.push($data_items[di.item_id])
    
65.           elsif di.kind == 2
    
66.             drop_items.push($data_weapons[di.weapon_id])
    
67.           elsif di.kind == 3
    
68.             drop_items.push($data_armors[di.armor_id])
    
69.           end
    
70.       }
    
71.         next
    
72.       end
    
73.     end
    
74.         if $imported["EnemyGuide"]
    
75.           KGC::Commands.set_enemy_item_dropped(enemy.enemy.id, i + 2)
    
76.         end
    
77.       }
    
78.     }
    
79.     return drop_items
    
80.   end
    
81. end

复制代码

我照着改了一下，然后出现 未定义 each 方法，请各位大师指点一下要怎么修改。。

saturnfjh

自顶。。求安慰。。