Project1

标题: [原创发布]VX版 得失物品自动提示 [打印本页]

---

作者: 柳柳    时间: 2008-1-11 10:11
标题: [原创发布]VX版 得失物品自动提示
1、标题：VX版 得失物品自动提示

2、作者：柳柳

3、摘要：RMVX下的得失物品自动提示，提示中按确定可以加速跳过。注意一点是如果你用VX自带的宝箱，那么宝箱事件里面最后一句话请删掉。

4、首发网址：http://z.66rpg.com/dispbbs.asp?b ... p;star=1&page=1

5、教学分类：RMVX、脚本、地图、表现效果

6、发布日期：2008/1/11

7、适用人群：任何RPG和SRPG制作者，为了统一游戏效果并追求美观的作者，脚本初级学习者。

8、通用度：★★★★★

9、技术应用的复杂度：20

10、技术学习的理解难度：35

11、范例工程：- -b 上传在自己小窝了，需要请自取：http://z.66rpg.com/dispbbs.asp?boardid=9&id=30&star=1&page=1 建议直接新建工程测试比较快。

12、关键字：得失、物品、武器、防具、金钱、自动、提示、统一界面、窗口创建、脚本入门

13、作者的话：这个是RMVX的得失物品自动提示，和XP版的差不太多，不过经历这么久时间，我已经比原来聪明点了，算法不仅规范一些（配合RGSS2.0吗），也加了一些小的人性化设定。只是窗口界面还不是很好看，以后可以根据自己兴趣慢慢改吧。

14、教学正文：

这个的制作过程很简单：

~1、首先确定得失物品会有几个参数，我这里设定为三个。

~2、根据这三个参数制作一个Window新类，用来创建窗口。不要把代码分散写在函数里面，不好维护。

~3、将获得物品的刷新部分代码写在Game_Interpreter里面，新定义一个函数。

~4、调整获得物品的那几个函数，加入一行自动显示的代码即可。



具体代码如下（提示，复制脚本请用word中转）：

1. #==============================================================================
   
2. # ■  Game_Interpreter
   
3. #------------------------------------------------------------------------------
   
4. # 　执行事件命令的解释器。本类在 Game_System 类
   
5. # 与 Game_Event 类的内部使用。
   
6. #==============================================================================
   
7. class Game_Interpreter
   
8.   #--------------------------------------------------------------------------
   
9.   # ● 得失物品自动提示的刷新时间控制
   
10.   #--------------------------------------------------------------------------
    
11.   def call_6RgetItem(para1, para2 = nil, para3 = nil)
    
12.     temp_window = Window_Gain_Item.new(para1, para2, para3)
    
13.     Sound.play_shop
    
14.     for i in 0..120
    
15.       Graphics.update
    
16.       Input.update
    
17.       if Input.trigger?(Input::C) or Input.trigger?(Input::B)
    
18.         Sound.play_cancel
    
19.         break
    
20.       end
    
21.     end
    
22.     for i in 0..15
    
23.       temp_window.opacity -= 20
    
24.       temp_window.contents_opacity -= 16
    
25.       temp_window.update
    
26.       Graphics.update
    
27.     end   
    
28.     temp_window.dispose
    
29.     temp_window = nil
    
30.   end  
    
31.   #--------------------------------------------------------------------------
    
32.   # ● 增减金钱
    
33.   #--------------------------------------------------------------------------
    
34.   def command_125
    
35.     value = operate_value(@params[0], @params[1], @params[2])
    
36.     $game_party.gain_gold(value)
    
37.     call_6RgetItem("gold", value)
    
38.     return true
    
39.   end
    
40.   #--------------------------------------------------------------------------
    
41.   # ● 增减物品
    
42.   #--------------------------------------------------------------------------
    
43.   def command_126
    
44.     value = operate_value(@params[1], @params[2], @params[3])
    
45.     $game_party.gain_item($data_items[@params[0]], value)
    
46.     $game_map.need_refresh = true
    
47.     call_6RgetItem("item", $data_items[@params[0]], value)
    
48.     return true
    
49.   end  
    
50.   #--------------------------------------------------------------------------
    
51.   # ● 增减武器
    
52.   #--------------------------------------------------------------------------
    
53.   def command_127
    
54.     value = operate_value(@params[1], @params[2], @params[3])
    
55.     $game_party.gain_item($data_weapons[@params[0]], value, @params[4])
    
56.     call_6RgetItem("item", $data_weapons[@params[0]], value)
    
57.     return true
    
58.   end
    
59.   #--------------------------------------------------------------------------
    
60.   # ● 增减防具
    
61.   #--------------------------------------------------------------------------
    
62.   def command_128
    
63.     value = operate_value(@params[1], @params[2], @params[3])
    
64.     $game_party.gain_item($data_armors[@params[0]], value, @params[4])
    
65.     call_6RgetItem("item", $data_armors[@params[0]], value)
    
66.     return true
    
67.   end
    
68. end
    
69. 
    
70. #==============================================================================
    
71. # ■ Window_Gain_Item
    
72. #------------------------------------------------------------------------------
    
73. # 　显示获得物品的窗口。
    
74. #==============================================================================
    
75. 
    
76. class Window_Gain_Item < Window_Base
    
77.   #--------------------------------------------------------------------------
    
78.   # ● 初始化窗口
    
79.   #--------------------------------------------------------------------------
    
80.   def initialize(para1, para2 = nil, para3 = nil)
    
81.     super(0, 0, 160, WLH + 32)
    
82.     self.z = 10000
    
83.     case para1
    
84.     when "item"
    
85.       str = "获得"
    
86.       if para3 < 0 then
    
87.         str = "失去"
    
88.         para3 = - para3
    
89.       end
    
90.       winwidth = contents.text_size("  你获得了： ?  " + para3.to_s).width + 24 + contents.text_size(para2.name).width
    
91.       self.width = winwidth + 64
    
92.       self.height = 64
    
93.       self.x = (Graphics.width - self.width) / 2
    
94.       self.y = (Graphics.height - self.height) / 2
    
95.       create_contents
    
96.       self.contents.draw_text(0, 0, self.width, 32, "  你" + str + "了： ")
    
97.       tx = contents.text_size("  你" + str + "了：").width
    
98.       draw_item_name(para2, tx , 0, true)
    
99.       self.contents.draw_text(tx + 24, 0, self.width, 32, para2.name)
    
100.       tx = contents.text_size("  你" + str + "了： ").width + 24 + contents.text_size(para2.name).width
     
101.       self.contents.draw_text(tx, 0, self.width, 32, " ? + para3.to_s)
     
102.     when "gold"
     
103.       str = "获得"
     
104.       if para2 < 0 then
     
105.         str = "失去"
     
106.         para2 = - para2
     
107.       end
     
108.       winwidth = contents.text_size("  你获得了：   " + Vocab.gold.to_s).width + contents.text_size(para2).width
     
109.       self.width = winwidth + 64
     
110.       self.height = 64
     
111.       self.x = (Graphics.width - self.width) / 2
     
112.       self.y = (Graphics.height - self.height) / 2
     
113.       create_contents
     
114.       self.contents.draw_text(0, 0, self.width, 32, "  你" + str + "了： #{para2} " + Vocab.gold.to_s)
     
115.     end
     
116.   end
     
117.   #--------------------------------------------------------------------------
     
118.   # ● 物品名的描画
     
119.   #     item : 物品(特技、武器、防具可)
     
120.   #     x    : 描画目标 X 坐标
     
121.   #     y    : 描画目标 Y 坐标
     
122.   #     enabled : 有效标记录。是false 的时候半透明绘画
     
123.   #--------------------------------------------------------------------------
     
124.   def draw_item_name(item, x, y, enabled = true)
     
125.     if item != nil
     
126.       draw_icon(item.icon_index, x, y, enabled)
     
127.       self.contents.font.color = normal_color
     
128.       self.contents.font.color.alpha = enabled ? 255 : 128
     
129.     end
     
130.   end  
     
131. end

复制代码

17、教学相关RGSS类：

class Game_Interpreter
    def initialize
    def draw_item_name

class Game_Interpreter
    def call_6RgetItem
    def command_125
    def command_126
    def command_127
    def command_128

上面这个类别检查可以用来检查脚本冲突的原因。当然我建议你直接用本脚本中的函数替换以上几个函数的相应部分。

　　　　　　　　　　　　　　[本贴由 御灵 于 2008-1-17 23:35:24 进行了编辑]

---

作者: 柳柳    时间: 2008-1-11 10:11
标题: [原创发布]VX版 得失物品自动提示
1、标题：VX版 得失物品自动提示

2、作者：柳柳

3、摘要：RMVX下的得失物品自动提示，提示中按确定可以加速跳过。注意一点是如果你用VX自带的宝箱，那么宝箱事件里面最后一句话请删掉。

4、首发网址：http://z.66rpg.com/dispbbs.asp?b ... p;star=1&page=1

5、教学分类：RMVX、脚本、地图、表现效果

6、发布日期：2008/1/11

7、适用人群：任何RPG和SRPG制作者，为了统一游戏效果并追求美观的作者，脚本初级学习者。

8、通用度：★★★★★

9、技术应用的复杂度：20

10、技术学习的理解难度：35

11、范例工程：- -b 上传在自己小窝了，需要请自取：http://z.66rpg.com/dispbbs.asp?boardid=9&id=30&star=1&page=1 建议直接新建工程测试比较快。

12、关键字：得失、物品、武器、防具、金钱、自动、提示、统一界面、窗口创建、脚本入门

13、作者的话：这个是RMVX的得失物品自动提示，和XP版的差不太多，不过经历这么久时间，我已经比原来聪明点了，算法不仅规范一些（配合RGSS2.0吗），也加了一些小的人性化设定。只是窗口界面还不是很好看，以后可以根据自己兴趣慢慢改吧。

14、教学正文：

这个的制作过程很简单：

~1、首先确定得失物品会有几个参数，我这里设定为三个。

~2、根据这三个参数制作一个Window新类，用来创建窗口。不要把代码分散写在函数里面，不好维护。

~3、将获得物品的刷新部分代码写在Game_Interpreter里面，新定义一个函数。

~4、调整获得物品的那几个函数，加入一行自动显示的代码即可。



具体代码如下（提示，复制脚本请用word中转）：

1. #==============================================================================
   
2. # ■  Game_Interpreter
   
3. #------------------------------------------------------------------------------
   
4. # 　执行事件命令的解释器。本类在 Game_System 类
   
5. # 与 Game_Event 类的内部使用。
   
6. #==============================================================================
   
7. class Game_Interpreter
   
8.   #--------------------------------------------------------------------------
   
9.   # ● 得失物品自动提示的刷新时间控制
   
10.   #--------------------------------------------------------------------------
    
11.   def call_6RgetItem(para1, para2 = nil, para3 = nil)
    
12.     temp_window = Window_Gain_Item.new(para1, para2, para3)
    
13.     Sound.play_shop
    
14.     for i in 0..120
    
15.       Graphics.update
    
16.       Input.update
    
17.       if Input.trigger?(Input::C) or Input.trigger?(Input::B)
    
18.         Sound.play_cancel
    
19.         break
    
20.       end
    
21.     end
    
22.     for i in 0..15
    
23.       temp_window.opacity -= 20
    
24.       temp_window.contents_opacity -= 16
    
25.       temp_window.update
    
26.       Graphics.update
    
27.     end   
    
28.     temp_window.dispose
    
29.     temp_window = nil
    
30.   end  
    
31.   #--------------------------------------------------------------------------
    
32.   # ● 增减金钱
    
33.   #--------------------------------------------------------------------------
    
34.   def command_125
    
35.     value = operate_value(@params[0], @params[1], @params[2])
    
36.     $game_party.gain_gold(value)
    
37.     call_6RgetItem("gold", value)
    
38.     return true
    
39.   end
    
40.   #--------------------------------------------------------------------------
    
41.   # ● 增减物品
    
42.   #--------------------------------------------------------------------------
    
43.   def command_126
    
44.     value = operate_value(@params[1], @params[2], @params[3])
    
45.     $game_party.gain_item($data_items[@params[0]], value)
    
46.     $game_map.need_refresh = true
    
47.     call_6RgetItem("item", $data_items[@params[0]], value)
    
48.     return true
    
49.   end  
    
50.   #--------------------------------------------------------------------------
    
51.   # ● 增减武器
    
52.   #--------------------------------------------------------------------------
    
53.   def command_127
    
54.     value = operate_value(@params[1], @params[2], @params[3])
    
55.     $game_party.gain_item($data_weapons[@params[0]], value, @params[4])
    
56.     call_6RgetItem("item", $data_weapons[@params[0]], value)
    
57.     return true
    
58.   end
    
59.   #--------------------------------------------------------------------------
    
60.   # ● 增减防具
    
61.   #--------------------------------------------------------------------------
    
62.   def command_128
    
63.     value = operate_value(@params[1], @params[2], @params[3])
    
64.     $game_party.gain_item($data_armors[@params[0]], value, @params[4])
    
65.     call_6RgetItem("item", $data_armors[@params[0]], value)
    
66.     return true
    
67.   end
    
68. end
    
69. 
    
70. #==============================================================================
    
71. # ■ Window_Gain_Item
    
72. #------------------------------------------------------------------------------
    
73. # 　显示获得物品的窗口。
    
74. #==============================================================================
    
75. 
    
76. class Window_Gain_Item < Window_Base
    
77.   #--------------------------------------------------------------------------
    
78.   # ● 初始化窗口
    
79.   #--------------------------------------------------------------------------
    
80.   def initialize(para1, para2 = nil, para3 = nil)
    
81.     super(0, 0, 160, WLH + 32)
    
82.     self.z = 10000
    
83.     case para1
    
84.     when "item"
    
85.       str = "获得"
    
86.       if para3 < 0 then
    
87.         str = "失去"
    
88.         para3 = - para3
    
89.       end
    
90.       winwidth = contents.text_size("  你获得了： ?  " + para3.to_s).width + 24 + contents.text_size(para2.name).width
    
91.       self.width = winwidth + 64
    
92.       self.height = 64
    
93.       self.x = (Graphics.width - self.width) / 2
    
94.       self.y = (Graphics.height - self.height) / 2
    
95.       create_contents
    
96.       self.contents.draw_text(0, 0, self.width, 32, "  你" + str + "了： ")
    
97.       tx = contents.text_size("  你" + str + "了：").width
    
98.       draw_item_name(para2, tx , 0, true)
    
99.       self.contents.draw_text(tx + 24, 0, self.width, 32, para2.name)
    
100.       tx = contents.text_size("  你" + str + "了： ").width + 24 + contents.text_size(para2.name).width
     
101.       self.contents.draw_text(tx, 0, self.width, 32, " ? + para3.to_s)
     
102.     when "gold"
     
103.       str = "获得"
     
104.       if para2 < 0 then
     
105.         str = "失去"
     
106.         para2 = - para2
     
107.       end
     
108.       winwidth = contents.text_size("  你获得了：   " + Vocab.gold.to_s).width + contents.text_size(para2).width
     
109.       self.width = winwidth + 64
     
110.       self.height = 64
     
111.       self.x = (Graphics.width - self.width) / 2
     
112.       self.y = (Graphics.height - self.height) / 2
     
113.       create_contents
     
114.       self.contents.draw_text(0, 0, self.width, 32, "  你" + str + "了： #{para2} " + Vocab.gold.to_s)
     
115.     end
     
116.   end
     
117.   #--------------------------------------------------------------------------
     
118.   # ● 物品名的描画
     
119.   #     item : 物品(特技、武器、防具可)
     
120.   #     x    : 描画目标 X 坐标
     
121.   #     y    : 描画目标 Y 坐标
     
122.   #     enabled : 有效标记录。是false 的时候半透明绘画
     
123.   #--------------------------------------------------------------------------
     
124.   def draw_item_name(item, x, y, enabled = true)
     
125.     if item != nil
     
126.       draw_icon(item.icon_index, x, y, enabled)
     
127.       self.contents.font.color = normal_color
     
128.       self.contents.font.color.alpha = enabled ? 255 : 128
     
129.     end
     
130.   end  
     
131. end

复制代码

17、教学相关RGSS类：

class Game_Interpreter
    def initialize
    def draw_item_name

class Game_Interpreter
    def call_6RgetItem
    def command_125
    def command_126
    def command_127
    def command_128

上面这个类别检查可以用来检查脚本冲突的原因。当然我建议你直接用本脚本中的函数替换以上几个函数的相应部分。

　　　　　　　　　　　　　　[本贴由 御灵 于 2008-1-17 23:35:24 进行了编辑]

---

作者: 叮当    时间: 2008-1-11 17:04
看日本那边VX脚本出得蛮勤的... 这边也开始出现了呢

---

作者: 柳柳    时间: 2008-1-11 19:43
有没有推荐的日文VX站？

---

作者: 心情de对白    时间: 2008-1-11 19:53
支持这脚本!@,不过暂时不会用VX,先把RM做的游戏完善好再说!{/hx}

---

作者: 叮当    时间: 2008-1-11 20:05
目前有提供RGSS2脚本的日站仅有下列站点
http://f44.aaa.livedoor.jp/~ytomy/index.html
http://mdc-light.jpn.org/TYPE74RX-T/index.html
http://members.jcom.home.ne.jp/cogwheel/
http://mintoroom.web.infoseek.co.jp/

还有樱雅的VX站，不过目前挂掉中…

---

作者: 柳柳    时间: 2008-1-12 07:55
好，多谢！

---

作者: 秋弦月    时间: 2008-1-12 13:08
好，好快！VX俺还没用上，脚本这么快出现{/qiang}
完全来支持详细教程+脚本+截图SAMA~~~~
----
不知道RGSS写法有无大变更（←RGSS入门中||||）

---

作者: 舞舞    时间: 2008-1-12 19:57
现在还没有用ＲＭＶＸ等汉化破截版问世

---

作者: 风雪优游    时间: 2008-1-12 22:40
福音啊~~~~~~~~

---

作者: 影北山人    时间: 2008-1-12 23:12

直接套用发文模板如下

一开始还以为有现成的发帖模板  - -

1、标题：

2、作者：

3、摘要：

4、首发网址：

5、教学分类：

6、发布日期：

7、适用人群：

8、通用度：★★★★★

9、技术应用的复杂度：

10、技术学习的理解难度：

11、范例工程：

12、关键字：

13、作者的话：

14、教学正文：


具体代码如下（提示，复制脚本请用word中转）：

截图

17、教学相关RGSS类：

倒是蛮不错的。。。。。要不要考虑增加这么一个原创技术帖模板呢？方便我们菜鸟查找学习~

---

作者: 越前リョーマ    时间: 2008-1-12 23:29
看起来比XP版的还好看些……{/hx}

---

作者: link006007    时间: 2008-1-13 00:40
能把6R上的XP热门脚本都升级到VX就很好了{/se}

---

作者: superufo    时间: 2008-1-18 05:32
提示: 作者被禁止或删除 内容自动屏蔽

---

作者: 柳柳    时间: 2008-1-18 06:06
看工程吧，考过来的时候有一些字符串混乱了。

---

作者: 殤。    时间: 2008-1-18 20:59
提示: 作者被禁止或删除 内容自动屏蔽

---

作者: 御灵    时间: 2008-2-12 08:03
发布完毕。
http://rpg.blue/web/htm/news970.htm

---

作者: 真の邵东    时间: 2008-2-12 09:00
提示: 作者被禁止或删除 内容自动屏蔽

---

作者: fmz    时间: 2008-6-1 01:22
想增加一个得失经验显示，要怎么改？

---

作者: fmz    时间: 2008-6-1 01:24

以下引用superufo于2008-1-17 21:32:44的发言：


tx = contents.text_size("  你" + str + "了： ").width + 24 + contents.text_size(para2.name).width
   self.contents.draw_text(tx, 0, self.width, 32, " ? + para3.to_s)
  when "gold"
    str = "获得"
    if para2 < 0 then
      str = "失去"
      para2 = - para2
    end


似乎应该是   self.contents.draw_text(tx, 0, self.width, 32, " ? "+ para3.to_s)
漏了引号

self.contents.draw_text(tx, 0, self.width, 32, " ×"+ para3.to_s)
我那里是这样改的 用问号的话就变成 "物品名称？数量" 的显示方法了

---

欢迎光临 Project1 (https://rpg.blue/)

Powered by Discuz! X3.1