设为首页收藏本站|繁體中文

Project1

 找回密码
 注册会员
搜索
查看: 1642|回复: 11
打印 上一主题 下一主题

怎么样能把AVI动画文件加密!

 关闭 [复制链接]

Lv1.梦旅人

梦石
0
星屑
60
在线时间
2 小时
注册时间
2008-2-16
帖子
166
跳转到指定楼层
1
发表于 2008-3-23 02:18:28 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式

加入我们,或者,欢迎回来。

您需要 登录 才可以下载或查看,没有帐号?注册会员

x
我的AVI动画文件是放在GAME.EXE目录下的,没法直接用RM加密,所以麻烦大家帮我找个加密[文件]的软件,或帮我改下AVI播放器的脚本,让这AVI动画文件放在Graphics的MOVIE目录下,(如需要,我会放脚本)谢谢!
版务信息:本贴由楼主自主结贴~

Lv1.梦旅人

胃:伪·好人之怨念<

梦石
0
星屑
50
在线时间
4 小时
注册时间
2007-6-24
帖子
5058

开拓者VX城市地图大赛亚军

2
发表于 2008-3-23 02:32:32 | 只看该作者
改脚本就可以了吧--
哈哈哈哈哈
回复 支持 反对

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
60
在线时间
2 小时
注册时间
2008-2-16
帖子
166
3
 楼主| 发表于 2008-3-23 18:25:50 | 只看该作者

以下引用cheyenne于2008-3-22 18:32:32的发言:

改脚本就可以了吧--

脚本咋改啊!要我放脚本吗?你帮我改下!
回复 支持 反对

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
50
在线时间
27 小时
注册时间
2008-2-13
帖子
1740
4
发表于 2008-3-23 18:36:06 | 只看该作者
是啊,把脚本放出来啊~!
好吧,果然换个签名就没人认识我了。我承认我被时间埋没了
回复 支持 反对

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
60
在线时间
2 小时
注册时间
2008-2-16
帖子
166
5
 楼主| 发表于 2008-3-23 19:00:29 | 只看该作者
哦好!!!!
回复 支持 反对

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
60
在线时间
2 小时
注册时间
2008-2-16
帖子
166
6
 楼主| 发表于 2008-3-23 19:01:18 | 只看该作者
  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. class SystemTimer

  20.   attr_accessor:decimal  #小数位数设定,默认为3
  21.   
  22.   def initialize(use_GetTime=false)
  23.     # 初始化,根据系统选择不同精度计时器
  24.     @qpFrequency = Win32API.new("kernel32","QueryPerformanceFrequency",'p','L')
  25.     @qpCounter = Win32API.new("kernel32","QueryPerformanceCounter",'p','L')
  26.     @tGetTime = Win32API.new("winmm","timeGetTime",'','L')
  27.    
  28.     @decimal=3
  29.     @perf_cnt=" " * 8
  30.     @time_start=" " * 8
  31.     @time_now=" " * 8
  32.    
  33.     result = @qpFrequency.call(@perf_cnt)
  34.    
  35.     if use_GetTime
  36.       result = 0
  37.     end
  38.    
  39.     if result!=0
  40.       @perf_flag=true
  41.     else
  42.       @perf_flag=false
  43.       @perf_cnt=[1000,0].pack('LL')
  44.     end
  45.    
  46.     #设置时间比例因数
  47.     @time_scale=@perf_cnt.unpack('LL')
  48.     @time_scale[0] /= 1000.0
  49.     @time_scale[1] /= 1000.0
  50.    
  51.     #起始时间清零
  52.     self.clear()
  53.   end
  54.   
  55.   #-=====================-#
  56.   # 计时器清零
  57.   #-=====================-#
  58.   def clear()
  59.     if @perf_flag
  60.       @qpCounter.call(@time_start)
  61.     else
  62.       @time_start=[@tGetTime.call(),0].pack('LL')
  63.     end
  64.   end
  65.   
  66.   #-==============================-#
  67.   # 获取当前经过的时间,单位毫秒
  68.   #-==============================-#
  69.   def now()
  70.     now_time = 0.0e1
  71.     now_time += self.timer() - self.start()
  72.     now_time /= self.scale()
  73.     return self.debug(now_time)
  74.   end
  75.   
  76.   #-==============================-#
  77.   # 获取当前经过的时间,单位秒
  78.   #-==============================-#
  79.   def now_s()
  80.     now_time = 0.0e1
  81.     now_time += self.timer() - self.start()
  82.     now_time /= (self.scale()*1000)   
  83.     return self.debug(now_time)
  84.   end
  85.   
  86.   #-==============================-#
  87.   # 帧错...
  88.   #-==============================-#
  89.   def debug(now_time)
  90.     if @decimal>0
  91.      now_time = (now_time * (10**@decimal)).floor/(10.0**@decimal)
  92.     else
  93.      now_time = now_time.floor
  94.     end
  95.     return now_time
  96.    
  97.     #以下用于debug模式
  98.     if now_time < 0
  99.       p "Timer Wrong!! Clear...",now_time,        @perf_flag,@qpCounter,@tGetTime,
  100.         @time_now.unpack('LL')[0],@time_now.unpack('LL')[1],
  101.         @time_start.unpack('LL')[0],@time_start.unpack('LL')[1]
  102.       self.clear()
  103.       return 0.0
  104.     else
  105.       return now_time
  106.     end
  107.   end
  108.   
  109.   #-=====================-#
  110.   # 获取时间比例因数
  111.   #-=====================-#
  112.   def scale()
  113.     return @time_scale[0]+           @time_scale[1]*0xffffffff
  114.   end
  115.   
  116.   #-=====================-#
  117.   # 获取起始滴答数
  118.   #-=====================-#
  119.   def start()
  120.     return @time_start.unpack('LL')[0]+           @time_start.unpack('LL')[1]*0xffffffff
  121.   end
  122.   
  123.   #-=====================-#
  124.   # 获取当前的嘀哒数
  125.   #-=====================-#
  126.   def timer()
  127.     if @perf_flag
  128.       @qpCounter.call(@time_now)
  129.     else
  130.       @time_now=[@tGetTime.call(),0].pack('LL')
  131.     end
  132.     return @time_now.unpack('LL')[0]+           @time_now.unpack('LL')[1]*0xffffffff
  133.   end
  134. end

  135. #-------------------------------------#
  136. # 初始化自身成一个全局变量
  137. #-------------------------------------#
  138. $sys_timer=SystemTimer.new()
  139. #-------------------------------------#
复制代码
回复 支持 反对

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
60
在线时间
2 小时
注册时间
2008-2-16
帖子
166
7
 楼主| 发表于 2008-3-23 19:01:44 | 只看该作者
[code][#==============================================================================
# ☆★☆ AVI播放器 ☆★☆
#------------------------------------------------------------------------------
# - FantasyDR
# - 2006.3.12
#------------------------------------------------------------------------------
# MSN: [email protected]
#------------------------------------------------------------------------------
# Note:
#  
#   1.在下方 PROJECT_NAME = 后面填写你的游戏工程名.
#
#   2.在游戏中,调用脚本事件播放你的视频文件,如果一行写不下可以在逗号后换行.
#
#   $MP.play(movie_name, movie_length,
#            skip, fullscr,
#            x, y, width, height, loop)
#
# 参数说明:
#
#     movie_name   : 视频文件名(*.avi),必须
#     movie_length : 电影时间,单位是秒,必须
#             skip : 是否可以按A键跳过,true/false,默认是true
#          fullscr : 是否强制为全屏幕播放,true/false,默认是false
#              x,y : 视频播放的左上角坐标,默认是0,0
#     width,height : 视频的宽度,可以任意.默认是640,480
#             loop : 循环播放,true/false,默认是true
#
# 例如播放logo.avi,时间13秒,禁止跳过,强制全屏,范围(是0,0)-(640,480),循环播放
#        $MP.play("logo.avi",13,false,true)
#==============================================================================

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

PROJECT_NAME = "不败的勇者--远古复苏的巨人"

#==============================================================================
# ■ Win32API
#------------------------------------------------------------------------------
#  需要用到的API
#==============================================================================

# 切换到全屏延时
SWITCH_DELAY = 0.1

# API使用的一些常数
WS_EX_TOPMOST = 0x8
WS_EX_TOOLWINDOW= 0x80
WS_VISIBLE = 0x10000000
WS_POPUP = 0x80000000
GWL_HINSTANCE = (-6)
WM_CLOSE = 0x10
WS_CHILD = 0x40000000
WS_NONE = 0x16000000
CP_ACP = 0
CP_UTF8 = 65001

# 字符编码转换API
$MP_m2w = Win32API.new('kernel32', 'MultiByteToWideChar', '%w(i,l,p,i,p,i)', 'i')
$MP_w2m = Win32API.new('kernel32', 'WideCharToMultiByte', '%w(i,l,p,i,p,i,p,p)', 'i')
   
# 按键API
$MP_keybd = Win32API.new('user32', 'keybd_event', '%w(i,i,l,l)', 'v')

# 视频播放API
$MP_mciSendString = Win32API.new('winmm','mciSendString','%w(p,p,l,l)','V')

# 锁定窗口
# hWnd,ifEnable
$MP_EnableWindow = Win32API.new('user32','EnableWindow','%w(l,l)','L')

# 激活窗口
# hWnd
$MP_SetActiveWindow = Win32API.new('user32','SetActiveWindow','%w(l)','L')

# 当前活动窗口
$MP_GetActiveWindow = Win32API.new('user32','GetActiveWindow','%w()','L')

# hWnd,wMsg,wParam,lParam
$MP_PostMessage = Win32API.new('user32','PostMessage','%w(l,l,l,p)','L')

# 获取当前窗口句柄
$MP_FindWindowEX = Win32API.new('user32','FindWindowEx','%w(l,l,p,p)','L')

# 获取屏幕坐标
$MP_ClientToScreen = Win32API.new("user32", "ClientToScreen", 'ip', 'i')

# 获取hInt
$MP_GetWindowLong= Win32API.new('user32','GetWindowLong','%w(l,l)','L')

# 获取类名
# hWnd,lpClassName,maxCount
$MP_GetClassName= Win32API.new('user32','GetClassName','%w(l,p,l)','L')

# 建立窗体
# ExStyle,ClassName,WindowName,
# style,x,y,width,height
# 0,0,hInstance,0
$MP_CreateWindowEX = Win32API.new('user32','CreateWindowEx','%w(l,p,p,l,l,l,l,l,l,l,l,p)','L')

#==============================================================================
# ■ MoviePlayer
#------------------------------------------------------------------------------
#  处理视频播放画面的类。
#==============================================================================

class MoviePlayer
  #--------------------------------------------------------------------------
  # ● 初始化
  #     project_name : 工程名称
  #--------------------------------------------------------------------------
  def initialize(project_name = PROJECT_NAME)
    @sys_timer=SystemTimer.new()
    buffer = "\0\0" * project_name.size
    @project_name = "\0" * project_name.size
   
    $MP_m2w.call(CP_UTF8, 0, project_name, -1, buffer, project_name.size)
    $MP_w2m.call(CP_ACP,0,buffer,-1,@project_name,project_name.size,0,0)
   
    @hWnd = $MP_FindWindowEX.call(0,0,nil,@project_name)
    @hInt = $MP_GetWindowLong.call(@hWnd,GWL_HINSTANCE)
    @class_name = " " * 256
    $MP_GetClassName.call(@hWnd,@class_name,256)
  end
  #--------------------------------------------------------------------------
  # ● 是否已经全屏幕
  #--------------------------------------------------------------------------
  def is_full?
    # 播放起始坐标
    point = [0, 0].pack('ll')
    if $MP_ClientToScreen.call(@hWnd, point) == 0
      return false
    end
    x, y = point.unpack('ll')
    if x == 0 and y == 0
      return true
    else
      return false
    end
  end
  #--------------------------------------------------------------------------
  # ● 切换全屏
  #--------------------------------------------------------------------------
  def switch_full
    $MP_keybd.call (0xA4, 0, 0, 0)
    $MP_keybd.call (13, 0, 0, 0)
    $MP_keybd.call (13, 0, 2, 0)
    $MP_keybd.call (0xA4, 0, 2, 0)
    sleep(SWITCH_DELAY)
    for i in 1..3
      Graphics.update
    end
  end
  #--------------------------------------------------------------------------
  # ● 播放电影
  #     movie_name : 视频文件名(*.avi)
  #     movie_length : 电影时间,单位是秒
  #     skip : 是否可以按键跳过
  #     fullscr : 是否强制为全屏幕播放
  #     x,y,width,height: 播放的位置以及宽度
  #     loop : 循环播放
  #--------------------------------------------------------------------------
  def play(movie_name,movie_length,
           skip = true,fullscr = false,
           x = 0,y = 0,width = 640,height = 480,loop = true)
    # 数据不合法则退出
    return true if movie_name == nil or movie_length <= 0
    # 文件不存在
    return true unless FileTest.exist?(movie_name)
   
    # 窗口宽度
    width -= (x + width)- 640 if (x + width) > 640
    height -= (y + height)- 480 if (y + height) > 480
   
    if fullscr and !is_full?
      self.switch_full
    end
   
    fullscr = self.is_full?
   
    # 播放起始坐标
    point = [x, y].pack('ll')
    if $MP_ClientToScreen.call(@hWnd, point) == 0
      return true
    end
    x, y = point.unpack('ll')
    return true  if (x + width) < 0 or (y+height) < 0
   
    if fullscr
      wnd = $MP_CreateWindowEX.call(WS_EX_TOPMOST,@class_name,@project_name,
                                    WS_VISIBLE | WS_POPUP,x,y,width,height,
                                    0,0,@hInt,0)
    else
      wnd = $MP_CreateWindowEX.call(WS_EX_TOOLWINDOW,@class_name,@project_name,
                                    WS_VISIBLE | WS_POPUP,x,y,width,height,
                                    0,0,@hInt,0)
    end                              
    # 窗体建立失败
    return true if wnd == 0
   
    # 屏蔽原窗体
    $MP_EnableWindow.call(@hWnd,0)
   
    $MP_mciSendString.call("open \"" + movie_name + "\"" +
                           " alias FILE style 1073741824 parent " +                            wnd.to_s,0,0,0)
    if loop
      $MP_mciSendString.call("play FILE repeat window",0,0,0)
    else
      $MP_mciSendString.call("play FILE window",0,0,0)
    end
   
    @sys_timer.clear()
    step = 0.1
    begin
      loop do
        # 如果在窗口模式
        unless fullscr
          # 变成全屏
          if self.is_full?
            break
          else
            Graphics.update
          end
        end
        #sleep(step)
        if skip
          Input.update
          break if Input.trigger?(Input::A)
        end
        if @sys_timer.now_s >= movie_length
          break
        end
        if $MP_GetActiveWindow.call() != wnd
          $MP_SetActiveWindow.call(wnd)
        end
      end
      Graphics.update
      # 关闭当前窗体
      $MP_PostMessage.call(wnd,WM_CLOSE,0,0)
      $MP_mciSendString.call("close FILE",0,0,0)
      $MP_EnableWindow.call(@hWnd,1)
      $MP_SetActiveWindow.call(@hWnd)
      return true
    rescue Hangup
      retry
    end
  end
end

$MP = MoviePlayer.new/HTML]
回复 支持 反对

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
60
在线时间
2 小时
注册时间
2008-2-16
帖子
166
8
 楼主| 发表于 2009-6-12 08:00:00 | 只看该作者
楼上那个没弄好重发!!!!
  1. #==============================================================================
  2. # ☆★☆ AVI播放器 ☆★☆
  3. #------------------------------------------------------------------------------
  4. # - FantasyDR
  5. # - 2006.3.12
  6. #------------------------------------------------------------------------------
  7. # MSN: [email protected]
  8. #------------------------------------------------------------------------------
  9. # Note:
  10. #  
  11. #   1.在下方 PROJECT_NAME = 后面填写你的游戏工程名.
  12. #
  13. #   2.在游戏中,调用脚本事件播放你的视频文件,如果一行写不下可以在逗号后换行.
  14. #
  15. #   $MP.play(movie_name, movie_length,
  16. #            skip, fullscr,
  17. #            x, y, width, height, loop)
  18. #
  19. # 参数说明:
  20. #
  21. #     movie_name   : 视频文件名(*.avi),必须
  22. #     movie_length : 电影时间,单位是秒,必须
  23. #             skip : 是否可以按A键跳过,true/false,默认是true
  24. #          fullscr : 是否强制为全屏幕播放,true/false,默认是false
  25. #              x,y : 视频播放的左上角坐标,默认是0,0
  26. #     width,height : 视频的宽度,可以任意.默认是640,480
  27. #             loop : 循环播放,true/false,默认是true
  28. #
  29. # 例如播放logo.avi,时间13秒,禁止跳过,强制全屏,范围(是0,0)-(640,480),循环播放
  30. #        $MP.play("logo.avi",13,false,true)
  31. #==============================================================================

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

  33. PROJECT_NAME = "不败的勇者--远古复苏的巨人"

  34. #==============================================================================
  35. # ■ Win32API
  36. #------------------------------------------------------------------------------
  37. #  需要用到的API
  38. #==============================================================================

  39. # 切换到全屏延时
  40. SWITCH_DELAY = 0.1

  41. # API使用的一些常数
  42. WS_EX_TOPMOST = 0x8
  43. WS_EX_TOOLWINDOW= 0x80
  44. WS_VISIBLE = 0x10000000
  45. WS_POPUP = 0x80000000
  46. GWL_HINSTANCE = (-6)
  47. WM_CLOSE = 0x10
  48. WS_CHILD = 0x40000000
  49. WS_NONE = 0x16000000
  50. CP_ACP = 0
  51. CP_UTF8 = 65001

  52. # 字符编码转换API
  53. $MP_m2w = Win32API.new('kernel32', 'MultiByteToWideChar', '%w(i,l,p,i,p,i)', 'i')
  54. $MP_w2m = Win32API.new('kernel32', 'WideCharToMultiByte', '%w(i,l,p,i,p,i,p,p)', 'i')
  55.    
  56. # 按键API
  57. $MP_keybd = Win32API.new('user32', 'keybd_event', '%w(i,i,l,l)', 'v')

  58. # 视频播放API
  59. $MP_mciSendString = Win32API.new('winmm','mciSendString','%w(p,p,l,l)','V')

  60. # 锁定窗口
  61. # hWnd,ifEnable
  62. $MP_EnableWindow = Win32API.new('user32','EnableWindow','%w(l,l)','L')

  63. # 激活窗口
  64. # hWnd
  65. $MP_SetActiveWindow = Win32API.new('user32','SetActiveWindow','%w(l)','L')

  66. # 当前活动窗口
  67. $MP_GetActiveWindow = Win32API.new('user32','GetActiveWindow','%w()','L')

  68. # hWnd,wMsg,wParam,lParam
  69. $MP_PostMessage = Win32API.new('user32','PostMessage','%w(l,l,l,p)','L')

  70. # 获取当前窗口句柄
  71. $MP_FindWindowEX = Win32API.new('user32','FindWindowEx','%w(l,l,p,p)','L')

  72. # 获取屏幕坐标
  73. $MP_ClientToScreen = Win32API.new("user32", "ClientToScreen", 'ip', 'i')

  74. # 获取hInt
  75. $MP_GetWindowLong= Win32API.new('user32','GetWindowLong','%w(l,l)','L')

  76. # 获取类名
  77. # hWnd,lpClassName,maxCount
  78. $MP_GetClassName= Win32API.new('user32','GetClassName','%w(l,p,l)','L')

  79. # 建立窗体
  80. # ExStyle,ClassName,WindowName,
  81. # style,x,y,width,height
  82. # 0,0,hInstance,0
  83. $MP_CreateWindowEX = Win32API.new('user32','CreateWindowEx','%w(l,p,p,l,l,l,l,l,l,l,l,p)','L')

  84. #==============================================================================
  85. # ■ MoviePlayer
  86. #------------------------------------------------------------------------------
  87. #  处理视频播放画面的类。
  88. #==============================================================================

  89. class MoviePlayer
  90.   #--------------------------------------------------------------------------
  91.   # ● 初始化
  92.   #     project_name : 工程名称
  93.   #--------------------------------------------------------------------------
  94.   def initialize(project_name = PROJECT_NAME)
  95.     @sys_timer=SystemTimer.new()
  96.     buffer = "\0\0" * project_name.size
  97.     @project_name = "\0" * project_name.size
  98.    
  99.     $MP_m2w.call(CP_UTF8, 0, project_name, -1, buffer, project_name.size)
  100.     $MP_w2m.call(CP_ACP,0,buffer,-1,@project_name,project_name.size,0,0)
  101.    
  102.     @hWnd = $MP_FindWindowEX.call(0,0,nil,@project_name)
  103.     @hInt = $MP_GetWindowLong.call(@hWnd,GWL_HINSTANCE)
  104.     @class_name = " " * 256
  105.     $MP_GetClassName.call(@hWnd,@class_name,256)
  106.   end
  107.   #--------------------------------------------------------------------------
  108.   # ● 是否已经全屏幕
  109.   #--------------------------------------------------------------------------
  110.   def is_full?
  111.     # 播放起始坐标
  112.     point = [0, 0].pack('ll')
  113.     if $MP_ClientToScreen.call(@hWnd, point) == 0
  114.       return false
  115.     end
  116.     x, y = point.unpack('ll')
  117.     if x == 0 and y == 0
  118.       return true
  119.     else
  120.       return false
  121.     end
  122.   end
  123.   #--------------------------------------------------------------------------
  124.   # ● 切换全屏
  125.   #--------------------------------------------------------------------------
  126.   def switch_full
  127.     $MP_keybd.call (0xA4, 0, 0, 0)
  128.     $MP_keybd.call (13, 0, 0, 0)
  129.     $MP_keybd.call (13, 0, 2, 0)
  130.     $MP_keybd.call (0xA4, 0, 2, 0)
  131.     sleep(SWITCH_DELAY)
  132.     for i in 1..3
  133.       Graphics.update
  134.     end
  135.   end
  136.   #--------------------------------------------------------------------------
  137.   # ● 播放电影
  138.   #     movie_name : 视频文件名(*.avi)
  139.   #     movie_length : 电影时间,单位是秒
  140.   #     skip : 是否可以按键跳过
  141.   #     fullscr : 是否强制为全屏幕播放
  142.   #     x,y,width,height: 播放的位置以及宽度
  143.   #     loop : 循环播放
  144.   #--------------------------------------------------------------------------
  145.   def play(movie_name,movie_length,
  146.            skip = true,fullscr = false,
  147.            x = 0,y = 0,width = 640,height = 480,loop = true)
  148.     # 数据不合法则退出
  149.     return true if movie_name == nil or movie_length <= 0
  150.     # 文件不存在
  151.     return true unless FileTest.exist?(movie_name)
  152.    
  153.     # 窗口宽度
  154.     width -= (x + width)- 640 if (x + width) > 640
  155.     height -= (y + height)- 480 if (y + height) > 480
  156.    
  157.     if fullscr and !is_full?
  158.       self.switch_full
  159.     end
  160.    
  161.     fullscr = self.is_full?
  162.    
  163.     # 播放起始坐标
  164.     point = [x, y].pack('ll')
  165.     if $MP_ClientToScreen.call(@hWnd, point) == 0
  166.       return true
  167.     end
  168.     x, y = point.unpack('ll')
  169.     return true  if (x + width) < 0 or (y+height) < 0
  170.    
  171.     if fullscr
  172.       wnd = $MP_CreateWindowEX.call(WS_EX_TOPMOST,@class_name,@project_name,
  173.                                     WS_VISIBLE | WS_POPUP,x,y,width,height,
  174.                                     0,0,@hInt,0)
  175.     else
  176.       wnd = $MP_CreateWindowEX.call(WS_EX_TOOLWINDOW,@class_name,@project_name,
  177.                                     WS_VISIBLE | WS_POPUP,x,y,width,height,
  178.                                     0,0,@hInt,0)
  179.     end                              
  180.     # 窗体建立失败
  181.     return true if wnd == 0
  182.    
  183.     # 屏蔽原窗体
  184.     $MP_EnableWindow.call(@hWnd,0)
  185.    
  186.     $MP_mciSendString.call("open \"" + movie_name + "\"" +
  187.                            " alias FILE style 1073741824 parent " +                            wnd.to_s,0,0,0)
  188.     if loop
  189.       $MP_mciSendString.call("play FILE repeat window",0,0,0)
  190.     else
  191.       $MP_mciSendString.call("play FILE window",0,0,0)
  192.     end
  193.    
  194.     @sys_timer.clear()
  195.     step = 0.1
  196.     begin
  197.       loop do
  198.         # 如果在窗口模式
  199.         unless fullscr
  200.           # 变成全屏
  201.           if self.is_full?
  202.             break
  203.           else
  204.             Graphics.update
  205.           end
  206.         end
  207.         #sleep(step)
  208.         if skip
  209.           Input.update
  210.           break if Input.trigger?(Input::A)
  211.         end
  212.         if @sys_timer.now_s >= movie_length
  213.           break
  214.         end
  215.         if $MP_GetActiveWindow.call() != wnd
  216.           $MP_SetActiveWindow.call(wnd)
  217.         end
  218.       end
  219.       Graphics.update
  220.       # 关闭当前窗体
  221.       $MP_PostMessage.call(wnd,WM_CLOSE,0,0)
  222.       $MP_mciSendString.call("close FILE",0,0,0)
  223.       $MP_EnableWindow.call(@hWnd,1)
  224.       $MP_SetActiveWindow.call(@hWnd)
  225.       return true
  226.     rescue Hangup
  227.       retry
  228.     end
  229.   end
  230. end

  231. $MP = MoviePlayer.new
复制代码
回复 支持 反对

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
60
在线时间
2 小时
注册时间
2008-2-16
帖子
166
9
 楼主| 发表于 2008-3-23 19:03:55 | 只看该作者
请问改咋改,请直接改完给我吧!!谢谢!!!
回复 支持 反对

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
50
在线时间
27 小时
注册时间
2008-2-13
帖子
1740
10
发表于 2008-3-23 19:09:01 | 只看该作者
#   3.在游戏中,调用脚本事件播放你的视频文件,如果一行写不下可以在逗号后换行.
#
#   $MP.play(movie_name, movie_length,
#            skip, fullscr,
#            x, y, width, height, loop)
#
# 参数说明:
#
#     movie_name   : 视频文件名(*.avi),必须
#     movie_length : 电影时间,单位是秒,必须
#             skip : 是否可以按A键跳过,true/false,默认是true
#          fullscr : 是否强制为全屏幕播放,true/false,默认是false
#              x,y : 视频播放的左上角坐标,默认是0,0
#     width,height : 视频的宽度,可以任意.默认是640,480
#             loop : 循环播放,true/false,默认是true
#





看到说明没?把movie_name换成"Graphics/MOVIE/文件名"
文件名:填你AVI文件的名字
系统信息:本贴由楼主认可为正确答案,66RPG感谢您的热情解答~
好吧,果然换个签名就没人认识我了。我承认我被时间埋没了
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

拿上你的纸笔,建造一个属于你的梦想世界,加入吧。
 注册会员
找回密码

站长信箱:[email protected]|手机版|小黑屋|无图版|Project1游戏制作

GMT+8, 2025-1-12 21:56

Powered by Discuz! X3.1

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表