【2010/7/6更新】RMXP的对话等文本的导入导出

trentswd · 发表于 2009-9-25 21:23:22

加入我们，或者，欢迎回来。

您需要登录才可以下载或查看，没有帐号？注册会员

x

本帖最后由 trentswd 于 2010-7-6 14:33 编辑

2010/7/6更新
囧，小问题不断
第396行开始

for num in 1...mapfile.size
begin
save_data(mapfile[num],sprintf("Data/Map%03d.rxdata", num))
rescue
end

复制代码

改成

for num in 1...mapfile.size
begin
next if mapfile[num]==0
save_data(mapfile[num],sprintf("Data/Map%03d.rxdata", num))
rescue
end

复制代码

另外，根据hongqizhen的经验：

最后，由于是对付大游戏，在导入文本时的时间非常漫长，很容易就会出现“脚本已备份的提示”，建议加上夏娜的的这段代码：
http://rpg.blue/portal.php?mod=view&aid=40747

{:nm_9:} 我自己倒没有脚本备份过，不过如果出现这种情况，可以尝试这个方法

2010/7/5紧急更新
借着阿月历险记测试了一下，发现了问题所在
一个是没有考虑到事件可能处于最后一项，强制向下读取会出错
一个是没有考虑到map的文件可能会空缺，最后导致数组的id和map的id不一致

好像似乎应该也许是修正了，测试了一下没有问题，阿月历险记和范例都可以正常导入，请使用以前版本的更新：

EXIM3.zip (327.22 KB, 下载次数: 2048)

有问题欢迎反馈。

================历史版本=================
想想RM要汉化的话，还要开工程一个一个去改，不方便不说，也不方便分配任务啊润色之类的活。66和灼眼的夏娜写过的只能导入不能导出。

本来打算从头开始写的，但是在6r上发现了zh99998写的VX版本，试用了一下，感觉不错，效率和功能都有了。所以着手改写成xp版最终的结果是，导出文本用了他的框架，各种Enumerable对象堆的……实在是看的我五体投地。但是由于实际的文本不仅仅是对话导入导出，还有选择项，注释，修改主角姓名，用原来的构架我实在是写不出来（……），所以写到导入部分，思路已经完全不一样了，我用了一大堆正则表达式……

最后感觉效率差了好多（……）不过好歹是可以用，目前的功能是可以导出地图，公共事件和战斗中的对话，选项，注释和修改主角姓名的事件项中的文本，进行修改后可以导入。地图名也可以修改
脚本：使用save方法导入，使用read方法导出。导出messages.txt
。

TAB=" "*2
ENTER= "\r\n"
def read_event(list, head)
text = []
for i in 0...list.size
if list[i].code==101
text.push("#{TAB*2}<显示文章><101,#{i}>#{ENTER}#{TAB*3}#{list[i].parameters[0]}#{ENTER}")
x=i+1
loop do
if list[x].code==401
text.push("#{TAB*3}#{list[x].parameters[0]}#{ENTER}")
else
break
end
x+=1
end
end
if list[i].code==102
text.push("#{TAB*2}<选项><102,#{i},#{list[i].parameters[0].size}>#{ENTER}")
list[i].parameters[0].each do |entry|
text.push("#{TAB*3}#{entry}#{ENTER}")
end
end
if list[i].code==108
text.push("#{TAB*2}<注释><108,#{i}>#{ENTER}#{TAB*3}#{list[i].parameters[0]}#{ENTER}")
x=i+1
loop do
if list[x].code==408
text.push("#{TAB*3}#{list[x].parameters[0]}#{ENTER}")
else
break
end
x+=1
end
end
if list[i].code==320
text.push("#{TAB*2}<#{list[i].parameters[0]}号角色改名><320,#{i}>#{ENTER}#{TAB*3}#{list[i].parameters[1]}#{ENTER}")
end
end
return if text.empty?
result=head
text.each {|text| result += text }
return result
end
def read
file = File.open("messages.txt", "wb")
load_data("Data/MapInfos.rxdata").each_pair do |map_id, map|
file.write("<地图[#{map_id}][始]#{map.name}[终]>#{ENTER}")
load_data(sprintf("Data/Map%03d.rxdata", map_id)).events.each_pair {|event_id, event| event.pages.each_index {|page_id| file.write(read_event(event.pages[page_id].list, "#{TAB}<事件[#{event_id}]#{event.name}页[#{page_id+1}]>#{ENTER}"))}}
end
file.write("<全局事件>#{ENTER}")
load_data("Data/CommonEvents.rxdata").each {|command| file.write(read_event(command.list, "#{TAB}<全局事件[#{command.id}]>#{ENTER}")) if command}
file.write("<战斗>#{ENTER}")
load_data("Data/Troops.rxdata").each {|battle| battle.pages.each_index {|page_id| file.write(read_event(battle.pages[page_id].list, "#{TAB}<战斗[#{battle.id}]#{battle.name}页[#{page_id+1}]>#{ENTER}"))} if battle}
file.close
end
def save
mapid=-1
eveid=-1
pageid=-1
listid=-1
file = File.open("messages.txt")
mapinfos=load_data("Data/MapInfos.rxdata")
mapfile=[0]
num=0
for num in 1..999
begin
mapfile.push(load_data(sprintf("Data/Map%03d.rxdata", num)))
rescue
end
end
commondata = load_data("Data/CommonEvents.rxdata")
troopdata = load_data("Data/Troops.rxdata")
#file.each_line do |line|
line=file.readlines
for i in 0...line.size
line[i] = line[i].split("")[-1] #该死的编码问题……
line[i] = line[i].split("#{ENTER}")[0] #去掉换行符
if line[i]=~/\<地图\[(.*?)\]\[始\](.*?)\[终\]\>/
mapid=$1.to_i
mapname=$2
mapinfos[mapid].name=mapname
end
if line[i]=~/\<事件\[(.*?)\].*页\[(.*?)\]\>/
eveid=$1.to_i
pageid=$2.to_i
Graphics.update
end
if line[i]=~/\<显示文章\>\<101,(\d*?)\>/
listid=$1.to_i
if mapid>0
x=i+1
y=listid
mapfile[mapid].events[eveid].pages[pageid-1].list[y].parameters[0]=line[x][6,line[x].size-7]
x+=1
y+=1
loop do
if mapfile[mapid].events[eveid].pages[pageid-1].list[y].code==401
mapfile[mapid].events[eveid].pages[pageid-1].list[y].parameters[0]=line[x][6,line[x].size-7]
x+=1
y+=1
else
break
end
end
elsif mapid==-2
x=i+1
y=listid
commondata[eveid].list[y].parameters[0]=line[x][6,line[x].size-7]
x+=1
y+=1
loop do
if commondata[eveid].list[y].code==401
commondata[eveid].list[y].parameters[0]=line[x][6,line[x].size-7]
x+=1
y+=1
else
break
end
end
elsif mapid==-3
x=i+1
y=listid
troopdata[eveid].pages[pageid-1].list[y].parameters[0]=line[x][6,line[x].size-7]
x+=1
y+=1
loop do
if troopdata[eveid].pages[pageid-1].list[y].code==401
troopdata[eveid].pages[pageid-1].list[y].parameters[0]=line[x][6,line[x].size-7]
x+=1
y+=1
else
break
end
end
end
end
if line[i]=~/\<选项\>\<102,(.*?),(.*?)>/
listid=$1.to_i
count=$2.to_i
temp=[]
if mapid>0
x=i+1
y=listid+1
z=0
loop do
if mapfile[mapid].events[eveid].pages[pageid-1].list[y].code==402
mapfile[mapid].events[eveid].pages[pageid-1].list[y].parameters[1]=line[x][6,line[x].size-7]
temp.push(line[x][6,line[x].size-7])
z+=1
x+=1
y+=1
else
y+=1
end
if z==count
break
end
end
mapfile[mapid].events[eveid].pages[pageid-1].list[listid].parameters[0]=temp
elsif mapid==-2
x=i+1
y=listid+1
z=0
loop do
if commondata[eveid].list[y].code==402
commondata[eveid].list[y].parameters[1]=line[x][6,line[x].size-7]
temp.push(line[x][6,line[x].size-7])
z+=1
x+=1
y+=1
else
y+=1
end
if z==count
break
end
end
commondata[eveid].list[listid].parameters[0]=temp
elsif mapid==-3
x=i+1
y=listid+1
z=0
loop do
if troopdata[eveid].pages[pageid-1].list[y].code==402
troopdata[eveid].pages[pageid-1].list[y].parameters[1]=line[x][6,line[x].size-7]
temp.push(line[x][6,line[x].size-7])
z+=1
x+=1
y+=1
else
y+=1
end
if z==count
break
end
end
troopdata[eveid].pages[pageid-1].list[listid].parameters[0]=temp
end
end
if line[i]=~/\<注释\>\<108,(\d*?)\>/
listid=$1.to_i
if mapid>0
x=i+1
y=listid
mapfile[mapid].events[eveid].pages[pageid-1].list[y].parameters[0]=line[x][6,line[x].size-7]
x+=1
y+=1
loop do
if mapfile[mapid].events[eveid].pages[pageid-1].list[y].code==408
mapfile[mapid].events[eveid].pages[pageid-1].list[y].parameters[0]=line[x][6,line[x].size-7]
x+=1
y+=1
else
break
end
end
elsif mapid==-2
x=i+1
y=listid
commondata[eveid].list[y].parameters[0]=line[x][6,line[x].size-7]
x+=1
y+=1
loop do
if commondata[eveid].list[y].code==408
commondata[eveid].list[y].parameters[0]=line[x][6,line[x].size-7]
x+=1
y+=1
else
break
end
end
elsif mapid==-3
x=i+1
y=listid
troopdata[eveid].pages[pageid-1].list[y].parameters[0]=line[x][6,line[x].size-7]
x+=1
y+=1
loop do
if troopdata[eveid].pages[pageid-1].list[y].code==408
troopdata[eveid].pages[pageid-1].list[y].parameters[0]=line[x][6,line[x].size-7]
x+=1
y+=1
else
break
end
end
end
end
if line[i]=~/\<\d*?号角色改名\>\<320\,(.*?)\>/
listid=$1.to_i
if mapid>0
mapfile[mapid].events[eveid].pages[pageid-1].list[listid].parameters[1]=line[i+1][6,line[i+1].size-7]
elsif mapid==-2
commondata[eveid].list[listid].parameters[1]=line[i+1][6,line[i+1].size-7]
elsif mapid==-3
troopdata[eveid].pages[pageid-1].list[listid].parameters[1]=line[i+1][6,line[i+1].size-7]
end
end
if line[i]=~/\<全局事件\>/
mapid=-2
end
if line[i]=~/\<全局事件\[(.*?)\]\>/
eveid=$1.to_i
end
if line[i]=~/\<战斗\>/
mapid=-3
end
if line[i]=~/\<战斗\[(.*?)\].*?页\[(.*?)\]\>/
eveid=$1.to_i
pageid=$2.to_i
end
end
file.close
save_data(mapinfos,"Data/MapInfos.rxdata")
for num in 1...mapfile.size
begin
save_data(mapfile[num],sprintf("Data/Map%03d.rxdata", num))
rescue
end
end
save_data(commondata,"Data/CommonEvents.rxdata")
save_data(troopdata,"Data/Troops.rxdata")
end

复制代码

范例工程：

RM文本导入导出.rar (189.42 KB, 下载次数: 1724)

导出的文本示例：

<地图[1][始]MAP001[终]>
<事件[1]EV001页[1]>
<显示文章><101,0>
   实际上这是个很复杂的问题。
   月光正煌煌地照耀在我的身上。
   而狩猎的对象，自是愈多愈佳。
   那么，狩猎开始了。
<选项><102,4,4>
   你看了见过大爷吗
   还没呢
   看过了
   那是啥
<注释><108,14>
   我是注释，我没有用啦啦啦
<1号角色改名><320,15>
   阿尔东西
<全局事件>
<全局事件[1]>
<显示文章><101,0>
   我是公共事件
   真的哟
   目标是不掉用
   不调用写着干啥啊囧
<选项><102,4,4>
   丁丁是人才
   嗯……
   水镜先生！
   那是啥
<注释><108,14>
   我是注释，我在公共事件里面啦啦啦
<1号角色改名><320,15>
   阿尔东西
<战斗>
<战斗[1]幽灵*2页[1]>
<显示文章><101,0>
   幽灵是很可怜的怪嘛
   你们每次做游戏都打他
<选项><102,2,4>
   喜欢纵版
   不喜欢
   还行
   那是啥
<注释><108,12>
   我是注释，我在打幽灵啦啦啦
<1号角色改名><320,13>
   阿尔囧死

注意：尖括号内的东西不要修改，文本前面的6个空格不要修改，否则会匹配失败

凌辰 · 发表于 2009-9-25 21:24:45

收下了。楼主赞一个～

小幽的马甲 · 发表于 2009-9-26 15:44:31

猫雷德你都多久没来6R了- -

IamI · 发表于 2009-9-26 17:36:37

猫雷德你都多久没来6R了- -
小幽的马甲发表于 2009-9-26 15:44

是远古了……= =好吧我去抓走葬花的去玩玩

DeathKing · 发表于 2009-9-30 18:21:50

很好玩的样子，似乎比以前夏娜那个有爱多了

trentswd · 发表于 2010-6-19 21:38:16

本帖最后由 trentswd 于 2010-6-19 21:39 编辑

我在想要不要更新一下
脚本就不放了，我也忘的差不多了……
增加提取事件中的脚本，一般应该用不到，用得到就用这个吧

EXIM2.zip (202.3 KB, 下载次数: 322)

orochi2k · 发表于 2010-6-19 21:44:20

忽然发现软件测试课的时候随手写过一个然后丢给老师说这是自动测试代码，然后老师囧在那里半天后就彻底坏掉了

hongqizhen · 发表于 2010-6-29 14:11:13

提示: 作者被禁止或删除内容自动屏蔽

trentswd · 发表于 2010-7-5 02:29:24

很不幸，对大一点的游戏都会出错。

以我汉化的阿月历险记1瑞茵的冒险为例，导出一切正常，但是用刚导出的 ...
hongqizhen 发表于 2010-6-29 14:11

这个工具的本来目的就是用来汉化大型游戏的。在有限实践里面，几个比较大型的游戏都测试通过。
从你提供的错误消息来看，是行数不匹配。一般来说是发生在修改过程中删除了空格或者增加减少行数引起的。但是没有修改的文本导入就出现问题还是第一次遇到，有空我会下载下来查看并修正。
rm的编码是utf-8，但是转码后就可以使用非常奇怪，感谢指出
谢谢你的使用和反馈，祝你汉化顺利。

trentswd · 发表于 2010-7-5 07:40:02

很不幸，对大一点的游戏都会出错。

以我汉化的阿月历险记1瑞茵的冒险为例，导出一切正常，但是用刚导出的 ...
hongqizhen 发表于 2010-6-29 14:11

顶楼更新了，有问题请继续提出，谢谢

帐号		自动登录	找回密码
密码			注册会员

[原创发布] 【2010/7/6更新】RMXP的对话等文本的导入导出

加入我们，或者，欢迎回来。

开拓者

贵宾