关于AVI播放（我愿意追加VIP点数！不够就喊）

cookiedb

为什么没人理我啊！
我还要写家庭作业啊！
麻烦哪位高手解答一下！
谢谢！！！

cookiedb

其实我只是想问问AVI能不能放出声音……………………
大家貌似都理解错了我的意思了………………

Magic

以下引用cookiedb于2008-10-3 13:33:36的发言：

其实我只是想问问AVI能不能放出声音……………………
大家貌似都理解错了我的意思了………………

那个脚本如无意外是绝对可以发出声音的  要不这样  我把我的AVI脚本给你

★SystemTimer

1. # ------------------------------------------------------------------------
   
2. # 高精度计时器 by FantasyDR
   
3. # ------------------------------------------------------------------------
   
4. # E-mail: [email protected]
   
5. # ------------------------------------------------------------------------
   
6. # 2005.10.18
   
7. # ------------------------------------------------------------------------
   
8. # 该类已经被定义为全局变量 $sys_timer
   
9. # 如果只需要精确到毫秒，请设置初始化参数为true
   
10. # decimal属性设置返回时间值的小数位数。
    
11. # ------------------------------------------------------------------------
    
12. # 下面是一些有用的方法列表，调用时写：$sys_timer.方法名
    
13. # 例如 $sys_timer.clear()
    
14. # ------------------------------------------------------------------------
    
15. # clear() ：计时器清零
    
16. #   now() ：获取当前经过的时间，单位毫秒
    
17. # now_s() ：获取当前经过的时间，单位秒
    
18. # ------------------------------------------------------------------------
    
19. 
    
20. class SystemTimer
    
21. 
    
22.   attr_accessor:decimal  #小数位数设定，默认为3
    
23.   
    
24.   def initialize(use_GetTime=false)
    
25.     # 初始化，根据系统选择不同精度计时器
    
26.     @qpFrequency = Win32API.new("kernel32","QueryPerformanceFrequency",'p','L')
    
27.     @qpCounter = Win32API.new("kernel32","QueryPerformanceCounter",'p','L')
    
28.     @tGetTime = Win32API.new("winmm","timeGetTime",'','L')
    
29.    
    
30.     @decimal=3
    
31.     @perf_cnt=" " * 8
    
32.     @time_start=" " * 8
    
33.     @time_now=" " * 8
    
34.    
    
35.     result = @qpFrequency.call(@perf_cnt)
    
36.    
    
37.     if use_GetTime
    
38.       result = 0
    
39.     end
    
40.    
    
41.     if result!=0
    
42.       @perf_flag=true
    
43.     else
    
44.       @perf_flag=false
    
45.       @perf_cnt=[1000,0].pack('LL')
    
46.     end
    
47.    
    
48.     #设置时间比例因数
    
49.     @time_scale=@perf_cnt.unpack('LL')
    
50.     @time_scale[0] /= 1000.0
    
51.     @time_scale[1] /= 1000.0
    
52.    
    
53.     #起始时间清零
    
54.     self.clear()
    
55.   end
    
56.   
    
57.   #-=====================-#
    
58.   # 计时器清零
    
59.   #-=====================-#
    
60.   def clear()
    
61.     if @perf_flag
    
62.       @qpCounter.call(@time_start)
    
63.     else
    
64.       @time_start=[@tGetTime.call(),0].pack('LL')
    
65.     end
    
66.   end
    
67.   
    
68.   #-==============================-#
    
69.   # 获取当前经过的时间，单位毫秒
    
70.   #-==============================-#
    
71.   def now()
    
72.     now_time = 0.0e1
    
73.     now_time += self.timer() - self.start()
    
74.     now_time /= self.scale()
    
75.     return self.debug(now_time)
    
76.   end
    
77.   
    
78.   #-==============================-#
    
79.   # 获取当前经过的时间，单位秒
    
80.   #-==============================-#
    
81.   def now_s()
    
82.     now_time = 0.0e1
    
83.     now_time += self.timer() - self.start()
    
84.     now_time /= (self.scale()*1000)   
    
85.     return self.debug(now_time)
    
86.   end
    
87.   
    
88.   #-==============================-#
    
89.   # 帧错...
    
90.   #-==============================-#
    
91.   def debug(now_time)
    
92.     if @decimal>0
    
93.      now_time = (now_time * (10**@decimal)).floor/(10.0**@decimal)
    
94.     else
    
95.      now_time = now_time.floor
    
96.     end
    
97.     return now_time
    
98.    
    
99.     #以下用于debug模式
    
100.     if now_time < 0
     
101.       p "Timer Wrong!! Clear...",now_time,        @perf_flag,@qpCounter,@tGetTime,
     
102.         @time_now.unpack('LL')[0],@time_now.unpack('LL')[1],
     
103.         @time_start.unpack('LL')[0],@time_start.unpack('LL')[1]
     
104.       self.clear()
     
105.       return 0.0
     
106.     else
     
107.       return now_time
     
108.     end
     
109.   end
     
110.   
     
111.   #-=====================-#
     
112.   # 获取时间比例因数
     
113.   #-=====================-#
     
114.   def scale()
     
115.     return @time_scale[0]+           @time_scale[1]*0xffffffff
     
116.   end
     
117.   
     
118.   #-=====================-#
     
119.   # 获取起始滴答数
     
120.   #-=====================-#
     
121.   def start()
     
122.     return @time_start.unpack('LL')[0]+           @time_start.unpack('LL')[1]*0xffffffff
     
123.   end
     
124.   
     
125.   #-=====================-#
     
126.   # 获取当前的嘀哒数
     
127.   #-=====================-#
     
128.   def timer()
     
129.     if @perf_flag
     
130.       @qpCounter.call(@time_now)
     
131.     else
     
132.       @time_now=[@tGetTime.call(),0].pack('LL')
     
133.     end
     
134.     return @time_now.unpack('LL')[0]+           @time_now.unpack('LL')[1]*0xffffffff
     
135.   end
     
136. end
     
137. 
     
138. #-------------------------------------#
     
139. # 初始化自身成一个全局变量
     
140. #-------------------------------------#
     
141. $sys_timer=SystemTimer.new()
     
142. #-------------------------------------#

复制代码

★MoviePlayer

1. #==============================================================================
   
2. # ☆★☆ AVI播放器 ☆★☆
   
3. #------------------------------------------------------------------------------
   
4. # - FantasyDR
   
5. # - 2006.3.8
   
6. #------------------------------------------------------------------------------
   
7. # MSN: [email protected]
   
8. #------------------------------------------------------------------------------
   
9. # Note:
   
10. #
    
11. #   1.游戏必须使用游戏样板工程附带的RGSS102J.dll
    
12. #  
    
13. #   2.在下方 PROJECT_NAME = 后面填写你的游戏工程名.
    
14. #
    
15. #   3.在游戏中,调用脚本事件播放你的视频文件,如果一行写不下可以在逗号后换行.
    
16. #
    
17. #   $MP.play(movie_name, movie_length,
    
18. #            skip, fullscr,
    
19. #            x, y, width, height, loop)
    
20. #
    
21. # 参数说明:
    
22. #
    
23. #     movie_name   : 视频文件名(*.avi),必须
    
24. #     movie_length : 电影时间,单位是秒,必须
    
25. #             skip : 是否可以按A键跳过,true/false,默认是true
    
26. #          fullscr : 是否强制为全屏幕播放,true/false,默认是false
    
27. #              x,y : 视频播放的左上角坐标,默认是0,0
    
28. #     width,height : 视频的宽度,可以任意.默认是640,480
    
29. #             loop : 循环播放,true/false,默认是true
    
30. #
    
31. # 例如播放logo.avi,时间13秒,禁止跳过,强制全屏,范围(是0,0)-(640,480),循环播放
    
32. #        $MP.play("logo.avi",13,false,true)
    
33. #==============================================================================
    
34. 
    
35. # ★★★请先这里填写游戏的工程名★★★
    
36. 
    
37. PROJECT_NAME = "超级学校霸王"
    
38. 
    
39. #==============================================================================
    
40. # ■ Win32API
    
41. #------------------------------------------------------------------------------
    
42. # 　需要用到的API
    
43. #==============================================================================
    
44. 
    
45. # 切换到全屏延时
    
46. SWITCH_DELAY = 0.1
    
47. 
    
48. # API使用的一些常数
    
49. WS_EX_TOPMOST = 0x8
    
50. WS_EX_TOOLWINDOW= 0x80
    
51. WS_VISIBLE = 0x10000000
    
52. WS_POPUP = 0x80000000
    
53. GWL_HINSTANCE = (-6)
    
54. WM_CLOSE = 0x10
    
55. WS_CHILD = 0x40000000
    
56. WS_NONE = 0x16000000
    
57. CP_ACP = 0
    
58. CP_UTF8 = 65001
    
59. 
    
60. # 字符编码转换API
    
61. $MP_m2w = Win32API.new('kernel32', 'MultiByteToWideChar', '%w(i,l,p,i,p,i)', 'i')
    
62. $MP_w2m = Win32API.new('kernel32', 'WideCharToMultiByte', '%w(i,l,p,i,p,i,p,p)', 'i')
    
63.    
    
64. # 按键API
    
65. $MP_keybd = Win32API.new('user32', 'keybd_event', '%w(i,i,l,l)', 'v')
    
66. 
    
67. # 视频播放API
    
68. $MP_mciSendString = Win32API.new('winmm','mciSendString','%w(p,p,l,l)','V')
    
69. 
    
70. # 锁定窗口
    
71. # hWnd,ifEnable
    
72. $MP_EnableWindow = Win32API.new('user32','EnableWindow','%w(l,l)','L')
    
73. 
    
74. # 激活窗口
    
75. # hWnd
    
76. $MP_SetActiveWindow = Win32API.new('user32','SetActiveWindow','%w(l)','L')
    
77. 
    
78. # 当前活动窗口
    
79. $MP_GetActiveWindow = Win32API.new('user32','GetActiveWindow','%w()','L')
    
80. 
    
81. # hWnd,wMsg,wParam,lParam
    
82. $MP_PostMessage = Win32API.new('user32','PostMessage','%w(l,l,l,p)','L')
    
83. 
    
84. # 获取当前窗口句柄
    
85. $MP_FindWindowEX = Win32API.new('user32','FindWindowEx','%w(l,l,p,p)','L')
    
86. 
    
87. # 获取屏幕坐标
    
88. $MP_ClientToScreen = Win32API.new("user32", "ClientToScreen", 'ip', 'i')
    
89. 
    
90. # 获取hInt
    
91. $MP_GetWindowLong= Win32API.new('user32','GetWindowLong','%w(l,l)','L')
    
92. 
    
93. # 获取类名
    
94. # hWnd,lpClassName,maxCount
    
95. $MP_GetClassName= Win32API.new('user32','GetClassName','%w(l,p,l)','L')
    
96. 
    
97. # 建立窗体
    
98. # ExStyle,ClassName,WindowName,
    
99. # style,x,y,width,height
    
100. # 0,0,hInstance,0
     
101. $MP_CreateWindowEX = Win32API.new('user32','CreateWindowEx','%w(l,p,p,l,l,l,l,l,l,l,l,p)','L')
     
102. 
     
103. #==============================================================================
     
104. # ■ MoviePlayer
     
105. #------------------------------------------------------------------------------
     
106. # 　处理视频播放画面的类。
     
107. #==============================================================================
     
108. 
     
109. class MoviePlayer
     
110.   #--------------------------------------------------------------------------
     
111.   # ● 初始化
     
112.   #     project_name : 工程名称
     
113.   #--------------------------------------------------------------------------
     
114.   def initialize(project_name = PROJECT_NAME)
     
115.     @sys_timer=SystemTimer.new()
     
116.     buffer = "\0\0" * project_name.size
     
117.     @project_name = "\0" * project_name.size
     
118.    
     
119.     $MP_m2w.call(CP_UTF8, 0, project_name, -1, buffer, project_name.size)
     
120.     $MP_w2m.call(CP_ACP,0,buffer,-1,@project_name,project_name.size,0,0)
     
121.    
     
122.     @hWnd = $MP_FindWindowEX.call(0,0,nil,@project_name)
     
123.     @hInt = $MP_GetWindowLong.call(@hWnd,GWL_HINSTANCE)
     
124.     @class_name = " " * 256
     
125.     $MP_GetClassName.call(@hWnd,@class_name,256)
     
126.   end
     
127.   #--------------------------------------------------------------------------
     
128.   # ● 是否已经全屏幕
     
129.   #--------------------------------------------------------------------------
     
130.   def is_full?
     
131.     # 播放起始坐标
     
132.     point = [0, 0].pack('ll')
     
133.     if $MP_ClientToScreen.call(@hWnd, point) == 0
     
134.       return false
     
135.     end
     
136.     x, y = point.unpack('ll')
     
137.     if x == 0 and y == 0
     
138.       return true
     
139.     else
     
140.       return false
     
141.     end
     
142.   end
     
143.   #--------------------------------------------------------------------------
     
144.   # ● 切换全屏
     
145.   #--------------------------------------------------------------------------
     
146.   def switch_full
     
147.     $MP_keybd.call (0xA4, 0, 0, 0)
     
148.     $MP_keybd.call (13, 0, 0, 0)
     
149.     $MP_keybd.call (13, 0, 2, 0)
     
150.     $MP_keybd.call (0xA4, 0, 2, 0)
     
151.     Graphics.update
     
152.     sleep(SWITCH_DELAY)
     
153.     Graphics.update
     
154.   end
     
155.   #--------------------------------------------------------------------------
     
156.   # ● 播放电影
     
157.   #     movie_name : 视频文件名(*.avi)
     
158.   #     movie_length : 电影时间,单位是秒
     
159.   #     skip : 是否可以按键跳过
     
160.   #     fullscr : 是否强制为全屏幕播放
     
161.   #     x,y,width,height: 播放的位置以及宽度
     
162.   #     loop : 循环播放
     
163.   #--------------------------------------------------------------------------
     
164.   def play(movie_name,movie_length,
     
165.            skip = true,fullscr = false,
     
166.            x = 0,y = 60,width = 640,height = 480,loop = true)
     
167.     # 数据不合法则退出
     
168.     return true if movie_name == nil or movie_length <= 0
     
169.     # 文件不存在
     
170.     movie_name = Dir.getwd()+"\\"+movie_name
     
171.     return true unless FileTest.exist?(movie_name)
     
172. 
     
173.     # 窗口宽度
     
174.     width -= (x + width)- 640 if (x + width) > 640
     
175.     height -= (y + height)- 480 if (y + height) > 480
     
176.    
     
177.     if fullscr and !is_full?
     
178.       self.switch_full
     
179.     end
     
180.    
     
181.     fullscr = self.is_full?
     
182.    
     
183.     # 播放起始坐标
     
184.     point = [x, y].pack('ll')
     
185.     if $MP_ClientToScreen.call(@hWnd, point) == 0
     
186.       return true
     
187.     end
     
188.     x, y = point.unpack('ll')
     
189.     return true  if (x + width) < 0 or (y+height) < 0
     
190.    
     
191.     if fullscr
     
192.       wnd = $MP_CreateWindowEX.call(WS_EX_TOPMOST,@class_name,@project_name,
     
193.                                     WS_VISIBLE | WS_POPUP,x,y,width,height,
     
194.                                     0,0,@hInt,0)
     
195.     else
     
196.       wnd = $MP_CreateWindowEX.call(WS_EX_TOOLWINDOW,@class_name,@project_name,
     
197.                                     WS_VISIBLE | WS_POPUP,x,y,width,height,
     
198.                                     0,0,@hInt,0)
     
199.     end                              
     
200.     # 窗体建立失败
     
201.     return true if wnd == 0
     
202.    
     
203.     # 屏蔽原窗体
     
204.     $MP_EnableWindow.call(@hWnd,0)
     
205.    
     
206.     $MP_mciSendString.call("open \"" + movie_name + "\"" +
     
207.                            " alias FILE style 1073741824 parent " +                            wnd.to_s,0,0,0)
     
208.     if loop
     
209.       $MP_mciSendString.call("play FILE repeat window",0,0,0)
     
210.     else
     
211.       $MP_mciSendString.call("play FILE window",0,0,0)
     
212.     end
     
213.    
     
214.     @sys_timer.clear()
     
215.     step = 0.1
     
216.     begin
     
217.       loop do
     
218.         # 如果在窗口模式
     
219.         unless fullscr
     
220.           # 变成全屏
     
221.           if self.is_full?
     
222.             break
     
223.           else
     
224.             Graphics.update
     
225.           end
     
226.         end
     
227.         #sleep(step)
     
228.         if skip
     
229.           Input.update
     
230.           break if Input.trigger?(Input::A)
     
231.         end
     
232.         if @sys_timer.now_s >= movie_length
     
233.           break
     
234.         end
     
235.         if $MP_GetActiveWindow.call() != wnd
     
236.           $MP_SetActiveWindow.call(wnd)
     
237.         end
     
238.       end
     
239.     rescue Hangup
     
240.       retry
     
241.     end
     
242.     # 关闭当前窗体
     
243.     $MP_PostMessage.call(wnd,WM_CLOSE,0,0)
     
244.     $MP_mciSendString.call("close FILE",0,0,0)
     
245.     $MP_EnableWindow.call(@hWnd,1)
     
246.     $MP_SetActiveWindow.call(@hWnd)
     
247.     return true
     
248.   end
     
249. end
     
250. 
     
251. $MP = MoviePlayer.new[MP=490,350][/MP]

复制代码

如果还不能发出声音  那就不是脚本的问题了  因为这个脚本在我的机子上可以发声

cookiedb

用了Magic的脚本后就出错，脚本的最后一行是你自己改的吧？是什么意思呢？我不太懂啊。
还有，我用的脚本和你的 是一样的，都是AVI播放完美版，但是用了你的 脚本后还是不出声啊……………………
这是怎么一会事啊？
谁来帮帮我啊？

cookiedb

这个解决不了就算了，现在又有个新的问题。我在放完AVI之后使用滚动字幕脚本为什么会出现游戏死掉了的情况呢？就是只看见硬盘灯在不停的闪，就是不出字幕啊！！！
这个一定要解决啊！！！关系到我的游戏的结局啊！！！谢谢啦！！

麻烦哪位高人解答一下！我还可以再追加VIP点数，前提是你的答案要让我满意！
先谢谢啦！

做游戏的新手

# ★★★请先这里填写游戏的工程名★★★

PROJECT_NAME = "超级学校霸王"

" "里填写你的游戏名

cookiedb

我填了的，不是这样的啊…………………………
是不出声音，但是有图象………………

光郎

帮你增加1VIP，希望更多的人来~

cookiedb

谢谢BZ的支持！
太感谢了！