一个武器合成的脚本

fox1313304

1. $imported = {} if $imported.nil?
   
2. if $imported["RuntimeDB"].nil?
   
3.   $imported["RuntimeDB"] = true
   
4.   module DataManager
   
5.     class <<self
   
6.       alias make_save_contents_runtimedb_zabing make_save_contents
   
7.       alias extract_save_contents_runtimedb_zabing extract_save_contents
   
8.     end
   
9.     def self.make_save_contents
   
10.       contents = make_save_contents_runtimedb_zabing
    
11.       contents[:dataactorszabing] = $data_actors
    
12.       contents[:dataclasseszabing] = $data_classes
    
13.       contents[:dataskillszabing] = $data_skills
    
14.       contents[:dataitemszabing] = $data_items
    
15.       contents[:dataweaponszabing] = $data_weapons
    
16.       contents[:dataarmorszabing] = $data_armors
    
17.       contents[:dataenemieszabing] = $data_enemies
    
18.       contents[:datatroopszabing] = $data_troops
    
19.       contents[:datastateszabing] = $data_states
    
20.       contents[:dataanimationszabing] = $data_animations
    
21.       contents[:datatilesetszabing] = $data_tilesets
    
22.       contents[:datacommoneventszabing] = $data_common_events
    
23.       contents[:datasystemzabing] = $data_system
    
24.       contents[:datamapinfoszabing] = $data_mapinfos
    
25.       contents
    
26.     end
    
27.     def self.extract_save_contents(contents)
    
28.       extract_save_contents_runtimedb_zabing(contents)
    
29.       $data_actors = contents[:dataactorszabing]
    
30.       $data_classes = contents[:dataclasseszabing]
    
31.       $data_skills = contents[:dataskillszabing]
    
32.       $data_items = contents[:dataitemszabing]
    
33.       $data_weapons = contents[:dataweaponszabing]
    
34.       $data_armors = contents[:dataarmorszabing]
    
35.       $data_enemies = contents[:dataenemieszabing]
    
36.       $data_troops = contents[:datatroopszabing]
    
37.       $data_states = contents[:datastateszabing]
    
38.       $data_animations = contents[:dataanimationszabing]
    
39.       $data_tilesets = contents[:datatilesetszabing]
    
40.       $data_common_events = contents[:datacommoneventszabing]
    
41.       $data_system = contents[:datasystemzabing]
    
42.       $data_mapinfos = contents[:datamapinfoszabing]
    
43.     end
    
44.   end
    
45. else
    
46.   msgbox "请不要重复加载脚本。"
    
47. end
    
48. $imported = {} if $imported.nil?
    
49. if $imported["RatiosClov"].nil?
    
50. #--------------------------------------------------------------------------
    
51. # 多项比率选一(Ratios) By.Clov
    
52. # 使用 Ratios.Co({对象=>比率},分比数)
    
53. #--------------------------------------------------------------------------
    
54.   $imported["RatiosClov"] = true  
    
55.   module Ratios
    
56.     def self.Co(data = {}, b = 100)
    
57.       r = rand b;n = data.keys;f = data.values;arr = [];mii = []
    
58.       f.each {|v| if v >= r;arr.push v;else;arr.push nil;end}
    
59.       unless arr.compact.empty?
    
60.         arr.each {|a|
    
61.         if a;mii.push a - rand(a) - r
    
62.         else;mii.push b;end}
    
63.         x = mii.index mii.min
    
64.       else
    
65.         x = f.index f.max
    
66.       end
    
67.       return [n[x],f[x]]
    
68.     end
    
69.   end
    
70. else
    
71.   msgbox "请不要重复加载脚本。"
    
72. end
    
73. class Game_Interpreter
    
74.   def createweapon
    
75.     thishash = {
    
76.     ["龙神","晋库走龙剑，吴室荡燕雏。"]=>100,
    
77.     ["照胆","武丁在位五十九年，以元年岁次午铸一剑，长三尺，铭曰‘照胆’，古文篆书。"]=>500,
    
78.     ["青霜","紫电青霜，王将军之武库。"]=>800,
    
79.     ["龙泉","章帝赐尚书剑，韩棱渊深有谋，故得龙泉剑。"]=>1000,
    
80.     ["磐郢","吴王得越所献宝剑三枚。一曰鱼肠，二曰磐郢，三曰湛泸。"]=>50,
    
81.     ["淳钧","山崩而落洛之水涸，欧治子而淳钧之剑成。"]=>10,
    
82.     ["卧槽","卧槽泥马勒戈壁，兰州芝麻大烧饼。"]=>1000,
    
83. }
    
84. 
    
85.     thathash = {}
    
86.     temp = RPG::BaseItem::Feature.new
    
87.     temp.code = 31
    
88.     temp.data_id = 1
    
89.     temp.value = 0
    
90.     thathash[temp]=100#100几率物理武器专精
    
91.     temp = RPG::BaseItem::Feature.new
    
92.     temp.code = 22
    
93.     temp.data_id = 0
    
94.     temp.value = 0.5
    
95.     thathash[temp]=50#50几率精准专精
    
96.     temp = RPG::BaseItem::Feature.new
    
97.     temp.code = 33
    
98.     temp.data_id = 0
    
99.     temp.value = 500
    
100.     thathash[temp]=25#25几率超速专精
     
101.     c = Ratios.Co(thathash)
     
102.     a = RPG::Weapon.new
     
103.     a.icon_index = 147
     
104.     a.animation_id = 7
     
105.     a.features = [c[0]]
     
106.     a.params = [0,0,0,0,0,0,0,0]
     
107.     a.etype_id = 0
     
108.     a.wtype_id = 1
     
109.     a.params[0] = rand(1000)
     
110.     a.params[1] = rand(50)
     
111.     a.params[2] = rand(150)
     
112.     a.params[3] = rand(100)
     
113.     a.params[4] = rand(100)
     
114.     a.params[5] = rand(100)
     
115.     a.params[6] = rand(100)
     
116.     a.params[7] = rand(100)
     
117.     a.price = 0
     
118.     for i in 0..7
     
119.       case i
     
120.       when 0
     
121.         a.price += a.params[i] * 100
     
122.       when 1
     
123.         a.price += a.params[i] * 2000
     
124.       when 2
     
125.         a.price += a.params[i] * 2000
     
126.       else
     
127.         a.price += a.params[i] * 1000
     
128.       end
     
129.     end
     
130.     a.price = a.price.to_i
     
131.     c = Ratios.Co(thishash)
     
132. #~     a.name = "价值"+a.price.to_s+"的"+c[0][0]+"剑"
     
133.     a.name = c[0][0]+"剑"
     
134.     if c[0][0]=="卧槽"
     
135.       temp = RPG::BaseItem::Feature.new
     
136.       temp.code = 43
     
137.       temp.data_id = 24
     
138.       temp.value = 0.0
     
139.       a.features.push(temp)
     
140.     end
     
141.     a.description = c[0][1]
     
142.     a.id = $data_weapons.size
     
143.     $data_weapons[$data_weapons.size] = a.clone
     
144.     a=nil
     
145.     $game_party.gain_item($data_weapons[$data_weapons.size-1], 1, false)
     
146.   end
     
147. end
     

复制代码

如何给生成的武器添加图标&绘制字体颜色

taroxd

我说你问的问题和这个脚本完全无关啊= =

要加的话就改绘制的地方（主要在窗口类），但是你给的脚本和绘制完全无关啊。

另外我觉得这脚本除了第82行之外写得都很烂= =