八云 蓝 的脚本小作坊

八云紫

嘛，其实可 那个 滚动字幕 的原理是一模一样的， 只是移动的 方式不同罢了。

zh99998

{/fd}沉影大人居然会来求教本{/fd}

木葬枫

“VIP不是我的？”

---

还是说不是沉影本人？

八云紫

脚本完成：

    横向的滚动字幕，请 hitlerson 查收。

1. #===================================================================
   
2. #               横向滚动字幕（修改于《滚动字幕》）
   
3. #-------------------------------------------------------------------
   
4. #                       by 八云 紫
   
5. #         滚动字幕 相见：http://rpg.blue/web/htm/news31.htm
   
6. #===================================================================
   
7. 
   
8. =begin
   
9.    脚本使用说明：
   
10.    1.几乎和 《滚动字幕》 一样，在第19行开始输入内容，可以顶背景音乐、
    
11.    背景图片什么的。
    
12.    2.设定之后使用脚本：
    
13.     $scene = Scene_Byz_Credit.new
    
14.    来调用。（为防止和原来的脚本冲突，故修改了一下类名）
    
15.    3.在63行处修改返回的场景， 默认是返回地图。
    
16. =end
    
17. 
    
18. 
    
19. class Scene_Byz_Credit < Scene_Base
    
20.   
    
21. #------------------------定制部分-----------------------------
    
22.   # 字幕内容
    
23.   CREDIT=<<_END_
    
24. 这里输入字幕内容,haha。
    
25. wa哈哈；12463345aslkdhaosdyualsndoausydioqwfnheoyfas
    
26. fewfjawoejfosdiafu;sdkjafoasiduf;asdjfiorg
    
27. 
    
28. _END_
    
29. 
    
30.   # 音效部分
    
31.   # BGM 文件名
    
32.   NAME      = "Battle10"
    
33.   # 音量和音调 是否需要调整
    
34.   BOOL      = false
    
35.   # 音量
    
36.   VOLUME    = 50
    
37.   # 音调
    
38.   PITCH     = 50
    
39.   # BGM 淡出时间(单位：毫秒)
    
40.   TIME      = 10
    
41.   
    
42.   # 文章显示部分
    
43.   # X 坐标
    
44.   MESSAGE_X = 0
    
45.   # Y 坐标
    
46.   MESSAGE_Y = 270
    
47.   
    
48.   # 背景图片调整
    
49.   BITMAP_X  = 0
    
50.   BITMAP_Y  = 0
    
51.   # 背景图片名称
    
52.   BITMAP_NAME = "Actor2-3"
    
53. #------------------------定制结束-----------------------------
    
54. 
    
55.   def initialize
    
56.     @sprite = Sprite.new
    
57.     @sprite.bitmap = Bitmap.new("Graphics/Pictures/#{BITMAP_NAME}")
    
58.     @sprite.x = BITMAP_X
    
59.     @sprite.y = BITMAP_Y
    
60.   end
    
61.   
    
62.   def return_scene
    
63.     Audio.bgm_stop
    
64.     $scene = Scene_Map.new
    
65.   end
    
66.    
    
67.   def start
    
68.     super
    
69.     credit_lines = CREDIT.split(/\s/)
    
70.     text = ""
    
71.     credit_lines.each{|index|
    
72.       text += index}
    
73.     texts = text.split(/ /)
    
74.     credit_bitmap = Bitmap.new(15 * text.size,32)
    
75.     credit_bitmap.draw_text(0,0,credit_bitmap.width,32,texts,1)
    
76.     @credit_sprite = Sprite.new
    
77.     @credit_sprite.bitmap = credit_bitmap
    
78.     @credit_sprite.x = MESSAGE_X
    
79.     @credit_sprite.y = MESSAGE_Y
    
80.     @credit_sprite.ox = -180
    
81.     if BOOL
    
82.       Audio.bgm_play("Audio/BGM/#{NAME}", VOLUME, PITCH)
    
83.     else
    
84.       Audio.bgm_play("Audio/BGM/#{NAME}")
    
85.     end
    
86.   end
    
87. 
    
88.   def terminate
    
89.     super
    
90.     @credit_sprite.dispose
    
91.     @sprite.dispose
    
92.   end
    
93.   
    
94.   def update
    
95.     if cancel?
    
96.       if last?
    
97.         return_scene
    
98.       end
    
99.       @credit_sprite.ox += 1
    
100.     else
     
101.       return_scene
     
102.     end
     
103.   end
     
104.   
     
105.   def last?
     
106.     if @credit_sprite.ox >= @credit_sprite.bitmap.width
     
107.       Audio.bgm_fade(TIME)
     
108.       return true
     
109.     else
     
110.       return false
     
111.     end
     
112.   end
     
113.   
     
114.   def cancel?
     
115.     if Input.trigger?(Input::B)
     
116.       Audio.bgm_fade(TIME)
     
117.       return false
     
118.     else
     
119.       return true
     
120.     end
     
121.   end
     
122.   
     
123. end

复制代码

drgdrg

以下引用八云蓝于2008-10-20 10:12:11的发言：

脚本完成：

   横向的滚动字幕，请 hitlerson 查收。

为什么这个脚本公开发表了额

千落樱·念晓

问过约束姐姐……好像没有显示名字的………

八云紫

以下引用drgdrg于2008-10-20 11:02:00的发言：


为什么这个脚本公开发表了额

那啥， 他申请的时候就说了， 公开发表。

八云紫

以下引用沉影不器于2008-10-21 19:57:21的发言：

我是说hitlerson要求的效果用ox控制...其实我还想说Plane类

Sprite 就够了的。