F12修正腳本(原版除錯)版

1. #==============================================================================
   
2. #   ** F12 Reset Fix
   
3. #   Author: Acezon
   
4. #   Date: 2 June 2013
   
5. #------------------------------------------------------------------------------
   
6. #   Version 2.1
   
7. #   - Fixed issue where game window is not in focus
   
8. #     when Console_on is set to false
   
9. #   - Now compatible with Tsuki's Test Edit script
   
10. #   Version 2.0
    
11. #   - Console option added
    
12. #   - Automatically focuses window after pressing F12
    
13. #   Version 1.1
    
14. #   - Respawning the exe was better
    
15. #   Version 1.0
    
16. #   - Initial Release
    
17. #------------------------------------------------------------------------------
    
18. #   Just credit me. Free to use for commercial/non-commercial games.
    
19. #   Thanks to Tsukihime and Cidiomar for the console scriptlet
    
20. #==============================================================================
    
21. 
    
22. $imported = {} if $imported.nil?
    
23. $imported["Acezon-F12ResetFix"] = true
    
24. 
    
25. #==============================================================================
    
26. # ** START Configuration
    
27. #==============================================================================
    
28. module Config
    
29.   Console_on = false       # duh
    
30. end
    
31. #==============================================================================
    
32. # ** END Configuration
    
33. #==============================================================================
    
34. 
    
35. alias f12_reset_fix rgss_main
    
36. def rgss_main(*args, &block)
    
37.   f12_reset_fix(*args) do
    
38.     if $run_once_f12
    
39.        #pid = spawn ($TEST ? 'Game.exe test' : 'Game')
    
40.        pid = spawn ($TEST ? 'Game.exe test' : 'Game.exe')
    
41.       # Tell OS to ignore exit status
    
42.       Process.detach(pid)
    
43.       sleep(0.01)
    
44.       exit
    
45.     end
    
46.     $run_once_f12 = true
    
47.     # Run default rgss_main
    
48.     block.call
    
49.   end
    
50. end
    
51. 
    
52. module SceneManager
    
53.   class << self
    
54.     alias :acezon_f12_first :first_scene_class
    
55.   end
    
56. 
    
57.   def self.first_scene_class
    
58.     focus_game_window
    
59.     acezon_f12_first
    
60.   end
    
61. 
    
62.   def self.focus_game_window
    
63.     # Just to prevent re-spawning the console since
    
64.     # Tsuki uses this same part in his Test Edit script
    
65.     if !$imported["TH_TestEdit"]
    
66.       # Get game window text
    
67.       console_w = Win32API.new('user32','GetForegroundWindow', 'V', 'L').call
    
68.       buf_len = Win32API.new('user32','GetWindowTextLength', 'L', 'I').call(console_w)
    
69.       str = ' ' * (buf_len + 1)
    
70.       Win32API.new('user32', 'GetWindowText', 'LPI', 'I').call(console_w , str, str.length)
    
71. 
    
72.       if Config::Console_on
    
73.         # Initiate console
    
74.         Win32API.new('kernel32.dll', 'AllocConsole', '', '').call
    
75.         Win32API.new('kernel32.dll', 'SetConsoleTitle', 'P', '').call('RGSS3 Console')
    
76.         $stdout.reopen('CONOUT)
    
77.       end
    
78.     end
    
79.   end
    
80. end

复制代码

F12 之后，main 脚本页中 rgss_main 之前的脚本都不会重新执行一遍，但是在 rgss_main 之前生成的 Bitmap 等都会被释放（dispose）

请检查是否在 rgss_main 之前生成了位图，并且没有检查是否释放。

要预先生成 Bitmap 缓存的话，可以参考这里的方法 Taroxd::Sight.shadow：
http://taroxd.github.io/rgss/%E8 ... 99%90%E5%88%B6.html