| 赞 | 5  | 
 
| VIP | 0 | 
 
| 好人卡 | 2 | 
 
| 积分 | 6 | 
 
| 经验 | 22439 | 
 
| 最后登录 | 2024-4-21 | 
 
| 在线时间 | 374 小时 | 
 
 
 
 
 
Lv2.观梦者 
	- 梦石
 - 0 
 
        - 星屑
 - 597 
 
        - 在线时间
 - 374 小时
 
        - 注册时间
 - 2011-10-11
 
        - 帖子
 - 311
 
 
 
 | 
	
 本帖最后由 月下黄昏 于 2012-8-24 02:49 编辑  
 
http://www.66rpg.com/articles/4469       进这里有教程 
 
如果你嫌麻烦也可以用这段脚本- #--------------------------------------------------------------------------------------------
 
 - class Scene_Movie
 
 - #--------------------------------------------------------------------------------------------
 
 - # 制作者/ SoundSpawn
 
 - #--------------------------------------------------------------------------------------------
 
 - # 修改 / Popper
 
 - #--------------------------------------------------------------------------------------------
 
 - # 加译 / XTLCME
 
 - #--------------------------------------------------------------------------------------------
 
 - # 说明
 
 - # 1) 需要播放的影片必须放在您的工程目录下的"Movie"文件夹里
 
 - # 2) 如果你需要在事件编辑器中使用这个脚本 请使用 $scene = Scene_Movie.new("INTRO")
 
 - # 3) 希望您使用愉快!!! 
 
 - #--------------------------------------------------------------------------------------------
 
 - # 初始化
 
 - def initialize(movie)
 
 - @readini = Win32API.new 'kernel32', 'GetPrivateProfileStringA', %w(p p p p l p), 'l'
 
 - @movie_name = Dir.getwd()+"\\Movies\\"+movie+".avi"
 
 - main
 
 - end
 
 - #--------------------------------------------------------------------------------------------
 
 - # 主处理
 
 - def main
 
 - game_name = "\0" * 256
 
 - @readini.call('Game','Title','',game_name,255,".\\Game.ini")
 
 - game_name.delete!("\0")
 
 - @wnd = Win32API.new('user32','FindWindowEx','%w(l,l,p,p)','L')
 
 - @temp = @wnd.call(0,0,nil,game_name).to_s
 
 - movie = Win32API.new('winmm','mciSendString','%w(p,p,l,l)','V')
 
 - movie.call("open \""+@movie_name+"\" alias FILE style 1073741824 parent " + @temp.to_s,0,0,0)
 
 - @message = Win32API.new('user32','SendMessage','%w(l,l,l,l)','V')
 
 - @detector = Win32API.new('user32','GetSystemMetrics','%w(l)','L')
 
 - @width = @detector.call(0)
 
 - #--------------------------------------------------------------------------------------------
 
 - # 全屏化处理
 
 - if @width == 640
 
 - fullscreen
 
 - Graphics.update
 
 - sleep(0.1)
 
 - Graphics.update
 
 - sleep(0.1)
 
 - Graphics.update
 
 - sleep(0.1)
 
 - fullscreen
 
 - end
 
 - #--------------------------------------------------------------------------------------------
 
 - status = " " * 255
 
 - movie.call("play FILE",0,0,0)
 
 - #--------------------------------------------------------------------------------------------
 
 - # 循环
 
 - loop do 
 
 - sleep(0.1)
 
 - @message.call(@temp.to_i,11,0,0)
 
 - Graphics.update
 
 - @message.call(@temp.to_i,11,1,0)
 
 - Input.update
 
 - movie.call("status FILE mode",status,255,0)
 
 - true_status = status.unpack("aaaa")
 
 - #--------------------------------------------------------------------------------------------
 
 - # 如果播放标记不对 或按下B键 就结束播放
 
 - if true_status.to_s != "play"
 
 - break
 
 - end
 
 - if Input.trigger?(Input::B)
 
 - $scene = Scene_Map.new
 
 - break
 
 - end
 
 - #--------------------------------------------------------------------------------------------
 
 - # 跳转回地图
 
 - end
 
 - $scene = Scene_Map.new
 
 - end
 
 - #--------------------------------------------------------------------------------------------
 
 - end
 
  复制代码 具体使用方法如下 
先在你的工程里新建一个文件夹命名为Movies 然后把想要放的片子(AVI格式的)放进去 
然后要放的时候在事件的第三页选脚本 插入脚本$scene = Scene_Movie.new("INTRO") 
其中INTRO就是你AVI播放的文件名  替换掉 
 
 |   
 
 
 
 |