字体转换脚本的问题 - Project1

module Conv
def self.c(str)
m2w = Win32API.new("kernel32","MultiByteToWideChar",'ilpipi','i')
w2m = Win32API.new("kernel32","WideCharToMultiByte",'ilpipipp','i')
lcms = Win32API.new("kernel32","LCMapString",'llpipi','i')
len = m2w.call(65001,0,str,-1,nil,0)
buf = "\0"*(len*2)
m2w.call(65001,0,str,-1,buf,len)
len = w2m.call(0,0,buf,-1,nil,0,nil,nil)
ret = "\0"*len
w2m.call(0,0,buf,-1,ret,len,nil,nil)
len = m2w.call(936,0,ret,-1,nil,0)
buf01 = "\0"*(len*2+1)
lcms.call(0x0804,0x04000000,ret,-1,buf01,len*2)
len = m2w.call(0,0,buf01,-1,nil,0)
buf = "\0" * (len*2)
m2w.call(0,0,buf01,-1,buf,len)
len = w2m.call(65001,0,buf,-1,nil,0,nil,nil)
ret = "\0" * (len-1)
w2m.call(65001,0,buf,-1,ret,len-1,nil,nil)
return ret
end
end
$t = false
class Bitmap
unless $I_LOVE_RMXP_6RWORDCONV
alias dx draw_text
def draw_text(p1, p2, p3 = 0, p4 = 3, p5 = nil, p6 = 0)
case p1
when Rect
str = Conv.c(p2)
$t ? dx(p1, str, p3) : dx(p1, p2, p3)
else
str = Conv.c(p5)
$t ? dx(p1, p2, p3, p4, str, p6) : dx(p1, p2, p3, p4, p5, p6)
end
end
$I_LOVE_RMXP_6RWORDCONV = true
end
end

复制代码

以下引用紫苏于2009-5-7 10:00:35的发言：

这个脚本直接重写了 Bitmap 的 draw_text 方法，把原来的简体字符串映射到了繁体，理论上就算重新读档也不会再次变回简体啊～
我测试了下也没有出现迅兄说的情况诶……

unless $PRAGMA_ONCE

class Scene_Save < Scene_File
  #--------------------------------------------------------------------------
  # ● 写入存档数据
  #    file : 写入用文件对像 (已经打开)
  #--------------------------------------------------------------------------
  alias write_save_data_old write_save_data if
!method_defined? :write_save_data_old
  def write_save_data(file)
   write_save_data_old(file)
   Marshal.dump($t, file)
  end
end

class Scene_Load < Scene_File
  alias read_save_data_old read_save_data if
!method_defined? :read_save_data_old
  #--------------------------------------------------------------------------
  # ● 读取存档数据
  #    file : 读取用文件对像 (已经打开)
  #--------------------------------------------------------------------------
  def read_save_data(file)
read_save_data_old(file)
$t = Marshal.load(file)
  end
end

$PRAGMA_ONCE = 1
end

unless $PRAGMA_ONCE

class Scene_Save < Scene_File
  #--------------------------------------------------------------------------
  # ● 写入存档数据
  #    file : 写入用文件对像 (已经打开)
  #--------------------------------------------------------------------------
  alias write_save_data_old write_save_data if
!method_defined? :write_save_data_old
  def write_save_data(file)
write_save_data_old(file)
File.open(File.basename(file.path) + ".rxdata", "w") {
   |fout|  Marshal.dump($t, fout)
}
  end
end

class Scene_Load < Scene_File
  alias read_save_data_old read_save_data if
!method_defined? :read_save_data_old
  #--------------------------------------------------------------------------
  # ● 读取存档数据
  #    file : 读取用文件对像 (已经打开)
  #--------------------------------------------------------------------------
  def read_save_data(file)
read_save_data_old(file)
File.open(File.basename(file.path) + ".rxdata", "r") {
   |fin|  $t = Marshal.load(fin)
}
  end
end

$PRAGMA_ONCE = 1
end