mononobe123 发表于 2019-1-28 15:27
出現錯誤……

所以2楼不是有答案吗……

有沒有使用例子？

本能觉得 按F12既然能关掉播放
内部就该有控制逻辑
然后就跟进函数看了一下 发现目标的实现比想象的简单
因为后台时候不播放 所以实现暂停继续也应该可以 不过就算了..

RUBY 代码复制

module Graphics
  #按键跳过视频
  #逆向了 适用于300的dll
  #借用视频播放过程的一个子函数嵌入了检测按键的代码
  #下面是用于跳过视频的按键 默认 A + S
  #详阅 Virtual-Key Codes
  #要单键的话就设置成一样的
  #或者看着改 就是复制粘贴删除的问题
  key1 = 0x41
  key2 = 0x53
  #大写防止被GC吃掉
  SKIP_VIDEO_CODE = [0x51,                               # push ecx
 
                     0x6A, key1,                         # push key
                     # dll 没被改过 下面这句应当不会出错
                     0xFF, 0x15, 0x88, 0x23, 0x1A, 0x10, # call GetKeyState
                     0x98,                               # cwde
                     0x85, 0xC0,                         # test eax,eax
                     0x78, 0x08,                         # jjjj
                     0x59,                               # pop ecx
                     0xB8, 0xE0, 0xF1, 0x10, 0x10,       # mov eax,原函数
                     0xFF, 0xE0,                         # jmp eax
 
                     0x6A, key2,                         # push key
                     0xFF, 0x15, 0x88, 0x23, 0x1A, 0x10, # call GetKeyState
                     0x98,                               # cwde
                     0x85, 0xC0,                         # test eax,eax
                     0x78, 0x08,                         # jjjj
                     0x59,                               # pop ecx
                     0xB8, 0xE0, 0xF1, 0x10, 0x10,       # mov eax,原函数
                     0xFF, 0xE0,                         # jmp eax
                     # 回 0 停止播放
                     0x59,                               # pop ecx
                     0x33, 0xC0,                         # xor eax,eax
                     0xC3].pack("C*")                    # ret
  aa = [SKIP_VIDEO_CODE].pack("p").unpack("l")[0]
  ww = Win32API.new("kernel32", "WriteProcessMemory", "llpll", "v")
  ww.call(-1, 0x100027EE, [aa - 0x100027F2].pack("l"), 4, 0)
end

module Graphics


  #按键跳过视频


  #逆向了 适用于300的dll


  #借用视频播放过程的一个子函数嵌入了检测按键的代码


  #下面是用于跳过视频的按键 默认 A + S


  #详阅 Virtual-Key Codes


  #要单键的话就设置成一样的


  #或者看着改 就是复制粘贴删除的问题


  key1 = 0x41


  key2 = 0x53


  #大写防止被GC吃掉


  SKIP_VIDEO_CODE = [0x51,                               # push ecx


 


                     0x6A, key1,                         # push key


                     # dll 没被改过 下面这句应当不会出错


                     0xFF, 0x15, 0x88, 0x23, 0x1A, 0x10, # call GetKeyState


                     0x98,                               # cwde


                     0x85, 0xC0,                         # test eax,eax


                     0x78, 0x08,                         # jjjj


                     0x59,                               # pop ecx


                     0xB8, 0xE0, 0xF1, 0x10, 0x10,       # mov eax,原函数


                     0xFF, 0xE0,                         # jmp eax


 


                     0x6A, key2,                         # push key


                     0xFF, 0x15, 0x88, 0x23, 0x1A, 0x10, # call GetKeyState


                     0x98,                               # cwde


                     0x85, 0xC0,                         # test eax,eax


                     0x78, 0x08,                         # jjjj


                     0x59,                               # pop ecx


                     0xB8, 0xE0, 0xF1, 0x10, 0x10,       # mov eax,原函数


                     0xFF, 0xE0,                         # jmp eax


                     # 回 0 停止播放


                     0x59,                               # pop ecx


                     0x33, 0xC0,                         # xor eax,eax


                     0xC3].pack("C*")                    # ret


  aa = [SKIP_VIDEO_CODE].pack("p").unpack("l")[0]


  ww = Win32API.new("kernel32", "WriteProcessMemory", "llpll", "v")


  ww.call(-1, 0x100027EE, [aa - 0x100027F2].pack("l"), 4, 0)


end

1. #==============================================================================
   
2. #
   
3. # [ACE]EST_SOV_Video_Player ++ Conversion
   
4. #
   
5. # v1.4
   
6. #==============================================================================
   
7. # Author : Estriole
   
8. # (Conversion to ace and improving)
   
9. # VX version author: SuperOverlord
   
10. #
    
11. # also credit Crystal Noel for solution for title that have encoding problem character
    
12. # also credit ruin for fixes he made to this script.
    
13. #
    
14. # History :
    
15. # version 1.4 2013.05.16 - apply fixes from ruin. typo error and ability to use
    
16. #                          play video using battle event page.
    
17. # version 1.3 2013.03.05 - create configuration for people that have encoding character
    
18. #                          problem with their title. ex: Pokémon Ace.
    
19. #                          set the IGNORE_TITLE to true inside module Sov::Video
    
20. # version 1.2 2012.09.27 - made if game at fullscreen automaticly become windowed
    
21. # version 1.1 2012.09.25 - some bug fix. now avi video can played at full screen mode(alt enter) with some position error.
    
22. #                        - can play other format such as mkv but it will play full screen and when played at full screen
    
23. #                          mode (alt enter) the size will be smaller and the game switched.
    
24. #                        - basicly this script not support full screen game yet. will try to fix this in next version
    
25. # version 1.0 2012.09.23 - finish converting + some change
    
26. #
    
27. #
    
28. #==============================================================================
    
29. # 功能:
    
30. #------------------------------------------------------------------------------
    
31. # o 使用一条简单的事件脚本指令在地图或战斗中播放视频
    
32. #
    
33. # o 可以在视频播放时任意暂停或停止 .
    
34. #
    
35. # o 全屏或只在游戏窗口播放视频.
    
36. #
    
37. # o 设定技能视频，在造成伤害之前播放 .
    
38. #
    
39. # o 不仅可以设定技能视频，还可以设定物品视频
    
40. #
    
41. # o 可以在标题画面之前播放视频
    
42. #
    
43. #==============================================================================
    
44. # 使用方法:
    
45. #------------------------------------------------------------------------------
    
46. # o 把所有视频放在一个文件夹里，文件夹的名称在下面的设定部分设定
    
47. #   如果文件夹不存在，第一次运行游戏时，系统会自动创建这个文件夹 .
    
48. #
    
49. # o 在地图中播放视频.
    
50. #
    
51. #   - 查看下面的“可用脚本”.
    
52. #
    
53. # o 在战斗中播放视频.
    
54. #
    
55. #   - 使用在地图播放视频的脚本就可以了，都一样的 .
    
56. #
    
57. #   - 你还可以设定技能、物品视频，在造成伤害前播放视频.
    
58. #     使用技能备注:
    
59. #     1) <video_name = "文件名">
    
60. #        ~ “文件名”是视频文件的文件名，如果文件名的拓展名缺失，会使用第一个和
    
61. #           视频文件名匹配的文件.
    
62. #          (文件名请用双引号括起来)
    
63. #
    
64. #      除了上面这个备注，还有下面这两个备注可以使用. 下面这两个备注仅在“放在上
    
65. #      面这条备注之下”时有效 .
    
66. #      如果你不使用这两个备注，则这个视频视为既可以被停止，又可以被暂停 .
    
67. #
    
68. #      2) <video_exitable = n>   ~ 这个视频可以被停止键停止播放吗?
    
69. #      3) <video_pausable = n>   ~ 这个视频可以被暂停吗?
    
70. #         ~ n 替换为 t 或 f (t : true, f : false)
    
71. #
    
72. #      对于视频的参数 (x坐标、y坐标、视频宽高、是否全屏等)，请在下面的可用脚本
    
73. #      中查看
    
74. #
    
75. # o 在标题画面之前播放视频
    
76. # 在本脚本中 ctrl + f 搜索 : 标题视频设定
    
77. # 吧
    
78. # @video_title = nil
    
79. # 改为
    
80. # @video_title = "不带拓展名的视频文件名"
    
81. #
    
82. #==============================================================================
    
83. # 可用脚本:
    
84. #------------------------------------------------------------------------------
    
85. # 使用事件指令中的“使用脚本”
    
86. #------------------------------------------------------------------------------
    
87. # o 改变默认视频的参数.
    
88. #
    
89. #  1) Video.default_x = n            #改变视频x坐标
    
90. #  2) Video.default_y = n            #改变视频y坐标
    
91. #  3) Video.default_width  = n       #改变视频宽度
    
92. #  4) Video.default_height = n       #改变视频高度
    
93. #  5) Video.fullscreen = true/false  #改变视频全屏设定，默认为false，因为可能会出错
    
94. #  
    
95. #  上面五个脚本中:
    
96. #  ~ n 替换为整数
    
97. #
    
98. # o 播放视频
    
99. #
    
100. #   play_video(文件名,可停止?,可暂停?)
     
101. #  
     
102. # 例子：play_video("video",true,false)
     
103. #==============================================================================
     
104. # 兼容性:
     
105. #------------------------------------------------------------------------------
     
106. # o 技能视频的成功率取决于你的战斗系统是否兼容，不过问题应该不大.
     
107. #==============================================================================
     
108. # Credit:
     
109. #------------------------------------------------------------------------------
     
110. # o Credit goes to Trebor and Berka whose scripts helped be figure out the
     
111. #   mci_send_stringA function.
     
112. #==============================================================================
     
113. 
     
114. module SOV
     
115.   module Video
     
116.   #--------------------------------------------------------------------------
     
117.   # 设定部分
     
118.   #--------------------------------------------------------------------------
     
119.     # 视频放在"Videos"文件夹中.
     
120.     DIR_NAME = "Videos"
     
121.     # 停止视频的按键
     
122.     EXIT_INPUT  = Input::B
     
123.     # 暂停视频的按键
     
124.     PAUSE_INPUT = Input::C
     
125.     # 是否无视标题。如果你的标题中有类似é这样奇怪的字符，请设定为true
     
126.     IGNORE_TITLE = true
     
127.   #--------------------------------------------------------------------------
     
128.   # End Configuration
     
129.   #--------------------------------------------------------------------------
     
130.   end
     
131. end
     
132. 
     
133. module SceneManager
     
134. ################ 标题视频设定 #######################  
     
135. 
     
136.   @video_title = nil  # 如果要播放标题视频，请把nil改为"视频文件名"  
     
137.   
     
138. ################ END CONFIGURATION ##########################################  
     
139.   def self.run
     
140.     DataManager.init
     
141.     Audio.setup_midi if use_midi?
     
142.     if @video_title != nil
     
143.     video = Cache.video(@video_title)
     
144.     video.exitable = true # True/False
     
145.     video.pausable = true # True/False
     
146.     Video.play(video)
     
147.     end
     
148.     @scene = first_scene_class.new
     
149.     @scene.main while @scene
     
150.   end
     
151. end
     
152. 
     
153. class << Graphics
     
154.   def Graphics.fullscreen? # Property
     
155.     screen_size = Win32API.new('user32', 'GetSystemMetrics', 'I', 'I')
     
156.     screen_width = screen_size.call(0);   screen_height = screen_size.call(1)   
     
157.     detect_fullscreen = false
     
158.     detect_fullscreen = true if screen_width == 640 and screen_height == 480
     
159.     return detect_fullscreen
     
160.   end
     
161.   def Graphics.toggle_fullscreen # Main function
     
162.     keybd = Win32API.new 'user32.dll', 'keybd_event', ['i', 'i', 'l', 'l'], 'v'
     
163.     keybd.call(0xA4, 0, 0, 0)
     
164.     keybd.call(13, 0, 0, 0)
     
165.     keybd.call(13, 0, 2, 0)
     
166.     keybd.call(0xA4, 0, 2, 0)   
     
167.   end
     
168. end
     
169. 
     
170. #==============================================================================
     
171. # Import
     
172. #------------------------------------------------------------------------------
     
173. $imported = {} if $imported == nil
     
174. $imported['Videos'] = true
     
175. #==============================================================================
     
176. 
     
177. #==============================================================================
     
178. # ** SOV::Video::Commands
     
179. #==============================================================================
     
180. 
     
181. module SOV::Video::Commands
     
182.   #--------------------------------------------------------------------------
     
183.   # * Play a video
     
184.   #  filename : video's filename (with or without extension)
     
185.   #  exitable : Can the video be exited
     
186.   #  pausable : Can the video be paused
     
187.   #--------------------------------------------------------------------------
     
188.   def play_video(filename,exitable=true,pausable=true)
     
189.     video = Cache.video(filename)
     
190.     video.exitable = exitable
     
191.     video.pausable = pausable
     
192.     $game_map.video = video
     
193.   end
     
194.   #---------------------------------------------------------------------------
     
195.   # Define as module function
     
196.   #---------------------------------------------------------------------------
     
197.   module_function :play_video
     
198. end
     
199. 
     
200. #==============================================================================
     
201. # ** SOV::Video::Regexp
     
202. #==============================================================================
     
203. 
     
204. module SOV::Video::Regexp
     
205.   #--------------------------------------------------------------------------
     
206.   # * Skill
     
207.   #--------------------------------------------------------------------------
     
208.   module Skill
     
209.     FILENAME   = /<video[_ ]?(?:file)?name = "(.+)">/i
     
210.     PAUSABLE   = /<video[_ ]?paus(?:e|able) = (t|f)>/i
     
211.     EXITABLE   = /<video[_ ]?exit(?:able)? = (t|f)>/i
     
212.   end
     
213. end
     
214. 
     
215. #==============================================================================
     
216. # ** SOV::Game
     
217. #==============================================================================
     
218. 
     
219. module SOV::Game
     
220.   #--------------------------------------------------------------------------
     
221.   # Constants
     
222.   #--------------------------------------------------------------------------
     
223.   INI = 'Game'
     
224.   #--------------------------------------------------------------------------
     
225.   # * Get the game windows handle
     
226.   #--------------------------------------------------------------------------
     
227.   def self.hwnd
     
228.     unless defined?(@@hwnd)
     
229.       find_window = Win32API.new('user32','FindWindow','pp','i')
     
230. #      @@hwnd = find_window.call('RGSS Player',title)  
     
231.       gamefullscreen = Graphics.fullscreen?
     
232.       @@hwnd = find_window.call('RGSS Player',title)  
     
233.     end
     
234.     return @@hwnd
     
235.   end
     
236.   #--------------------------------------------------------------------------
     
237.   # * Get game title
     
238.   #--------------------------------------------------------------------------
     
239.   def self.title
     
240.     unless defined?(@@title)
     
241.       @@title = read_ini('title')
     
242.     end
     
243.     return @@title
     
244.   end
     
245.   #--------------------------------------------------------------------------
     
246.   # * Read ini (Returns nil or match)
     
247.   #--------------------------------------------------------------------------
     
248.   def self.read_ini(variable,filename=INI)
     
249.     return nil if variable == 'title' && SOV::Video::IGNORE_TITLE
     
250.     reg = /^#{variable}=(.*)$/
     
251.     File.foreach(filename+'.ini') { |line| break($1) if line =~ reg }
     
252.   end
     
253. end
     
254. 
     
255. #==============================================================================
     
256. # ** Cache
     
257. #==============================================================================
     
258. 
     
259. module Cache
     
260.   #--------------------------------------------------------------------------
     
261.   # Class Variables
     
262.   #--------------------------------------------------------------------------
     
263.   @@vcache = {}
     
264.   #--------------------------------------------------------------------------
     
265.   # Define as class methods
     
266.   #--------------------------------------------------------------------------
     
267.   class << self
     
268.     #------------------------------------------------------------------------
     
269.     # Alias List
     
270.     #------------------------------------------------------------------------
     
271.     alias sov_video_clear clear unless $@
     
272.     #------------------------------------------------------------------------
     
273.     # * Get a video object
     
274.     #  filename : basename of file
     
275.     #------------------------------------------------------------------------
     
276.     def video(filename)
     
277.       # Get full filename if extension is missing
     
278.       if File.extname(filename) == ''
     
279.         files = Dir["#{SOV::Video::DIR_NAME}/#{filename}.*"]
     
280.         filename = File.basename(files[0]) # Set as first matching file
     
281.       end
     
282.       # Create or get the video object.
     
283.       if @@vcache.has_key?(filename)
     
284.         @@vcache[filename]
     
285.       else
     
286.         @@vcache[filename] = Video.new(filename)
     
287.       end
     
288.     end
     
289.     #------------------------------------------------------------------------
     
290.     # * Clear
     
291.     #------------------------------------------------------------------------
     
292.     def clear
     
293.       @@vcache.clear
     
294.       sov_video_clear
     
295.     end
     
296.   end
     
297. end
     
298. 
     
299. #==============================================================================
     
300. # ** RPG::Skill
     
301. #==============================================================================
     
302. 
     
303. class RPG::UsableItem
     
304.   #--------------------------------------------------------------------------
     
305.   # * Determine if skill has a video skill
     
306.   #--------------------------------------------------------------------------
     
307.   def video
     
308.     if @video == nil
     
309.       @note.each_line { |line|
     
310.         if @video == nil
     
311.           @video = Cache.video($1) if line =~ SOV::Video::Regexp::Skill::FILENAME
     
312.         else
     
313.           @video.pausable = ($1 == 't') if line =~ SOV::Video::Regexp::Skill::PAUSABLE
     
314.           @video.exitable = ($1 == 't') if line =~ SOV::Video::Regexp::Skill::EXITABLE
     
315.         end
     
316.       }
     
317.       @video = :invalid if @video == nil
     
318.     end
     
319.     return @video
     
320.   end
     
321. end
     
322. 
     
323. #==============================================================================
     
324. # ** Video
     
325. #------------------------------------------------------------------------------
     
326. #  Class handling playing videos.
     
327. #==============================================================================
     
328. 
     
329. class Video
     
330.   #--------------------------------------------------------------------------
     
331.   # Constants
     
332.   #--------------------------------------------------------------------------
     
333.   TYPE_AVI  = 'avivideo'
     
334.   TYPE_MPEG = 'mpegvideo'
     
335.   #--------------------------------------------------------------------------
     
336.   # Class Variables
     
337.   #--------------------------------------------------------------------------
     
338.   @@default_x = 0
     
339.   @@default_y = 0
     
340.   @@default_width  = Graphics.width
     
341.   @@default_height = Graphics.height
     
342.   @@fullscreen = false
     
343.   #--------------------------------------------------------------------------
     
344.   # * Get and Set default_x/y/width/height
     
345.   #--------------------------------------------------------------------------
     
346.   for d in %w(x y width height)
     
347.     # Define setter method
     
348.     module_eval(%Q(def self.default_#{d}=(i); @@default_#{d} = i; end))
     
349.     # Define getter method
     
350.     module_eval(%Q(def self.default_#{d}; @@default_#{d}; end))
     
351.   end
     
352.   #--------------------------------------------------------------------------
     
353.   # * Get fullscreen
     
354.   #--------------------------------------------------------------------------
     
355.   def self.fullscreen
     
356.     @@fullscreen
     
357.   end  
     
358.   #--------------------------------------------------------------------------
     
359.   # * Set fullscreen
     
360.   #--------------------------------------------------------------------------
     
361.   def self.fullscreen=(val)
     
362.     @@fullscreen = val
     
363.   end
     
364.   #--------------------------------------------------------------------------
     
365.   # * Win32API
     
366.   #--------------------------------------------------------------------------
     
367.   @@mciSendStringA = Win32API.new('winmm','mciSendStringA','pplp','i')
     
368.   #--------------------------------------------------------------------------
     
369.   # * Video Command
     
370.   #  command_string : string following mci_command_string format
     
371.   #  buffer : string to retrieve return data
     
372.   #  buffer_size : number of characters in buffer
     
373.   #  callback_handle : handle of window to callback to. Used if notify is used
     
374.   #                    in the command string. (Not supported by game window)
     
375.   #--------------------------------------------------------------------------
     
376.   def self.send_command(cmnd_string,buffer='',buffer_size=0,callback_handle=0)
     
377.     # Returns error code. No error if NULL
     
378.     err = @@mciSendStringA.call(cmnd_string,buffer,buffer_size,callback_handle)
     
379.     if err != 0
     
380.       buffer = ' ' * 255
     
381.       Win32API.new('winmm','mciGetErrorString','LPL','V').call(err,buffer,255)
     
382.       raise(buffer.squeeze(' ').chomp('\000'))
     
383.     end
     
384.   end
     
385.    
     
386.   #--------------------------------------------------------------------------
     
387.   # * Play a video
     
388.   #--------------------------------------------------------------------------
     
389.   def self.play(video)
     
390.     # Make path and buffer
     
391.     path = "#{SOV::Video::DIR_NAME}/#{video.filename}"
     
392.     buffer = ' ' * 255
     
393.     # Initialize device and dock window with game window as parent.
     
394.     type = " type #{video.type}" if video.type != ''
     
395.     send_command("open #{path}#{type} alias VIDEO style child parent #{SOV::Game.hwnd}")
     
396.     # Display video in client rect at x,y with width and height.
     
397.     x = video.x
     
398.     y = video.y
     
399.     width  = video.width
     
400.     height = video.height
     
401.     send_command("put VIDEO window at #{x} #{y} #{width} #{height}")
     
402.     # Begin playing video
     
403.     screen = @@fullscreen ? 'fullscreen' : 'window'
     
404.     gamefullscreen = Graphics.fullscreen?
     
405.     case video.type
     
406.     when "avivideo"
     
407.       if gamefullscreen == true
     
408.       #send_command("put VIDEO window at #{x} #{y} 640 480")
     
409.       Graphics.toggle_fullscreen
     
410.       send_command("play VIDEO window")
     
411.       else
     
412.       send_command("play VIDEO window")
     
413.       end
     
414.     when "mpegvideo"
     
415.         if gamefullscreen == true
     
416.         Graphics.toggle_fullscreen
     
417.         send_command("play VIDEO window")
     
418.         else
     
419.         send_command("play VIDEO fullscreen")
     
420.         end
     
421.     else
     
422.     end
     
423.     flag = 0
     
424.     # Start Input and status processing loop
     
425.     while buffer !~ /^stopped/
     
426.       # Idle processing for a frame
     
427.       sleep(1.0/Graphics.frame_rate)
     
428.       # Get mode string
     
429.       send_command('status VIDEO mode',buffer,255)
     
430.       Input.update   
     
431.       if Input.trigger?(SOV::Video::PAUSE_INPUT) and video.pausable?
     
432.         Sound.play_cursor
     
433.         if buffer =~ /^paused/                 # If already paused
     
434.           send_command("resume VIDEO")         # Resume video
     
435.         else                                   # Otherwise
     
436.           send_command("pause VIDEO")          # Pause video
     
437.         end
     
438.       elsif Input.trigger?(SOV::Video::EXIT_INPUT) and video.exitable?
     
439.         Sound.play_cancel
     
440.         # Terminate loop on exit input
     
441.         break
     
442.       end
     
443.     end
     
444.     # Terminate the device
     
445.     send_command('close VIDEO')
     
446.   end
     
447.   #--------------------------------------------------------------------------
     
448.   # Public Instance Variables
     
449.   #--------------------------------------------------------------------------
     
450.   attr_accessor :x
     
451.   attr_accessor :y
     
452.   attr_accessor :width
     
453.   attr_accessor :height
     
454.   attr_writer :exitable
     
455.   attr_writer :pausable
     
456.   attr_reader :filename
     
457.   #--------------------------------------------------------------------------
     
458.   # * Initialize
     
459.   #--------------------------------------------------------------------------
     
460.   def initialize(filename)
     
461.     unless FileTest.file?("#{SOV::Video::DIR_NAME}/#{filename}")
     
462.       raise(Errno::ENOENT,filename)
     
463.     end
     
464.     @filename = filename
     
465.     @x = @@default_x
     
466.     @y = @@default_y
     
467.     @width  = @@default_width
     
468.     @height = @@default_height
     
469.     @exitable = true
     
470.     @pausable = true
     
471.   end
     
472.   #--------------------------------------------------------------------------
     
473.   # * Get Type
     
474.   #--------------------------------------------------------------------------
     
475.   def type
     
476.     if @type == nil
     
477.       case File.extname(@filename)
     
478.       when '.avi'; @type = TYPE_AVI
     
479.       when '.mpeg'||'.mpg'; @type = TYPE_MPEG
     
480.       else
     
481.         @type = TYPE_MPEG#''
     
482.       end
     
483.     end
     
484.     @type
     
485.   end
     
486.   #--------------------------------------------------------------------------
     
487.   # * Is the video exitable?
     
488.   #--------------------------------------------------------------------------
     
489.   def exitable?
     
490.     @exitable
     
491.   end
     
492.   #--------------------------------------------------------------------------
     
493.   # * Is the video pausable?
     
494.   #--------------------------------------------------------------------------
     
495.   def pausable?
     
496.     @pausable
     
497.   end
     
498.   #--------------------------------------------------------------------------
     
499.   # Access
     
500.   #--------------------------------------------------------------------------
     
501.   private_class_method :send_command  
     
502. end
     
503. 
     
504. #==============================================================================
     
505. # ** Game_Interpreter
     
506. #==============================================================================
     
507. 
     
508. class Game_Interpreter
     
509.   #--------------------------------------------------------------------------
     
510.   # Import
     
511.   #--------------------------------------------------------------------------
     
512.   include(SOV::Video::Commands)
     
513. end
     
514. 
     
515. #==============================================================================
     
516. # ** Game_Map
     
517. #==============================================================================
     
518. 
     
519. class Game_Map
     
520.   #--------------------------------------------------------------------------
     
521.   # Public Instance Variables
     
522.   #--------------------------------------------------------------------------
     
523.   attr_accessor :video  
     
524. end
     
525. 
     
526. #==============================================================================
     
527. # ** Scene_Map
     
528. #==============================================================================
     
529. 
     
530. class Scene_Map
     
531.   #--------------------------------------------------------------------------
     
532.   # Alias List
     
533.   #--------------------------------------------------------------------------
     
534.   alias sov_video_update update unless $@
     
535.   #--------------------------------------------------------------------------
     
536.   # * Play Video
     
537.   #--------------------------------------------------------------------------
     
538.   def play_video(video)
     
539.     # Memorize and stop current bgm and bgs
     
540.     bgm = RPG::BGM.last
     
541.     bgs = RPG::BGS.last
     
542.     RPG::BGM.stop
     
543.     RPG::BGS.stop
     
544.     # Play video
     
545.     Video.play(video)
     
546.     # Restart bgm and bgs
     
547.     bgm.play
     
548.     bgs.play
     
549.   end
     
550.   #--------------------------------------------------------------------------
     
551.   # * Update
     
552.   #--------------------------------------------------------------------------
     
553.   def update
     
554.     if $game_map.video != nil
     
555.       play_video($game_map.video)
     
556.       $game_map.video = nil
     
557.       Input.update
     
558.     else
     
559.       sov_video_update
     
560.     end
     
561.   end
     
562. end
     
563. 
     
564. #==============================================================================
     
565. # ** Scene_Battle
     
566. #==============================================================================
     
567. 
     
568. class Scene_Battle
     
569.   #--------------------------------------------------------------------------
     
570.   # * Alias list
     
571.   #--------------------------------------------------------------------------
     
572.   alias sov_video_update_battle update unless $@
     
573.   alias sov_video_use_item use_item unless $@
     
574.   #--------------------------------------------------------------------------
     
575.   # * Play Video
     
576.   #--------------------------------------------------------------------------
     
577.   def play_video(video)
     
578.     # Memorize and stop current bgm
     
579.     bgm = RPG::BGM.last
     
580.     RPG::BGM.stop
     
581.     # Play video
     
582.     Video.play(video)
     
583.     # Restart bgm
     
584.     bgm.play
     
585.   end
     
586.   #--------------------------------------------------------------------------
     
587.   # * Execute Action Skill
     
588.   #--------------------------------------------------------------------------
     
589.   def use_item
     
590.     skill = @subject.current_action.item   
     
591.     if skill.video.is_a?(Video)
     
592.       execute_action_video(skill)
     
593.       sov_video_use_item
     
594.     else
     
595.       sov_video_use_item
     
596.     end
     
597.   end
     
598.   #--------------------------------------------------------------------------
     
599.   # * Execute Action Video
     
600.   #--------------------------------------------------------------------------
     
601.   def execute_action_video(skill)
     
602.     br = Graphics.brightness
     
603.     120.times { |i| Graphics.brightness = 255 - 255/60 * i; Graphics.update }
     
604.     # Play video
     
605.     play_video(skill.video)
     
606.     # Reset brightness
     
607.     Graphics.brightness = br
     
608.   end
     
609.   #ADDED UPDATE FUNCTION FROM SCENE_MAP TO SCENE_BATTLE
     
610.   def update
     
611.     if $game_map.video != nil
     
612.       play_video($game_map.video)
     
613.       $game_map.video = nil
     
614.       Input.update
     
615.     else
     
616.       sov_video_update_battle
     
617.     end
     
618.   end
     
619.   
     
620. end
     
621. 
     
622. 
     
623. 
     
624. 
     
625. 
     
626. #==============================================================================
     
627. # Pre-Main Processing
     
628. #==============================================================================
     
629. 
     
630. unless FileTest.directory?(SOV::Video::DIR_NAME) # If directory doesn't exist.
     
631.   Dir.mkdir(SOV::Video::DIR_NAME)                # Make the directory
     
632. end
     
633. 
     
634. =begin
     
635. =end

复制代码