当RGE碰上RTP (让RGE读取RTP) 中文支持

david50407

某次在66上看到了一个 登录档的读取方法
便应用来写出了 让RGE读取RTP的方法
首先在最上面插入两个脚本

1. 
   
2. #================================================= =============================
   
3. # ■ String
   
4. #------------------------------------------------- -----------------------------
   
5. # 　字符串类。可处理任意长度的字节串。 （追加编码转换的定义）
   
6. #================================================= =============================
   
7. 
   
8. class String
   
9.   #------------------------------------------------- -------------------------
   
10.   # ● 用来编码Ruby 字符串、解码unicode 的两个Windows API 函数
    
11.   #------------------------------------------------- -------------------------
    
12.   @@MultiByteToWideChar = Win32API.new("kernel32", "MultiByteToWideChar", ['I', 'L', 'P', 'I', 'P', 'I'], 'I')
    
13.   @@WideCharToMultiByte = Win32API.new("kernel32", "WideCharToMultiByte", ['I', 'L', 'P', 'I', 'P', 'I', 'P', 'P'], 'I')
    
14.   #------------------------------------------------- -------------------------
    
15.   # ● 返回将Ruby UTF-8 字符串对象（本身）编码为unicode 后的字符串
    
16.   #------------------------------------------------- -------------------------
    
17.   def to_unicode
    
18.     len = @@MultiByteToWideChar.call(65001, 0, self, -1, 0, 0) << 1
    
19.     buf =" " * len
    
20.     # 65001: UTF-8 字符集编码（代码页）
    
21.     @@MultiByteToWideChar.call(65001, 0, self, -1, buf, len)
    
22.     return buf
    
23.   end
    
24.   #------------------------------------------------- -------------------------
    
25.   # ● 返回将编码为unicode 的字符串对象（本身）解码为UTF-8 后的字符串
    
26.   #------------------------------------------------- -------------------------
    
27.   def to_UTF8
    
28.     len = @@WideCharToMultiByte.call(65001, 0, self, -1, 0, 0, 0, 0)
    
29.     buf =" " * len
    
30.     @@WideCharToMultiByte.call(65001, 0, self, -1, buf, len, 0, 0)
    
31.     # 去掉'\0' 字符串结束符（因为转换之后仅仅用于Ruby 字符串）
    
32.     buf.slice!(-1, 1)
    
33.     return buf
    
34.   end
    
35. end
    

复制代码

用来支持中文

1. 
   
2. #==============================================================================
   
3. #module Ini
   
4. #==============================================================================
   
5. module Ini
   
6.   def self.readIni(item = "Title")
   
7.     buf = 0.chr * 256
   
8.     gpps = Win32API.new("kernel32","GetPrivateProfileString","pppplp","l")
   
9.     gpps.call("Game",item,"",buf,256,"./Game.ini")
   
10.     buf.delete!("\0")
    
11.     return buf
    
12.   end
    
13. end
    

复制代码

让RGE能读取 ini 设定

而 ini 档内格式如下

1. 
   
2. [Setting]
   
3. Library=RGE.dll
   
4. Scripts=Scripts.rges
   
5. Package=
   
6. [Plugin]
   
7. Sriol=default.r32
   
8. Priol=default.r32
   
9. [Game]
   
10. RTP1=Standard
    
11. RTP2=
    
12. RTP3=
    

复制代码

最多三个(当然可以自己改)

再插入一个脚本
这是精简版的Regedit模组

1. 
   
2. module Regedit
   
3.   HKEY_LOCAL_MACHINE        = 0x80000002
   
4. 
   
5.   STANDARD_RIGHTS_READ      = 0x00020000
   
6.   KEY_QUERY_VALUE           = 0x0001
   
7.   KEY_ENUMERATE_SUB_KEYS    = 0x0008
   
8.   KEY_NOTIFY                = 0x0010
   
9.   KEY_READ = STANDARD_RIGHTS_READ |
   
10.   KEY_QUERY_VALUE | KEY_ENUMERATE_SUB_KEYS | KEY_NOTIFY
    
11.   KEY_EXECUTE = KEY_READ | 0x0200 # 0x0200 : Wow64_32Node
    
12. 
    
13.   @@reg = []
    
14. 
    
15.   # 0:开启 1:寻找
    
16.   [
    
17.   %w/RegOpenKeyEx     LPLLP        L/, #0
    
18.   %w/RegQueryValueExW  LPLPPP       L/, #1
    
19.   ].each do |fn|
    
20.     @@reg << Win32API.new("advapi32.dll", *fn)
    
21.   end
    
22. 
    
23.   module_function
    
24. 
    
25.   def REG
    
26.     return @@reg
    
27.   end
    
28. 
    
29.   # 返回顶端
    
30.   def OpenKey(hkey, name, opt, desired)
    
31.     result = packdw(0)
    
32.     check self.REG[0].call(hkey, name, opt, desired, result)
    
33.     @reg_jb = unpackdw(result)
    
34.   end
    
35.   
    
36.   def QueryValue(hkey, name)
    
37.     size = [128].pack('l')
    
38.     data = '    ' * 32
    
39.     #check (self.REG[1].call(hkey, name, 0, type, 0, size), name)
    
40.     self.REG[1].call(hkey, name.to_unicode, 0, 0, data, size)
    
41.     check (data, name)
    
42.     data = data.to_UTF8
    
43.     return data
    
44.   end
    
45.   
    
46.   def check(data, name="")
    
47.     if data == '    ' * 32
    
48.       p "找不到 RTP：#{name}！"
    
49.       exit
    
50.     end
    
51.   end
    
52.   
    
53.   def packdw(dw)
    
54.     [dw].pack("V")
    
55.   end
    
56.   
    
57.   def unpackdw(dw)
    
58.     dw += [0].pack("V")
    
59.     dw.unpack("V")[0]
    
60.   end
    
61.   
    
62.   def get_jb
    
63.     return @reg_jb if @reg_jb != nil
    
64.   end
    
65. end
    

复制代码

让RGE能读取登录值

最后,压轴来了
再插入一个脚本

1. 
   
2. # RTP 数量 (对应到ini档)
   
3. $rtp_num = 3
   
4. # 读取RTP路径
   
5. def getRTPPath(rtpname)
   
6.   return "" if rtpname == "" or rtpname.nil?
   
7.   Regedit.OpenKey(Regedit::HKEY_LOCAL_MACHINE,"SOFTWARE\\Enterbrain\\RGSS\\RTP",0,Regedit::KEY_EXECUTE)
   
8.   rp = Regedit.QueryValue(Regedit.get_jb,rtpname)
   
9.   return "" if rp == "" or rp.nil?
   
10.   rp = File.expand_path(rp) + "/"
    
11.   return rp
    
12. end
    
13. 
    
14. $RTP = []
    
15. for i in 0...$rtp_num
    
16.   $RTP[i] = getRTPPath(Ini.readIni("RTP#{i.to_s}"))
    
17. end
    
18. 
    
19. # 修正路径
    
20. module RPG
    
21.   module Path
    
22.     FindFirstFile = Win32API.new("kernel32", "FindFirstFileW", "PP", "L")
    
23.     FindNextFile = Win32API.new("kernel32", "FindNextFileW", "LP", "I")
    
24.     def self.findP(*paths)
    
25.       findFileData = " " * 592
    
26.       for p in paths
    
27.         unless FindFirstFile.call(p.to_unicode, findFileData) == -1 # INVALID_HANDLE_VALUE
    
28.           return File.dirname(p) + "/" + findFileData[44, 45 + 260 * 2].to_UTF8
    
29.         end
    
30.       end
    
31.       return ""
    
32.     end
    
33.    
    
34.     @list = {}
    
35.     def self.Graphics(path)
    
36.       return @list[path] if @list.include?(path)
    
37.       check = File.extname(path).empty?
    
38.       rtp = []
    
39.       for i in 0...$rtp_num
    
40.         unless $RTP[i].empty?
    
41.           rtp.push($RTP[i] + path)
    
42.           if check
    
43.             rtp.push($RTP[i] + path + ".*")
    
44.           end
    
45.         end
    
46.       end
    
47.       pa = self.findP(*rtp)
    
48.       if pa == ""
    
49.         @list[path] = path
    
50.       else
    
51.         @list[path] = pa
    
52.       end
    
53.       return @list[path]
    
54.     end
    
55.     def self.Audio(path)
    
56.       return @list[path] if @list.include?(path)
    
57.       check = File.extname(path).empty?
    
58.       rtp = []
    
59.       for i in 0...$rtp_num
    
60.         unless $RTP[i].empty?
    
61.           rtp.push($RTP[i] + path)
    
62.           if check
    
63.             rtp.push($RTP[i] + path + ".*")
    
64.           end
    
65.         end
    
66.       end
    
67.       pa = self.findP(*rtp)
    
68.       if pa == ""
    
69.         @list[path] = path
    
70.       else
    
71.         @list[path] = pa
    
72.       end
    
73.       return @list[path]
    
74.     end
    
75.   end
    
76. end
    
77. 
    
78. # 修正路径
    
79. module RPG
    
80.   module Cache
    
81.     @cache = {}
    
82.     def self.load_bitmap(folder_name, filename, hue = 0)
    
83.       path = folder_name + filename
    
84.       path = RPG::Path::Graphics(path) #
    
85.       if not @cache.include?(path) or @cache[path].disposed?
    
86.         if filename != ""
    
87.           @cache[path] = Bitmap.new(path)
    
88.         else
    
89.           @cache[path] = Bitmap.new(32, 32)
    
90.         end
    
91.       end
    
92.       if hue == 0
    
93.         @cache[path]
    
94.       else
    
95.         key = [path, hue]
    
96.         if not @cache.include?(key) or @cache[key].disposed?
    
97.           @cache[key] = @cache[path].clone
    
98.           @cache[key].hue_change(hue)
    
99.         end
    
100.         @cache[key]
     
101.       end
     
102.     end
     
103.   end
     
104.   class Sprite < ::Sprite
     
105.     def animation_process_timing(timing, hit)
     
106.       if (timing.condition == 0) or
     
107.         (timing.condition == 1 and hit == true) or
     
108.         (timing.condition == 2 and hit == false)
     
109.         if timing.se.name != ""
     
110.           se = timing.se
     
111.           path = RPG::Path::Audio("Audio/SE/" + se.name) #
     
112.           Audio.se_play(path, se.volume, se.pitch) #
     
113.         end
     
114.         case timing.flash_scope
     
115.         when 1
     
116.           self.flash(timing.flash_color, timing.flash_duration * 2)
     
117.         when 2
     
118.           if self.viewport != nil
     
119.             self.viewport.flash(timing.flash_color, timing.flash_duration * 2)
     
120.           end
     
121.         when 3
     
122.           self.flash(nil, timing.flash_duration * 2)
     
123.         end
     
124.       end
     
125.     end
     
126.   end
     
127. end
     

复制代码

附上范例
http://www.zumodrive.com/share/8oSEZDEzNW

于 2010/11/14 12:11 更新:
    使Regedit 模块默认使用32Bit / Wow6432 的Node
    支持中文或其他 Unicode 编码的 路径
    重新上传范例

IamI

请在最后的地址上加上URL标记。
嗯还能说什么呢，膜拜。然后迅速拖走范例

后知后觉

好像没有正确获取到我的RTP路径........
路径中的汉字部分被省略了........

叶子

精华在于注册表的使用
感谢楼主

danny8376

getRTPPath(rtpname)
裡的
rp = Regedit.get_value("data")
這部分用那個轉碼的轉一下看看會不會好???

后知后觉

转码貌似我还不会- -
不过我手动把路径输入上去了 弹出来的是说 "没有找到Graphics/Windowskins/001-Blue01"
然后我把汉字路径改成字母,把手动输入的路径删除了,这个时候也是说的找不到这个文件
看来最后在获取文件的时候还是有问题呀~

david50407

請問您是不是
把$rtp_num 設成 1
如果是的話那應該是我的錯
應該把
$RTP[i] = getRTPPath(Ini.readIni("RTP#{i.to_s}"))
改成
$RTP[i] = getRTPPath(Ini.readIni("RTP#{(i+1).to_s}"))
上面已同步修正
因為RGE預設的編碼問題會把漢字給54掉
這個問題正在研究中
謝謝

david50407

更新顶帖

于 2010/11/14 12:11 更新:
    使Regedit 模块默认使用32Bit / Wow6432 的Node
    支持中文或其他 Unicode 编码的 路径
    重新上传范例