请问怎样可以在RMXP中播放AVI

sdgn

怎麼寫可以按確定略過腳本或是撥放中的影片

liqunsz

http://rpg.blue/portal.php?mod=view&aid=40458
善用搜索功能会有很大帮助~

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,\
     
102.        @perf_flag,@qpCounter,@tGetTime,
     
103.        @time_now.unpack('LL')[0],@time_now.unpack('LL')[1],
     
104.        @time_start.unpack('LL')[0],@time_start.unpack('LL')[1]
     
105.      self.clear()
     
106.      return 0.0
     
107.    else
     
108.      return now_time
     
109.    end
     
110. end
     
111. 
     
112. #-=====================-#
     
113. # 获取时间比例因数
     
114. #-=====================-#
     
115. def scale()
     
116.    return @time_scale[0]+\
     
117.           @time_scale[1]*0xffffffff
     
118. end
     
119. 
     
120. #-=====================-#
     
121. # 获取起始滴答数
     
122. #-=====================-#
     
123. def start()
     
124.    return @time_start.unpack('LL')[0]+\
     
125.           @time_start.unpack('LL')[1]*0xffffffff
     
126. end
     
127. 
     
128. #-=====================-#
     
129. # 获取当前的嘀哒数
     
130. #-=====================-#
     
131. def timer()
     
132.    if @perf_flag
     
133.      @qpCounter.call(@time_now)
     
134.    else
     
135.      @time_now=[@tGetTime.call(),0].pack('LL')
     
136.    end
     
137.    return @time_now.unpack('LL')[0]+\
     
138.           @time_now.unpack('LL')[1]*0xffffffff
     
139. end
     
140. end
     
141. 
     
142. #-------------------------------------#
     
143. # 初始化自身成一个全局变量
     
144. #-------------------------------------#
     
145. $sys_timer=SystemTimer.new()
     
146. #-------------------------------------#
     
147. 
     

复制代码

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

复制代码

两个要一起用~

不过AVI的脚本兼容性与系统安装的解码器有很大关系，可能在你的电脑上放的出来，到别人的电脑上就不行了~
所以推荐使用Flash播放脚本，工程内包含了DLL文件，可以将视频转换成FLV，然后再在Flash中导入视频并输出~注意帧频要与视频相称~
Flash播放器：

Flash 播放器 v1.3   作者:灼眼的夏娜

1.1 更新

解决了 没有装Flash的 也可以播放

1.3 更新(更新内容见注释)

http://rpg.blue/UP_PIC/200801/RMFlashV0.3.rar

继GIF播放器之后 Flash 也出现了 而且功能更强大

播放 暂停 继续 循环 回到某桢播放 读取某贞播放 等等。。。

如可以尝试做出多样化的战斗待机动画等等。。。

Tabris_Air写的使用教程

第一次写教学帖，不当的地方还请指正^^

在RM里面插入视频已经是被问了很多次的问题了，站上的avi脚本虽然有时候确实能用但实在是问题多多，在不同电脑上测试成功的概率不到一半= =b，之后夏娜大大做的flash播放脚本在普适性上有了相当大的进步（撒花~~~），但是鉴于夏娜大的脚本一直很难懂，所以很多新手都不知道怎么在rm里面插视频……

自己用了一下午时间研究了一下flash播放的脚本，写了个具体的说明和小例子，供大家参考。

===================================================
===================================================

首先请明确，除非对游戏有足够的信心，否则不要在游戏中插入视频，因为这样导致的游戏大小剧增会让很多玩家失去下载的耐心。

===================================================
===================================================

如果决定要插入视频，并且不想使用avi脚本的话，请继续往下看。

放弃了avi脚本，我们能利用的只有flash播放脚本了。那么要做的工作就有下面几步：

1.确定flash脚本能用。其实这个问题并不大，自己在周围的同学电脑上都测试过了，无一出错。但是网上毕竟还是有报错的情况，所以在所有工作之前请先检验flash脚本的范例是否能正常运行。
脚本范例地址：http://rpg.blue/UP_PIC/200801/RMFlashV0.3.rar

2.将你所要插入的视频编辑并且转换为swf格式。
因为视频的格式多种多样，这里我们从片源好找也是最麻烦的rm/rmvb格式开始说起。

i.制作视频片段。这里用到专门剪辑rm文件的软件Real Editor
  下载地址：http://www.crsky.com/soft/1953.html
  软件的使用很简单，这里略过。
  值得注意的是，剪切过后该软件输出的文件格式不是rm/rmvb而是ra，这也是real的媒体格式但是很多转换软件不认= =，所以需要再转换一次……而很少有其他软件能够编辑rm格式文件，所以说rm很麻烦啊很麻烦……

ii.转换格式。这里推荐两个软件，都很简单，使用说明均略过= =

  total video converter ，基本上所有格式通吃的转换软件，缺点是速度慢，老出bug而且bug种类多样= =，比如我这里转avi没问题但是转wmv或者swf就老出错……
下载：http://www.xdowns.com/soft/10/35/2009/Soft_49173.html

  color7 video converter，转swf速度很快，目前无出错情况。
下载：http://www.xdowns.com/soft/10/35/2006/Soft_32660.html

关于两个软件的解释：如果你做的是非rmvb片源的话，运气好tvc就能一次转成swf，这样请直接跳到下一步。tvc出了bug转不成swf，那么就用color7转。不过最糟糕的情况是：tvc出bug转不了swf，而用real editor输出的ra格式color7又不认，这个时侯只能先用tvc转成某中介格式（比如avi），再用color7把avi转成swf……我遇到的就是这种情况。嘛，总之就是想方设法把剪辑好的视频转换成swf格式。这方面我也不是很懂，要是有更好的软件也请大家多共享一下。

iii.在rm中播放
  其实这就是flash脚本的使用方法嗯……简单做了一个范例，
http://rpg.blue/upload_program/d/Tabris_Air_flash_113240344.rar
脚本库里面插入的是夏娜的flash脚本（把片头播放取消了），在游戏中用事件插入视频

==========================================================
fls = RMFlash.load("AvB_2.swf",320,240)
fls.x = 160
fls.y = 100
fls.loop = 1
while true
   Graphics.update
#    Input.update
   fls.update
   break if !fls.playing?
#    break if Input.trigger?(13)
end
fls.dispose
==========================================================

下面把语句解释一下：
fls = RMFlash.load("AvB_2.swf",320,240)
这句是读取flash文件AVB_2.swf，320*240表示显示大小为320*240，如果要布满窗口就是640*480

fls.x = 160
fls.y = 100
上面两句是说flash的显示位置为160，100，适当调整这两个数值可以实现居中播放

fls.loop = 1
播放一遍，如果不写这一句就是循环播放

while true
   Graphics.update
#    Input.update
   fls.update
   break if !fls.playing?
#    break if Input.trigger?(13)
end
上面的循环实现的是画面和flash的刷新。
break if !fls.playing?语句是说如果没有播放了，那么退出循环。因为我们之前设定了loop=1，所以播放一遍之后该语句生效，退出循环。
如果把注释的两个语句用上，那么就是说当按确认键后退出循环

fls.dispose
最后要记得释放


===================================================
===================================================

就是这么多吧，写的有点乱凑合着看吧= =
有什么问题我再改……截图之后附上

脚本：
范例截图：

Total Video Converter

color7 video converter

real editor