【RMVA】物品得失脚本 Enhance 1.02a

harinlen

今天私在填坑的时候才发现RMVA居然连个物品得失提示都没有，然后私就抑郁了。
虽然第一反应是直接抓个脚本，可惜私只找到了XP和VX的。而且需要在事件中等待3帧。而且要是物品名称过长的话还会挤在一起？！（←这啥？）
最后私自己写了一个物品得失脚本，之后才发现了Ace区xmheart已经发了一个脚本了，但貌似就是VX版本的移植版……

下面就是私的脚本了，比起前几个脚本有如下的更新：
1、宽度自适应。能够根据物品名字的宽度、金钱的宽度进行调整。（参考了各种压力的猫君的双默认字体脚本的测量函数）
2、与Vocab挂钩，直接显示在数据库中的用语处设定的名称
3、无需最后等待3帧，这个已经整合到脚本之中了。
4、窗体始终居中。



更新日志

1.02a
将临时性的布尔型变量对启用进行控制变更为使用开关。

1.01a
修正了没有将Window居中的问题。

1.00a
发布公开的测试版本

转载、使用无需保留前面的作者信息。

以上。

1. #==============================================================================
   
2. # ☆ HAR - 得失物品脚本 (v1.01a)
   
3. # 日期：2012/09/23
   
4. #==============================================================================
   
5. # -- 作者：　　　　Harinlen
   
6. # -- 等级：　　　　普通级
   
7. # -- 依赖关系：　　无
   
8. # -- 适用范围：　　RPG Maker VX Ace
   
9. # -- 不兼容脚本：　暂无
   
10. #==============================================================================
    
11. # ☆ 声明
    
12. # 此脚本参考了[PS0]双默认脚本的长度测量函数。
    
13. #==============================================================================
    
14. # ☆ 脚本使用说明
    
15. # 此脚本无需额外代码即可使用，使用事件调用增减金钱、增减武器、增减防具和增减物品的
    
16. # 时候会显示一个对话框显示得失物品情况。
    
17. #
    
18. # ☆ 脚本的启用
    
19. # 修改对应等号后面对应的数值为对应的开关序号，在事件中直接对开关进行判定即可：
    
20. #
    
21. # $window_tips_gold = 10        #金钱窗口提示的开关
    
22. # $window_tips_item = 11        #物品窗口提示的开关
    
23. # $window_tips_weapon = 12      #武器窗口提示的开关
    
24. # $window_tips_armor = 13       #防具窗口提示的开关
    
25. #
    
26. # ☆ 脚本的自定义
    
27. # 请修改下方的音效设定部分，将对应的音效更改成自己想要的音效即可。
    
28. # 音效名的获取请使用媒体库进行查看。只能使用SE中的音效。
    
29. #==============================================================================
    
30. 
    
31. #==============================================================================
    
32. # ■ 提示开关定义
    
33. #------------------------------------------------------------------------------
    
34. # 　用于定义是否显示Window
    
35. #==============================================================================
    
36. $window_tips_gold = 10
    
37. $window_tips_item = 11
    
38. $window_tips_weapon = 12
    
39. $window_tips_armor = 13
    
40. 
    
41. #==============================================================================
    
42. # ■ 音效设定
    
43. #------------------------------------------------------------------------------
    
44. # 　设定对应的音效播放效果
    
45. #==============================================================================
    
46. $SE_Gold_Gain   = "Shop"      # 获得金钱声效
    
47. $SE_Gold_Loss   = "Blow2"     # 失去金钱声效
    
48. 
    
49. $SE_Item_Gain   = "Item1"     # 获得物品声效
    
50. $SE_Item_Loss   = "Blow2"     # 失去物品声效
    
51. 
    
52. $SE_Weapon_Gain = "Item1"     # 获得武器声效
    
53. $SE_Weapon_Loss = "Blow2"     # 失去武器声效
    
54. 
    
55. $SE_Armor_Gain  = "Item1"     # 获得防具声效
    
56. $SE_Armor_Loss  = "Blow2"     # 失去防具声效
    
57. #==============================================================================
    
58. # ■ Window_Tips
    
59. #------------------------------------------------------------------------------
    
60. # 　显示增减物品、金钱和装备的窗口
    
61. #==============================================================================
    
62. 
    
63. class Window_Tips < Window_Base
    
64.   #--------------------------------------------------------------------------
    
65.   # ● 初始化对象
    
66.   #--------------------------------------------------------------------------
    
67.   def initialize(x = 170, y = 128, width = 300, height = 96)
    
68.     super
    
69.   end
    
70.   
    
71.   #--------------------------------------------------------------------------
    
72.   # ● 增强绘制物品名称
    
73.   #--------------------------------------------------------------------------
    
74.   def adv_draw_item_name(item, x, y)
    
75.     return unless item
    
76.     draw_icon(item.icon_index, x, y, true)
    
77.     change_color(normal_color, true)
    
78.     draw_text(x + 24, y, width, line_height, item.name)
    
79.   end
    
80.   
    
81. end
    
82. 
    
83. class Game_Interpreter
    
84.   
    
85.   #--------------------------------------------------------------------------
    
86.   # ● 增减金钱
    
87.   #--------------------------------------------------------------------------
    
88.   def command_125
    
89.     value = operate_value(@params[0], @params[1], @params[2])
    
90.     $game_party.gain_gold(value)
    
91.     if $game_switches[$window_tips_gold] == true
    
92.       show_tips_window(0, value)
    
93.     end
    
94.     return true
    
95.   end
    
96.   
    
97.   #--------------------------------------------------------------------------
    
98.   # ● 增减物品
    
99.   #--------------------------------------------------------------------------
    
100.   def command_126
     
101.     value = operate_value(@params[1], @params[2], @params[3])
     
102.     $game_party.gain_item($data_items[@params[0]], value)
     
103.     if $game_switches[$window_tips_item] == true
     
104.       show_tips_window(1, value)
     
105.     end
     
106.     $game_map.need_refresh = true
     
107.     return true
     
108.   end
     
109.   
     
110.   #--------------------------------------------------------------------------
     
111.   # ● 增减武器
     
112.   #--------------------------------------------------------------------------
     
113.   def command_127
     
114.     value = operate_value(@params[1], @params[2], @params[3])
     
115.     $game_party.gain_item($data_weapons[@params[0]], value, @params[4])
     
116.     if $game_switches[$window_tips_weapon] == true
     
117.       show_tips_window(2, value)
     
118.     end
     
119.     return true
     
120.   end
     
121.   
     
122.   #--------------------------------------------------------------------------
     
123.   # ● 增减防具
     
124.   #--------------------------------------------------------------------------
     
125.   def command_128
     
126.     value = operate_value(@params[1], @params[2], @params[3])
     
127.     $game_party.gain_item($data_armors[@params[0]], value, @params[4])
     
128.     if $game_switches[$window_tips_armor] == true
     
129.       show_tips_window(3, value)
     
130.     end
     
131.     return true
     
132.   end
     
133.   
     
134.   #--------------------------------------------------------------------------
     
135.   # ● 显示增减提示窗口
     
136.   #--------------------------------------------------------------------------
     
137.   def show_tips_window(type, value)
     
138.     case type
     
139.       when 0
     
140.         item_type = Vocab::currency_unit
     
141.         if value >= 0
     
142.           Audio.se_play("Audio/SE/" + $SE_Gold_Gain, 100, 100)
     
143.         else
     
144.           Audio.se_play("Audio/SE/" + "Item1", 100, 100)
     
145.       end
     
146.       when 1
     
147.         item_type = Vocab::item
     
148.         processed_items = $data_items[@params[0]]
     
149.         if value >= 0
     
150.           Audio.se_play("Audio/SE/" + $SE_Item_Gain, 100, 100)
     
151.         else
     
152.           Audio.se_play("Audio/SE/" + $SE_Item_Loss, 100, 100)
     
153.       end
     
154.       when 2
     
155.         item_type = Vocab::weapon
     
156.         processed_items = $data_weapons[@params[0]]
     
157.         if value >= 0
     
158.           Audio.se_play("Audio/SE/" + $SE_Weapon_Gain, 100, 100)
     
159.         else
     
160.           Audio.se_play("Audio/SE/" + $SE_Weapon_Loss, 100, 100)
     
161.       end
     
162.       when 3
     
163.         item_type = Vocab::armor
     
164.         processed_items = $data_armors[@params[0]]
     
165.         if value >= 0
     
166.           Audio.se_play("Audio/SE/" + $SE_Armor_Gain, 100, 100)
     
167.         else
     
168.           Audio.se_play("Audio/SE/" + $SE_Armor_Loss, 100, 100)
     
169.       end
     
170.     end
     
171.   
     
172.     if value >= 0
     
173.       tips_processed_text = "获得"   
     
174.     else
     
175.       tips_processed_text = "失去"
     
176.     end
     
177.    
     
178.     if type != 0
     
179.       text_value = "×" + value.abs.to_s
     
180.       bitmap = Bitmap.new(100, 100)
     
181.       itemwidth = bitmap.text_size(processed_items.name).width + 95
     
182.       valuewidth = bitmap.text_size(text_value).width
     
183.       itempop_window = Window_Tips.new((544 - itemwidth - valuewidth) / 2, 128, itemwidth + valuewidth, 88)
     
184.       itempop_window.contents = Bitmap.new(itempop_window.width - 32, itempop_window.height - 32)
     
185.       
     
186.       itempop_window.contents.draw_text(0, 0, 160, 32, tips_processed_text + item_type+"：")
     
187.       itempop_window.adv_draw_item_name(processed_items, 28, 32)
     
188.       itempop_window.contents.draw_text(0, 30, itemwidth, 32, "×" + value.abs.to_s, 2)
     
189.     else
     
190.       text_value = value.abs.to_s + " " + Vocab::currency_unit
     
191.       bitmap = Bitmap.new(100, 100)
     
192.       textwidth = bitmap.text_size(text_value).width + 95
     
193.       itempop_window = Window_Tips.new(170, 128, textwidth, 88)
     
194.       itempop_window.contents = Bitmap.new(itempop_window.width - 32, itempop_window.height - 32)
     
195.       
     
196.       itempop_window.contents.draw_text(0, 0, 160, 32, tips_processed_text + item_type+"：")
     
197.       itempop_window.contents.draw_text(32, 32, 240, 32, value.abs.to_s + "  " + Vocab::currency_unit)
     
198.     end
     
199.    
     
200.     for i in 0..60
     
201.       Graphics.update
     
202.     end
     
203.     for i in 0..10
     
204.       itempop_window.opacity -= 30
     
205.       itempop_window.contents_opacity -= 30
     
206.       Graphics.update
     
207.     end
     
208.     itempop_window.dispose
     
209.    
     
210.     for i in 0..3
     
211.       Graphics.update
     
212.     end
     
213.   end
     
214. end

复制代码

疯狂异形

HAR触！
这不应该发在技术发布之类的地方么……

harinlen

疯狂异形 发表于 2012-9-23 11:04
HAR触！
这不应该发在技术发布之类的地方么……

自知私技术渣所以只能放在水区不解释= =

小叽

马达马达，汝还粉嫩啊！

harinlen

小叽 发表于 2012-9-23 11:06
马达马达，汝还粉嫩啊！

是的说T T私和众神比起来差距超级大的说= =
话说前辈求勾搭DA☆ZE~

迷糊的安安

0 0 求效果图……

fxwd

harinlen 发表于 2012-9-23 11:07
是的说T T私和众神比起来差距超级大的说= =
话说前辈求勾搭DA☆ZE~

我想说你是卖萌么。。

harinlen

fxwd 发表于 2012-9-23 11:08
我想说你是卖萌么。。

私木有在卖萌啊……T T……
前辈不能这样……

怪蜀黍

水区真是什么都可以发呀，技术发布区取消掉算了，喵

harinlen

protosssonny 发表于 2012-9-23 11:13
水区真是什么都可以发呀，技术发布区取消掉算了，喵

0 0 p大早DA☆ZE~