Project1

标题: VA rtp提取脚本 [打印本页]

---

作者: garfeng    时间: 2016-7-26 19:59
标题: VA rtp提取脚本


怀疑这个脚本之前有人写过，但找不到了。
自己动手吧。

因为ace的rtp有200M，全加进去太大，手动加又很麻烦。

这个脚本可以在游戏运行时，把用到的，却不存在的BGM，图片移动到游戏自己的目录下。

推荐在游戏制作整个过程中，都使用本脚本，保证每个角落要用到的图片和bgm都移过去了。
在发布前将本脚本删除。

RUBY 代码复制

#ACE rtp提取工具，by garfeng
#只能提取bgm，和图片
#请把原始rtp复制一份使用，不要使用原始的rtp路径
#因为是移动文件，而非复制。 
 
 
 
$rootDir = "../rtp/"
 
def mvBgm(bgm)
  name = bgm.name
  p name
  path = "Audio/BGM/" + name + ".ogg"
  exist = File.exist?(path)
  if !exist 
    ori = $rootDir + path
    if File.exist?(ori)
      p ori
      File.rename(ori,path)
    end
  end
end
 
def mvImg(img)
  path1 = img+".png"
  path2 = img+".jpg"
  exist = File.exist?(path1) || File.exist?(path2)
  if !exist
    ori1 = $rootDir + path1
    ori2 = $rootDir + path2
    if File.exist?(ori1)
      File.rename(ori1,path1)
    elsif File.exist?(ori2)
      file.rename(ori2,path2)
    end
  end
end
 
 
module Cache
 
  def self.normal_bitmap(path)
    mvImg(path)
    @cache[path] = Bitmap.new(path) unless include?(path)
    @cache[path]
  end
 
end
 
 
 
class Game_Map
 
  def autoplay
    if @map.autoplay_bgm
      mvBgm(@map.bgm)
    end
    @map.bgm.play if @map.autoplay_bgm
    @map.bgs.play if @map.autoplay_bgs
  end
 
end
 
 
module BattleManager
 
  def self.play_battle_bgm
    mvBgm($game_system.battle_bgm)
    $game_system.battle_bgm.play
    RPG::BGS.stop
  end
 
end
 
class Game_Vehicle < Game_Character
 
  def get_on
    @driving = true
    @walk_anime = true
    @step_anime = true
    @walking_bgm = RPG::BGM.last
    mvBgm(system_vehicle.bgm)
    system_vehicle.bgm.play
  end
 
  def get_off
    @driving = false
    @walk_anime = false
    @step_anime = false
    @direction = 4
    mvBgm(@walking_bgm)
    @walking_bgm.play
  end
 
end
 
class Scene_Title < Scene_Base
 
  def play_title_music
    mvBgm($data_system.title_bgm)
    $data_system.title_bgm.play
    RPG::BGS.stop
    RPG::ME.stop
  end
 
end
 
class Game_Interpreter
 
  def command_241
    mvBgm(@params[0])
    @params[0].play
  end
 
end

#ACE rtp提取工具，by garfeng


#只能提取bgm，和图片


#请把原始rtp复制一份使用，不要使用原始的rtp路径


#因为是移动文件，而非复制。 


 


 


 


$rootDir = "../rtp/"


 


def mvBgm(bgm)


  name = bgm.name


  p name


  path = "Audio/BGM/" + name + ".ogg"


  exist = File.exist?(path)


  if !exist 


    ori = $rootDir + path


    if File.exist?(ori)


      p ori


      File.rename(ori,path)


    end


  end


end


 


def mvImg(img)


  path1 = img+".png"


  path2 = img+".jpg"


  exist = File.exist?(path1) || File.exist?(path2)


  if !exist


    ori1 = $rootDir + path1


    ori2 = $rootDir + path2


    if File.exist?(ori1)


      File.rename(ori1,path1)


    elsif File.exist?(ori2)


      file.rename(ori2,path2)


    end


  end


end


 


 


module Cache


 


  def self.normal_bitmap(path)


    mvImg(path)


    @cache[path] = Bitmap.new(path) unless include?(path)


    @cache[path]


  end


 


end


 


 


 


class Game_Map


 


  def autoplay


    if @map.autoplay_bgm


      mvBgm(@map.bgm)


    end


    @map.bgm.play if @map.autoplay_bgm


    @map.bgs.play if @map.autoplay_bgs


  end


 


end


 


 


module BattleManager


 


  def self.play_battle_bgm


    mvBgm($game_system.battle_bgm)


    $game_system.battle_bgm.play


    RPG::BGS.stop


  end


 


end


 


class Game_Vehicle < Game_Character


 


  def get_on


    @driving = true


    @walk_anime = true


    @step_anime = true


    @walking_bgm = RPG::BGM.last


    mvBgm(system_vehicle.bgm)


    system_vehicle.bgm.play


  end


 


  def get_off


    @driving = false


    @walk_anime = false


    @step_anime = false


    @direction = 4


    mvBgm(@walking_bgm)


    @walking_bgm.play


  end


 


end


 


class Scene_Title < Scene_Base


 


  def play_title_music


    mvBgm($data_system.title_bgm)


    $data_system.title_bgm.play


    RPG::BGS.stop


    RPG::ME.stop


  end


 


end


 


class Game_Interpreter


 


  def command_241


    mvBgm(@params[0])


    @params[0].play


  end


 


end

---

作者: WQ3465802    时间: 2016-7-26 20:40
好东西。为什么不能直接复制呢。

---

作者: WQ3465802    时间: 2016-7-26 21:46


试了一下调用API可以实现复制文件

1. 
   
2. 
   
3. $rootDir = "../rtp/" #设置rtp的位置
   
4. def fileCopy(原文件,目标,覆盖=1)
   
5.   sCopy = Win32API.new('kernel32', 'CopyFileA',%(p p l), 'l')
   
6.   sCopy.call(原文件,目标,覆盖)
   
7. end
   
8. 
   
9. def mvBgm(bgm)
   
10.   name = bgm.name
    
11.   p name
    
12.   path = "Audio/BGM/" + name + ".ogg"
    
13.   exist = File.exist?(path)
    
14.   if !exist
    
15.     ori = $rootDir + path
    
16.     if File.exist?(ori)
    
17.       fileCopy(ori,path)
    
18.     end
    
19.   end
    
20. end
    
21. 
    
22. def mvImg(img)
    
23.   path1 = img+".png"
    
24.   path2 = img+".jpg"
    
25.   exist = File.exist?(path1) || File.exist?(path2)
    
26.   if !exist
    
27.     ori1 = $rootDir + path1
    
28.     ori2 = $rootDir + path2
    
29.     if File.exist?(ori1)
    
30.       fileCopy(ori1,path1)
    
31.     elsif File.exist?(ori2)
    
32.       fileCopy(ori2,path2)
    
33.     end
    
34.   end
    
35. end
    
36. 
    
37. 
    
38. module Cache
    
39. 
    
40.   def self.normal_bitmap(path)
    
41.     mvImg(path)
    
42.     @cache[path] = Bitmap.new(path) unless include?(path)
    
43.     @cache[path]
    
44.   end
    
45. 
    
46. end
    
47. 
    
48. 
    
49. 
    
50. class Game_Map
    
51. 
    
52.   def autoplay
    
53.     if @map.autoplay_bgm
    
54.       mvBgm(@map.bgm)
    
55.     end
    
56.     @map.bgm.play if @map.autoplay_bgm
    
57.     @map.bgs.play if @map.autoplay_bgs
    
58.   end
    
59. 
    
60. end
    
61. 
    
62. 
    
63. module BattleManager
    
64. 
    
65.   def self.play_battle_bgm
    
66.     mvBgm($game_system.battle_bgm)
    
67.     $game_system.battle_bgm.play
    
68.     RPG::BGS.stop
    
69.   end
    
70. 
    
71. end
    
72. 
    
73. class Game_Vehicle < Game_Character
    
74. 
    
75.   def get_on
    
76.     @driving = true
    
77.     @walk_anime = true
    
78.     @step_anime = true
    
79.     @walking_bgm = RPG::BGM.last
    
80.     mvBgm(system_vehicle.bgm)
    
81.     system_vehicle.bgm.play
    
82.   end
    
83. 
    
84.   def get_off
    
85.     @driving = false
    
86.     @walk_anime = false
    
87.     @step_anime = false
    
88.     @direction = 4
    
89.     mvBgm(@walking_bgm)
    
90.     @walking_bgm.play
    
91.   end
    
92. 
    
93. end
    
94. 
    
95. class Scene_Title < Scene_Base
    
96. 
    
97.   def play_title_music
    
98.     mvBgm($data_system.title_bgm)
    
99.     $data_system.title_bgm.play
    
100.     RPG::BGS.stop
     
101.     RPG::ME.stop
     
102.   end
     
103. 
     
104. end
     
105. 
     
106. class Game_Interpreter
     
107. 
     
108.   def command_241
     
109.     mvBgm(@params[0])
     
110.     @params[0].play
     
111.   end
     
112. 
     
113. end
     

复制代码

---

作者: WQ3465802    时间: 2016-11-18 23:31


本来就是你的代码。有什么更新的，你就修改发布吧，你看着办吧


(我几乎不来论坛，也就找游戏玩的时候才来看看。也不会做游戏,在论坛也就回复过2次，连这次3次)

---

作者: yjbfzz    时间: 2023-9-11 11:01
666666666666666

---

欢迎光临 Project1 (https://rpg.blue/)

Powered by Discuz! X3.1