谁有文字向上滚动的脚本和文字完后自动进入游戏

200878242

谁有文字向上滚动的脚本和文字完后自动进入游戏

---

此贴于 2008-8-1 7:25:58 被版主凌冰提醒，请楼主看到后对本贴做出回应。

---

此贴于 2008-8-4 2:21:43 被版主darkten提醒，请楼主看到后对本贴做出回应。

---

版务信息：本贴由楼主自主结贴～

灯笼菜刀王

1. #==============================================================================
   
2. # 本脚本来自www.66RPG.com，使用和转载请保留此信息
   
3. #==============================================================================
   
4. 
   
5. #——————————————————————————————————————
   
6. # Scene_Credit 制作人员名单
   
7. #——————————————————————————————————————
   
8. 
   
9. 
   
10. #——使用注意：默认会返回地图，如果需要返回开头，请将本脚本中的
    
11. #return_scene = Scene_Map.new改为return_scene = Scene_Title.new
    
12. 
    
13. class Scene_Credit
    
14.   CREDIT=<<_END_
    
15. -----Cast------
    
16. 
    
17. 制作工具：RPG Maker XP
    
18. 
    
19. 先帝创业未半而中道崩殂
    
20. 今天下三分，益州疲弊
    
21. 此诚危急存亡之秋也
    
22. 然侍卫之臣不懈于内，忠志之士忘身于外者
    
23. 盖追先帝之殊遇，欲报之于陛下也
    
24. 诚宜开张圣听，以光先帝遗德，恢弘志士之气
    
25. 不宜妄自菲薄，引喻失义，以塞忠谏之路也
    
26. 
    
27. 宫中府中，俱为一体，陟罚臧否，不宜异同
    
28. 若有作奸犯科及为忠善者
    
29. 宜付有司论其刑赏，以昭陛下平明之理
    
30. 不宜偏私，使内外异法也。
    
31. 侍中侍郎郭攸之、费祎、董允等
    
32. 此皆良实，志虑忠纯，是以先帝简拔以遗陛下
    
33. 愚以为宫中之事，事无大小，悉以咨之，然后施行
    
34. 必能裨补阙漏，有所广益。
    
35. 
    
36. 
    
37. _END_
    
38. end
    
39. 
    
40. class Scene_Credit
    
41. 
    
42.   def initialize(return_scene = nil)
    
43.     if return_scene.nil?
    
44.       return_scene = Scene_Map.new
    
45.     end
    
46.     @return_scene = return_scene
    
47.   end
    
48.   
    
49.   def scene_start
    
50.     credit_lines = CREDIT.split(/\n/)
    
51.     credit_bitmap = Bitmap.new(640,32 * credit_lines.size)
    
52.     credit_lines.each_index do |i|
    
53.       line = credit_lines[i]
    
54.       credit_bitmap.draw_text_s(0,i * 32,640,32,line,1)
    
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.   end
    
62. 
    
63.   def scene_end
    
64.     @credit_sprite.dispose
    
65.   end
    
66.   
    
67.   def last?
    
68.     return (@frame_index >= @credit_sprite.bitmap.height + 480)
    
69.   end
    
70.   
    
71.   def last
    
72.     if not @last_flag
    
73.       Audio.bgm_fade(10000)
    
74.       @last_flag = true
    
75.       @last_count = 0
    
76.     else
    
77.       @last_count += 1
    
78.     end
    
79.     if @last_count >= 300
    
80.       $scene = @return_scene
    
81.     end
    
82.   end
    
83.   
    
84.   def update
    
85.     @frame_index += 1
    
86.     return if cancel?
    
87.     last if last?
    
88.     @credit_sprite.oy += 1
    
89.   end
    
90. 
    
91.   def cancel?
    
92.     if Input.trigger?(Input::C)
    
93.       $scene = @return_scene
    
94.       return true
    
95.     end
    
96.     return false
    
97.   end
    
98. 
    
99.   def main
    
100.     scene_start
     
101.     # 过渡
     
102.     Graphics.transition
     
103.     # 主循环
     
104.     loop do
     
105.       Graphics.update
     
106.       Input.update
     
107.       update
     
108.       if $scene != self
     
109.         break
     
110.       end
     
111.     end
     
112.     # 准备过渡
     
113.     Graphics.freeze
     
114.     scene_end
     
115.   end
     
116. end

复制代码

200878242

我加上脚本怎么不好使大哥大姐帮帮忙我是初学者