发个好东西 测试编辑 VA

z2z4

  在游戏中 依然 可以编辑地图 目前我只测试地图 其他 还没试   编辑好 保存  按F7键  就可以加载到场景

1. =begin
   
2. #===============================================================================
   
3. Title: Test Edit
   
4. Author: Tsukihime
   
5. Date: Mar 9, 2013
   
6. --------------------------------------------------------------------------------
   
7. ** Change log
   
8. Mar 9, 2013
   
9.    - Initial release
   
10. --------------------------------------------------------------------------------   
    
11. ** Terms of Use
    
12. * Free to use in commercial/non-commercial projects
    
13. * No real support. The script is provided as-is
    
14. * Will do bug fixes, but no compatibility patches
    
15. * Features may be requested but no guarantees, especially if it is non-trivial
    
16. * Credits to Tsukihime in your project
    
17. * Preserve this header
    
18. --------------------------------------------------------------------------------
    
19. ** Description
    
20. 
    
21. This script allows you to edit your game while testplaying the project.
    
22. You can also reload data by pressing a button.
    
23. 
    
24. Currently you can only reload the map.
    
25. 
    
26. --------------------------------------------------------------------------------
    
27. ** Usage
    
28. 
    
29. Press F7 to reload the map.
    
30. Any changes that were made in the editor and saved will be applied.
    
31. --------------------------------------------------------------------------------
    
32. ** Credits
    
33. 
    
34. Based on FenixFyreX's test & play for VX
    
35. #===============================================================================
    
36. =end
    
37. $imported = {} if $imported.nil?
    
38. $imported["TH_TestEdit"] = true
    
39. #===============================================================================
    
40. # ** Configuration
    
41. #===============================================================================
    
42. module TH
    
43.   module Test_Edit
    
44.    
    
45.     Reload_Map_Button = :F7
    
46.     Reload_All_Button = :F8
    
47.    
    
48.     Excluded_Files = []
    
49. #===============================================================================
    
50. # ** Rest of script
    
51. #===============================================================================   
    
52. 
    
53.     #---------------------------------------------------------------------------
    
54.     # Reload almost everything. Based on FenixFyre's reload code
    
55.     #---------------------------------------------------------------------------
    
56.     def self.reload_all
    
57.       for file in (Dir.entries("Data") - [".", "..", *Excluded_Files])
    
58.         next if (file.include?("Map"))
    
59.         basename = File.basename(file, ".*").downcase!
    
60.         next if (basename == "scripts")
    
61.         eval("$data_#{basename} = load_data('Data/#{file}')")
    
62.       end
    
63.     end
    
64.    
    
65.     def self.reload_map
    
66.       $game_map.editplay_reload_map if SceneManager.scene_is?(Scene_Map)
    
67.     end
    
68.   end
    
69. end
    
70. 
    
71. class Game_Map
    
72.   def editplay_reload_map
    
73.     setup(@map_id)
    
74.     $game_player.center($game_player.x, $game_player.y)
    
75.     @need_refresh = true
    
76.     SceneManager.scene.editplay_reload_map
    
77.   end
    
78. end
    
79. 
    
80. class Scene_Map < Scene_Base
    
81.   
    
82.   def editplay_reload_map
    
83.     @spriteset.refresh_characters
    
84.   end
    
85. end
    
86. 
    
87. module SceneManager
    
88.   class << self
    
89.     alias :th_editplay_run :run
    
90.   end
    
91.   
    
92.   #-----------------------------------------------------------------------------
    
93.   #-----------------------------------------------------------------------------
    
94.   def self.run
    
95.     attach_console
    
96.     th_editplay_run
    
97.   end
    
98.   
    
99.   #-----------------------------------------------------------------------------
    
100.   # You always want a console.
     
101.   #-----------------------------------------------------------------------------
     
102.   def self.attach_console
     
103.     # Get game window text
     
104.     console_w = Win32API.new('user32','GetForegroundWindow', 'V', 'L').call
     
105.     buf_len = Win32API.new('user32','GetWindowTextLength', 'L', 'I').call(console_w)
     
106.     str = ' ' * (buf_len + 1)
     
107.     Win32API.new('user32', 'GetWindowText', 'LPI', 'I').call(console_w , str, str.length)
     
108.    
     
109.     # Initiate console
     
110.     Win32API.new('kernel32.dll', 'AllocConsole', '', '').call
     
111.     Win32API.new('kernel32.dll', 'SetConsoleTitle', 'P', '').call('RGSS3 Console')
     
112.     $stdout.reopen('CONOUT$')
     
113.    
     
114.     # Sometimes pressing F12 will put the editor in focus first,
     
115.     # so we have to remove the program's name
     
116.     game_title = str.strip
     
117.     game_title.sub! ' - RPG Maker VX Ace', ''
     
118.    
     
119.     # Set game window to be foreground
     
120.     hwnd = Win32API.new('user32.dll', 'FindWindow', 'PP','N').call(0, game_title)
     
121.     Win32API.new('user32.dll', 'SetForegroundWindow', 'P', '').call(hwnd)
     
122.   end
     
123. end
     
124. 
     
125. module Input
     
126.   class << self
     
127.     alias :th_editplay_update :update
     
128.   end
     
129.   
     
130.   def self.update
     
131.     TH::Test_Edit.reload_map if press?(TH::Test_Edit::Reload_Map_Button)
     
132.     TH::Test_Edit.reload_all if press?(TH::Test_Edit::Reload_All_Button)
     
133.     th_editplay_update   
     
134.   end
     
135. end
     
136. 
     
137. #-------------------------------------------------------------------------------
     
138. # Dispose original testplay process, make a new one
     
139. #-------------------------------------------------------------------------------
     
140. if ($TEST || $DEBUG)
     
141.   Thread.new {
     
142.     system("Game.exe debug")
     
143.   }
     
144.   sleep(0.01)
     
145.   exit
     
146. end

复制代码

7456zll

{:2_271:}楼主确定有效？反正我是没效.....

喵呜喵5

其实……直接运行游戏目录下的Game.exe，然后在编辑器中修改、保存，之后通过F12重开游戏读取存档也可以实现类似的效果…………

赛露休斯

看起来会挺方便呢，先试试了

十二面相

喵呜喵5 发表于 2013-7-29 21:00
其实……直接运行游戏目录下的Game.exe，然后在编辑器中修改、保存，之后通过F12重开游戏读取存档也可以实 ...

妙啊