Project1

标题: 滚动字幕(从XP移植) [打印本页]

---

作者: CIS狂人    时间: 2008-2-8 05:30
标题: 滚动字幕(从XP移植)
调试好的^使用时候用一个640*480的TIT.PNG放在下面.不用多说了吧.

1. #——使用注意：默认会返回地图，如果需要返回开头，请将本脚本中的
   
2. #return_scene = Scene_Map.new改为return_scene = Scene_Title.new
   
3. 
   
4. class Scene_Credit
   
5.   CREDIT=<<_END_
   
6. #这里输入字幕内容
   
7. 
   
8. _END_
   
9. end
   
10. 
    
11. class Scene_Credit
    
12. 
    
13.   def initialize(return_scene = nil)
    
14.     @sprite = Sprite.new
    
15.     @sprite.bitmap = Bitmap.new("Graphics/Pictures/tit")
    
16.     @sprite.x = 0
    
17.     @sprite.y = 0
    
18.     if return_scene.nil?
    
19.       return_scene = Scene_Title.new
    
20.     end
    
21.     @return_scene = return_scene
    
22.   end
    
23.   
    
24.   def scene_start
    
25.     credit_lines = CREDIT.split(/\n/)
    
26.     credit_bitmap = Bitmap.new(576,32 * credit_lines.size)
    
27.     credit_lines.each_index do |i|
    
28.       line = credit_lines[i]
    
29.       credit_bitmap.draw_text(0,i * 32,576,32,line,1)
    
30.     end
    
31.     @credit_sprite = Sprite.new(Viewport.new(0,50,576,432))
    
32.     @credit_sprite.bitmap = credit_bitmap
    
33.     @credit_sprite.oy = -430
    
34.     @frame_index = 0
    
35.     @last_flag = false
    
36.   end
    
37. 
    
38.   def scene_end
    
39.     @credit_sprite.dispose
    
40.     @sprite.dispose
    
41.   end
    
42.   
    
43.   def last?
    
44.     return (@frame_index >= @credit_sprite.bitmap.height + 320)
    
45.   end
    
46.   
    
47.   def last
    
48.     if not @last_flag
    
49.       Audio.bgm_fade(10000)
    
50.       @last_flag = true
    
51.       @last_count = 0
    
52.     else
    
53.       @last_count += 1
    
54.     end
    
55.     if @last_count >= 300
    
56.       $scene = @return_scene
    
57.     end
    
58.   end
    
59.   
    
60.   def update
    
61.     @frame_index += 1
    
62.     return if cancel?
    
63.     last if last?
    
64.     @credit_sprite.oy += 1
    
65.   end
    
66. 
    
67.   def cancel?
    
68.     if Input.trigger?(Input::B)
    
69.       $scene = @return_scene
    
70.       return true
    
71.     end
    
72.     return false
    
73.   end
    
74. 
    
75.   def main
    
76.     scene_start
    
77.     # 过渡
    
78.     Graphics.transition
    
79.     # 主循环
    
80.     loop do
    
81.       Graphics.update
    
82.       Input.update
    
83.       update
    
84.       if $scene != self
    
85.         break
    
86.       end
    
87.     end
    
88.     # 准备过渡
    
89.     Graphics.freeze
    
90.     scene_end
    
91.   end
    
92. end

复制代码

640*480的脚本
- -汗那...针对640*480脚本的才在这里

1. 
   
2. #——使用注意：默认会返回地图，如果需要返回开头，请将本脚本中的
   
3. #return_scene = Scene_Map.new改为return_scene = Scene_Title.new
   
4. 
   
5. class Scene_Credit
   
6.   CREDIT=<<_END_
   
7. #输入内容
   
8. 
   
9. _END_
   
10. end
    
11. 
    
12. class Scene_Credit
    
13. 
    
14.   def initialize(return_scene = nil)
    
15.     @sprite = Sprite.new
    
16.     @sprite.bitmap = Bitmap.new("Graphics/Pictures/tit")
    
17.     @sprite.x = 0
    
18.     @sprite.y = 0
    
19.     if return_scene.nil?
    
20.       return_scene = Scene_Map.new
    
21.     end
    
22.     @return_scene = return_scene
    
23.   end
    
24.   
    
25.   def scene_start
    
26.     credit_lines = CREDIT.split(/\n/)
    
27.     credit_bitmap = Bitmap.new(640,32 * credit_lines.size)
    
28.     credit_lines.each_index do |i|
    
29.       line = credit_lines[i]
    
30.       credit_bitmap.draw_text(0,i * 32,640,32,line,1)
    
31.     end
    
32.     @credit_sprite = Sprite.new(Viewport.new(0,50,640,480))
    
33.     @credit_sprite.bitmap = credit_bitmap
    
34.     @credit_sprite.oy = -430
    
35.     @frame_index = 0
    
36.     @last_flag = false
    
37.   end
    
38. 
    
39.   def scene_end
    
40.     @credit_sprite.dispose
    
41.     @sprite.dispose
    
42.   end
    
43.   
    
44.   def last?
    
45.     return (@frame_index >= @credit_sprite.bitmap.height + 320)
    
46.   end
    
47.   
    
48.   def last
    
49.     if not @last_flag
    
50.       Audio.bgm_fade(10000)
    
51.       @last_flag = true
    
52.       @last_count = 0
    
53.     else
    
54.       @last_count += 1
    
55.     end
    
56.     if @last_count >= 300
    
57.       $scene = @return_scene
    
58.     end
    
59.   end
    
60.   
    
61.   def update
    
62.     @frame_index += 1
    
63.     return if cancel?
    
64.     last if last?
    
65.     @credit_sprite.oy += 1
    
66.   end
    
67. 
    
68.   def cancel?
    
69.     if Input.trigger?(Input::B)
    
70.       $scene = @return_scene
    
71.       return true
    
72.     end
    
73.     return false
    
74.   end
    
75. 
    
76.   def main
    
77.     scene_start
    
78.     # 过渡
    
79.     Graphics.transition
    
80.     # 主循环
    
81.     loop do
    
82.       Graphics.update
    
83.       Input.update
    
84.       update
    
85.       if $scene != self
    
86.         break
    
87.       end
    
88.     end
    
89.     # 准备过渡
    
90.     Graphics.freeze
    
91.     scene_end
    
92.   end
    
93. end
    

复制代码

---

作者: CIS狂人    时间: 2008-2-8 19:03
怎么没人顶啊?(配合使用640*480脚本可能会好点.)

---

作者: CIS狂人    时间: 2008-2-12 05:14
还是没人顶..算了..自己顶下.如果有左右不对称可以自己调哈

---

作者: 冰风情火    时间: 2008-2-12 06:03
可怜哦。没人顶。我帮你，。。。。。
不过VX格式不是640*480的

---

作者: CIS狂人    时间: 2008-2-13 04:46
- -汗那...针对640*480脚本的才在这里

1. #——使用注意：默认会返回地图，如果需要返回开头，请将本脚本中的
   
2. #return_scene = Scene_Map.new改为return_scene = Scene_Title.new
   
3. 
   
4. class Scene_Credit
   
5.   CREDIT=<<_END_
   
6. #输入内容
   
7. 
   
8. _END_
   
9. end
   
10. 
    
11. class Scene_Credit
    
12. 
    
13.   def initialize(return_scene = nil)
    
14.     @sprite = Sprite.new
    
15.     @sprite.bitmap = Bitmap.new("Graphics/Pictures/tit")
    
16.     @sprite.x = 0
    
17.     @sprite.y = 0
    
18.     if return_scene.nil?
    
19.       return_scene = Scene_Map.new
    
20.     end
    
21.     @return_scene = return_scene
    
22.   end
    
23.   
    
24.   def scene_start
    
25.     credit_lines = CREDIT.split(/\n/)
    
26.     credit_bitmap = Bitmap.new(640,32 * credit_lines.size)
    
27.     credit_lines.each_index do |i|
    
28.       line = credit_lines[i]
    
29.       credit_bitmap.draw_text(0,i * 32,640,32,line,1)
    
30.     end
    
31.     @credit_sprite = Sprite.new(Viewport.new(0,50,640,480))
    
32.     @credit_sprite.bitmap = credit_bitmap
    
33.     @credit_sprite.oy = -430
    
34.     @frame_index = 0
    
35.     @last_flag = false
    
36.   end
    
37. 
    
38.   def scene_end
    
39.     @credit_sprite.dispose
    
40.     @sprite.dispose
    
41.   end
    
42.   
    
43.   def last?
    
44.     return (@frame_index >= @credit_sprite.bitmap.height + 320)
    
45.   end
    
46.   
    
47.   def last
    
48.     if not @last_flag
    
49.       Audio.bgm_fade(10000)
    
50.       @last_flag = true
    
51.       @last_count = 0
    
52.     else
    
53.       @last_count += 1
    
54.     end
    
55.     if @last_count >= 300
    
56.       $scene = @return_scene
    
57.     end
    
58.   end
    
59.   
    
60.   def update
    
61.     @frame_index += 1
    
62.     return if cancel?
    
63.     last if last?
    
64.     @credit_sprite.oy += 1
    
65.   end
    
66. 
    
67.   def cancel?
    
68.     if Input.trigger?(Input::B)
    
69.       $scene = @return_scene
    
70.       return true
    
71.     end
    
72.     return false
    
73.   end
    
74. 
    
75.   def main
    
76.     scene_start
    
77.     # 过渡
    
78.     Graphics.transition
    
79.     # 主循环
    
80.     loop do
    
81.       Graphics.update
    
82.       Input.update
    
83.       update
    
84.       if $scene != self
    
85.         break
    
86.       end
    
87.     end
    
88.     # 准备过渡
    
89.     Graphics.freeze
    
90.     scene_end
    
91.   end
    
92. end

复制代码

---

作者: zmgy    时间: 2008-2-13 05:23
提示: 作者被禁止或删除 内容自动屏蔽

---

作者: CIS狂人    时间: 2008-2-13 05:37
贴完了

---

作者: mieloko    时间: 2008-2-13 21:46
天才呀,各位都是天才呀

---

作者: CIS狂人    时间: 2008-2-18 21:47
我要抗议..66..为什么不把这个版块放到论坛页面上去..

---

作者: 越前リョーマ    时间: 2008-2-18 21:54

以下引用CIS狂人于2008-2-18 13:47:08的发言：

我要抗议..66..为什么不把这个版块放到论坛页面上去..

是雷子开的……

的确很冷……

---

作者: 粉红梦    时间: 2008-2-24 23:54
提示: 作者被禁止或删除 内容自动屏蔽

---

作者: 精灵使者    时间: 2008-2-25 02:54
$Scene = Scene_Credit.new

---

作者: 粉红梦    时间: 2008-3-3 01:40
提示: 作者被禁止或删除 内容自动屏蔽

---

作者: 风雪优游    时间: 2008-3-7 23:27
发布完毕,VIP+2

---

作者: 王逸尘    时间: 2008-5-2 19:37
提示: 作者被禁止或删除 内容自动屏蔽

---

作者: 精灵使者    时间: 2008-5-3 01:58
CREDIT=<<_END_
#这里输入字幕内容

_END_
end
这个的范围内输入就行。回车会自动换行。

---

作者: 5693744    时间: 2008-5-8 22:47
感觉有个范例会更好`

---

作者: 278772543    时间: 2008-5-12 02:03
提示: 作者被禁止或删除 内容自动屏蔽

---

作者: 偶尔杀人越货    时间: 2008-5-16 21:26
话说vx区这两天出了不少精品，坚决地顶一个！！！

---

作者: CIS狂人    时间: 2008-8-13 05:05
640*480脚本是大神的脚本..........
现在大家都吸大神.........

---

作者: 偶尔杀人越货    时间: 2008-8-21 05:51
什么啊，640*480自己就能改，麻烦点而已

---

作者: 越前リョーマ    时间: 2008-8-21 06:32
有这个就不用用图片了…… = =

---

作者: larbi    时间: 2008-8-22 19:14
我用不來,為什么...........

---

作者: CIS狂人    时间: 2008-8-23 02:43
那是因为你没有看我的注释.

---

作者: ㄆ相    时间: 2008-8-23 20:46
提示: 作者被禁止或删除 内容自动屏蔽

---

作者: 雪流星    时间: 2008-8-23 20:51
http://rpg.blue/viewthread.php?tid=74540&page=3

顺便去看一下版规
http://rpg.blue/viewthread.php?tid=77690

---

作者: 优木木    时间: 2009-4-19 21:12
提示: 作者被禁止或删除 内容自动屏蔽

---

作者: 优木木    时间: 2009-4-19 22:22
提示: 作者被禁止或删除 内容自动屏蔽

---

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

Powered by Discuz! X3.1