请问如何在游戏最后加入滚动字幕?

9244579

自己先PS一张图，然后用图片的Y的值或X的值来
加减  形成滚动

3535

http://rpg.blue/web/htm/news31.htm

---

系统信息：本贴由楼主认可为正确答案，66RPG感谢您的热情解答～

七夕小雨

看到你的名字……我错以为她来了………………跑题跑题……

1. class Scene_Datemessage1
   
2.   CREDIT=<<_END_
   
3.                         交换日记之一
   
4. 
   
5.     你好阿修，谢谢你今天和我说了很多话，本来今早我会
   
6. 
   
7. 迟到的，但是得到你的鼓励，我很高兴。我以 为阿修会很容
   
8. 
   
9. 易生气的，但最近阿修变的很温柔。连我弄得不好吃的便当
   
10. 
    
11. 也笑着吃完。谢谢你。可是，看 到经常笑的阿修，便会很担
    
12. 
    
13. 心。每当看到强颜欢笑的阿修，我就......变得很想消失...
    
14. 
    
15. 为什么我的身体 会变成这样？我...做错了什么吗？这是什么
    
16. 
    
17. 惩罚么？难道是因为懦弱的我一直受人照顾又没有付出而受到
    
18. 
    
19. 的惩罚么？由于最终兵器的事是秘密，因此不能和任何人倾诉，
    
20. 
    
21. 很痛苦。其实......当时......我并不希望让阿修看到我这个
    
22. 
    
23. 羞耻的身体。但又松了一口气。我曾想过......阿修看到我干
    
24. 
    
25. 了坏事，可能会骂我 。那天之后，我很高兴......阿修你假装
    
26. 
    
27. 对我的温柔......但也很悲伤。所以，够了。我为什么这样写
    
28. 
    
29. 呢 ？我不想再写这些事了。很想停笔。我会变得坚强，变得更
    
30. 
    
31. 加......坚强。所以，放心吧，虽然拍拖的时 间不长，但很感
    
32. 
    
33. 激你。对不起。
    
34. 
    
35.     阿修，我正在成长。
    
36. _END_
    
37. end
    
38. 
    
39. class Scene_Datemessage1
    
40.   def initialize(return_scene = nil)
    
41.     @back = Sprite.new
    
42.     @back.bitmap = Bitmap.new("Graphics/Pictures/底板.jpg")
    
43.     if return_scene.nil?
    
44.       return_scene = Scene_Map.new
    
45.     end
    
46.     @return_scene = return_scene
    
47.   end
    
48.   def scene_start
    
49.     credit_lines = CREDIT.split(/\n/)
    
50.     credit_bitmap = Bitmap.new(640,32 * credit_lines.size)
    
51.     credit_lines.each_index do |i|
    
52.       line = credit_lines[i]
    
53.       credit_bitmap.font.color = Color.new(0, 0, 0, 255)
    
54.       credit_bitmap.draw_text(48,i * 32,640,32,line)
    
55.     end
    
56.     @credit_sprite = Sprite.new(Viewport.new(0,50,640,380))
    
57.     @credit_sprite.bitmap = credit_bitmap
    
58.     @credit_sprite.oy = -430
    
59.     @frame_index = 0
    
60.     @last_flag = false
    
61.     @back2 = Sprite.new
    
62.     @back2.bitmap = Bitmap.new("Graphics/Pictures/底板_up.png")
    
63.   end
    
64.   def scene_end
    
65.     @credit_sprite.dispose
    
66.     @back.dispose
    
67.     @back2.dispose
    
68.   end
    
69.   def last?
    
70.     return (@frame_index >= @credit_sprite.bitmap.height + 480)
    
71.   end
    
72.   def last
    
73.     if not @last_flag
    
74.       Audio.bgm_fade(10000)
    
75.       @last_flag = true
    
76.       @last_count = 0
    
77.     else
    
78.       @last_count += 1
    
79.     end
    
80.     if @last_count >= 300
    
81.       $scene = @return_scene
    
82.     end
    
83.   end
    
84.   def update
    
85.     @frame_index += 1
    
86.     return if cancel?
    
87.     last if last?
    
88.     @credit_sprite.oy += 1
    
89.   end
    
90.   def cancel?
    
91.     if Input.trigger?(Input::B)
    
92.       $scene = @return_scene
    
93.       return true
    
94.     end
    
95.     return false
    
96.   end
    
97.   def main
    
98.     scene_start
    
99.     Graphics.transition
    
100.     loop do
     
101.       Graphics.update
     
102.       Input.update
     
103.       update
     
104.       if $scene != self
     
105.         break
     
106.       end
     
107.     end
     
108.     Graphics.freeze
     
109.     scene_end
     
110.   end
     
111. end

复制代码

以上是一段滚动字幕脚本，将其插入脚本栏……这个没有问题吧~
脚本的使用方法~
首先看第42行~这是背后滚动文字的底图~图片的路径自行修改即可~
再看62行~这是我自己加的一点效果~可以有淡入淡出的效果的Orz，路径自己自然也是可以给的……

如果你不要图片的话~删除41、42、66行~既可以不要背景图
删除61、62、67即可不要前图~

调用方法：
事件用使用脚本，脚本栏中键入：
$scene = Scene_Datemessage1.new即可

我给你一个范例吧~
http://rpg.blue/upload_program/files/范例rain_90625561.rar
还有图片-v-