【VA移植修改】物品得失等级提升提示

xmheart

1. #==============================================================================
   
2. # 本腳本來自www.66RPG.com，使用和轉載請保留此信息
   
3. #==============================================================================
   
4. 
   
5. # 注意！！！在對話後得到物品，請在對話後先用事件等待3幀，否則對話框來不及消失。
   
6. 
   
7. # 開關定義：
   
8. 
   
9. $noshowgold = 41                        # 不显示金钱得失
   
10. 
    
11. $noshowitem = 42                        # 不显示物品得失
    
12. 
    
13. $noshowweapon = 43                      # 不显示武器得失
    
14. 
    
15. $noshowarmor = 44                       # 不显示防具得失
    
16. # 以上開關，當打開的時候，獲得物品將不會提示，比如默認打開41號開關，獲得金錢不再提示
    
17. 
    
18. # 不想提示等级升降时，就在事件命令直接选择是否显示就行了。
    
19. 
    
20. #——聲效，可以自己改
    
21. folder = "Audio/SE/"
    
22. $gain_gold_se   = folder +"Shop"      # 获得金钱声效
    
23. $loss_gold_se   = folder +"Blow2"     # 失去金钱声效
    
24. 
    
25. $gain_item_se   = folder +"Item1"     # 获得物品声效
    
26. $loss_item_se   = folder +"Blow2"     # 失去物品声效
    
27. 
    
28. $gain_weapon_se = folder +"Item1"     # 获得武器声效
    
29. $loss_weapon_se = folder +"Blow2"     # 失去武器声效
    
30. 
    
31. $gain_armor_se  = folder +"Item1"     # 获得防具声效
    
32. $loss_armor_se  = folder +"Blow2"     # 失去防具声效
    
33. 
    
34. $gain_lv_se     = folder +"Item1"     # 提升等级声效
    
35. $loss_lv_se     = folder +"Blow2"     # 降低等级声效
    
36. 
    
37. # ————————————————————————————————————
    
38. 
    
39. class Game_Interpreter
    
40.   #--------------------------------------------------------------------------
    
41.   # ● 增減金錢
    
42.   #--------------------------------------------------------------------------
    
43.   def command_125
    
44.     value = operate_value(@params[0], @params[1], @params[2])
    
45.     $game_party.gain_gold(value)
    
46.     if $game_switches[$noshowgold]==false
    
47.       show_gain_window(0, value)
    
48.     end
    
49.     return true
    
50.   end
    
51.   #--------------------------------------------------------------------------
    
52.   # ● 增減物品
    
53.   #--------------------------------------------------------------------------
    
54.   def command_126
    
55.     value = operate_value(@params[1], @params[2], @params[3])
    
56.     $game_party.gain_item($data_items[@params[0]], value)
    
57.     if $game_switches[$noshowitem]==false
    
58.       show_gain_window(1, value)
    
59.     end
    
60.     $game_map.need_refresh = true
    
61.     return true
    
62.   end
    
63.   #--------------------------------------------------------------------------
    
64.   # ● 增減武器
    
65.   #--------------------------------------------------------------------------
    
66.   def command_127
    
67.     value = operate_value(@params[1], @params[2], @params[3])
    
68.     $game_party.gain_item($data_weapons[@params[0]], value, @params[4])
    
69.     if $game_switches[$noshowweapon]==false
    
70.       show_gain_window(2, value)
    
71.     end
    
72.     return true
    
73.   end
    
74.   #--------------------------------------------------------------------------
    
75.   # ● 增減防具
    
76.   #--------------------------------------------------------------------------
    
77.   def command_128
    
78.     value = operate_value(@params[1], @params[2], @params[3])
    
79.     $game_party.gain_item($data_armors[@params[0]], value, @params[4])
    
80.     if $game_switches[$noshowarmor]==false
    
81.       show_gain_window(3, value)
    
82.     end
    
83.     return true
    
84.   end
    
85.   #--------------------------------------------------------------------------
    
86.   # ● 等级増減
    
87.   #--------------------------------------------------------------------------
    
88.   def command_316
    
89.     value = operate_value(@params[2], @params[3], @params[4])
    
90.     iterate_actor_var(@params[0], @params[1]) do |actor|
    
91.       actor.change_level(actor.level + value, @params[5])
    
92.       if @params[4]
    
93.         show_gain_level_window(actor,value)
    
94.       end
    
95.     end
    
96.     return true
    
97.   end
    
98.   
    
99.   def show_gain_window(type, value)
    
100.     snstar2006_66rpg_item = $data_armors[@params[0]]
     
101.     snstar2006_66rpg = Window_Base.new((640-300)/2,128,200,100)
     
102.     snstar2006_66rpg.contents = Bitmap.new(snstar2006_66rpg.width - 32, snstar2006_66rpg.height - 32)
     
103.     if value >= 0
     
104.       gain_text = "获得"   
     
105.     else
     
106.       gain_text = "失去"
     
107.     end
     
108.    
     
109.     case type
     
110.     when 0
     
111.       gain_type = "金钱"
     
112.       if value >=0
     
113.         Audio.se_play($gain_gold_se,80,100)
     
114.       else
     
115.         Audio.se_play("Audio/SE/"+"Item1",80,100)
     
116.       end
     
117.     when 1
     
118.       gain_type = "物品"
     
119.       string = $data_items[@params[0]]
     
120.       if value >=0
     
121.         Audio.se_play($gain_item_se,80,100)
     
122.       else
     
123.         Audio.se_play($loss_item_se,80,100)
     
124.       end
     
125.     when 2
     
126.       gain_type = "武器"
     
127.       string = $data_weapons[@params[0]]
     
128.       if value >=0
     
129.         Audio.se_play($gain_weapon_se,80,100)
     
130.       else
     
131.         Audio.se_play($loss_weapon_se,80,100)
     
132.       end
     
133.     when 3
     
134.       gain_type = "防具"
     
135.       string = $data_armors[@params[0]]
     
136.       if value >=0
     
137.         Audio.se_play($gain_armor_se,80,100)
     
138.       else
     
139.         Audio.se_play($loss_armor_se,80,100)
     
140.       end
     
141.     end
     
142.    
     
143.     snstar2006_66rpg.contents.draw_text(0,0,160,30,gain_text+gain_type+"：")
     
144.    
     
145.     unless type == 0
     
146.       snstar2006_66rpg.draw_item_name(string, 0, 30, true)
     
147.       snstar2006_66rpg.contents.draw_text(0, 30, 160, 30, "×"+value.abs.to_s, 2)
     
148.     else
     
149.       snstar2006_66rpg.contents.draw_text(0,30,165,30,value.abs.to_s + "  "+ Vocab.currency_unit, 2)
     
150.     end
     
151.    
     
152.     snstar2006_66rpg.opacity = 160
     
153.    
     
154.     for i in 0..50
     
155.       Graphics.update
     
156.     end
     
157.    
     
158.     for i in 0..10
     
159.       snstar2006_66rpg.opacity -= 10
     
160.       snstar2006_66rpg.contents_opacity -= 10
     
161.       Graphics.update
     
162.     end
     
163.    
     
164.     snstar2006_66rpg.dispose
     
165.    
     
166.   end
     
167. 
     
168.   def show_gain_level_window(actor,value)
     
169.     lvstring = Vocab::level
     
170.         
     
171.     snstar2006_66rpg = Window_Base.new((640-300)/2,128,200,100)
     
172.     snstar2006_66rpg.contents = Bitmap.new(snstar2006_66rpg.width - 30, snstar2006_66rpg.height - 30)
     
173.    
     
174.     if value >= 0
     
175.       gain_text = "提升"
     
176.       Audio.se_play($gain_lv_se,80,100)
     
177.     else
     
178.       gain_text = "降低"
     
179.       Audio.se_play($loss_lv_se,80,100)
     
180.     end
     
181.    
     
182.     snstar2006_66rpg.contents.draw_text(0, 0, 110, 30, actor.name)
     
183.     string = lvstring+gain_text+value.abs.to_s+"级"
     
184.     snstar2006_66rpg.contents.draw_text(0,30,160,30,string, 2)
     
185. 
     
186.     snstar2006_66rpg.opacity = 160
     
187.    
     
188.     for i in 0..50
     
189.       Graphics.update
     
190.     end
     
191.    
     
192.     for i in 0..10
     
193.       snstar2006_66rpg.opacity -= 10
     
194.       snstar2006_66rpg.contents_opacity -= 10
     
195.       Graphics.update
     
196.     end
     
197.    
     
198.     snstar2006_66rpg.dispose
     
199. 
     
200.   end
     
201. end
     
202. 
     
203. 
     
204. #==============================================================================
     
205. # 本腳本來自www.66RPG.com，使用和轉載請保留此信息
     
206. #==============================================================================
     

复制代码

之前直接把VX的搬到VA用，结果有1个地方出错，而且等级提升那里没效果，我见没有人正式发布一下我就发一下吧。。。。暂时没什么问题

我是女神会发光

{:7_304:}{:7_304:}{:7_304:}非常不错 谢谢分享

taroxd

我只想说，代码太不美观了吧…… 要自己弄的时候改的累啊……

有个方法叫做 Graphics.wait(duration) 来着

屈风

可惜战斗中不能触发音效...

Baby丶小CC

1.       gain_text = "获得"   
   
2.     else
   
3.       gain_text = "失去"
   
4.     end
   
5.    
   
6.     case type
   
7. 这行
   
8.     when 0
   
9.       gain_type = "金钱"
   
10.       if value >=0
    
11.         Audio.se_play($gain_gold_se,80,100)
    
12.       else
    
13.         Audio.se_play("Audio/SE/"+"Item1",80,100)
    
14.       end
    
15.     when 1
    
16.       gain_type = "物品"
    
17.       string = $data_items[@params[0]]
    
18.       if value >=0
    
19.         Audio.se_play($gain_item_se,80,100)
    
20.       else
    
21.         Audio.se_play($loss_item_se,80,100)
    
22.       end
    
23.     when 2
    
24.       gain_type = "武器"
    
25.       string = $data_weapons[@params[0]]
    
26.       if value >=0
    
27.         Audio.se_play($gain_weapon_se,80,100)
    
28.       else
    
29.         Audio.se_play($loss_weapon_se,80,100)
    
30.       end
    
31.     when 3
    
32.       gain_type = "防具"

复制代码

诺粞

框不够大，显示不完

shenkf

好用，谢谢了~！！！，自己在改改看，换换颜色什么的，之前找的一直有冲突~！

′芙兰朵露

想知道如何改下这个框...如果改的话。脚本要改变么

布里蓝

想问下怎么延长提示出现时间

1035041075

gametl8r 发表于 2012-7-29 09:18
請問一下
我使用後蠻喜歡這個腳本的
可是物品名稱太長好像就會變像這樣

第101 改大点，我改了这么大 snstar2006_66rpg = Window_Base.new((640-500)/2,128,350,100)

♂雨

LZ，我的框框怎么这么小，能告诉我出错在哪吗？