随机获得道具 - Project1 - Powered by Discuz!

#============================================================================
# 囧随机获得道具
# 制作：feizhaodan
# 版本号：1.0.0（这个也不会动了（笑））
#============================================================================
#==============================================================================
# ■ Random_Got
#------------------------------------------------------------------------------
# 随机获取道具的设置页。
#==============================================================================
module Random_Got
Item_List = {} # ←请不要动这个。
# 在这里开始设置随机道具表
# 格式：Item_List[id] = [[kind, gid, num, per],...]
# ID是执行随机的道具ID
# kind 是获得的道具的种类
# gid 是获得的道具的ID
# num 是获得的道具的数量
# per 是获得的几率。实际几率为所有道具的几率分之per
# 有几个道具就写几个内容。
Item_List[21] = [[0, 6, 1, 25], [1, 25, 1, 25], [2, 1, 5, 50]]
end
#囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧囧
#==============================================================================
# ■ Game_Interpreter
#------------------------------------------------------------------------------
# 　执行事件命令的解释器。本类在 Game_Map 类、Game_Troop 类、与
# Game_Event 类的内部使用。
#==============================================================================
class Game_Interpreter
alias random_command_126 command_126
#--------------------------------------------------------------------------
# ● 增减物品
#--------------------------------------------------------------------------
def command_126
if Random_Got::Item_List.include?(@params[0])
got_random_item
else
random_command_126
end
end
#--------------------------------------------------------------------------
# ● 计算获取随机道具
#--------------------------------------------------------------------------
def got_random_item
list = Random_Got::Item_List[@params[0]].clone
range = []
max = list.size
per = 0
num = 0
for i in list
per += i[3]
range[num] = per
num += 1
end
rand_num = (rand(per) + 1)
p rand_num
for i in 0...max
if rand_num <= range[i]
got_in_list = i
break
end
end
_list = list[got_in_list]
case _list[0]
when 0
item = $data_weapons[_list[1]]
when 1
item = $data_armors[_list[1]]
when 2
item = $data_items[_list[1]]
end
value = _list[2]
$game_party.gain_item(item, value)
end
end

复制代码