静物2 汉化分析专用贴

shane007

老外放出了一个静物2数据文件样本。
http://rs706.rapidshare.com/files/216482719/Sl2data.zip
有巳さ呐笥芽梢匝芯恳幌隆?
& Q' X; E3 L9 H- c& Z
--------------------------------------------------
2009.4.4 第1次更新
老外放出了静物2包文件的异或key,据说解密以后文件的格式很简单。
2923BE84E16CD6AE529049F1F1BBE9EB
) R  a$ l, k. d7 K: O
--------------------------------------------------
2009.4.4 第2次更新
0 p0 O2 o0 f& W. X- e) A测试了一下上面的异或key，结果正确。解密后的文件为不压缩的简单格式包文件。
# e, @" x4 e5 f放上异或解密工具，在工具包里有一个例子，异或key就在key.txt中。
% q5 o8 W) `* q
--------------------------------------------------
2009.4.4 第3次更新
- B) L+ }# Z5 p0 q9 M) b静物2采用wild-dna公司开发的3D引擎。网址如下。
7 \1 o2 f* t( u& c: H) L% A, j* j- Chttp://www.wild-dna.com/main.html
& Q: W' s. C# K$ N2 ohttp://www.gamecostudios.com/xcengine.html
7 S- D" ?! L' l! E- t' h4 l' M
--------------------------------------------------
1 ~* e! a$ W' H2009.4.8 更新
% S. J9 A$ w' }. g4 a老外公布了静物2包文件的格式。
0x04 //"GMGB"
' ^# X; O+ u9 S% Y. q0x04 //Number of files
& r0 }- W) p2 P! }
& V: J8 k, K) F' Lfor each file {

0xX path and filename
1 c3 A( y" L, W( t  c! x0x01 0x00
1 r) }( u1 _. ^9 x" \: C0x04 file length
' Q, h8 L6 [! `0 K. ~/ I3 J+ R6 n0x01 0x00
}
2 p) ?  w+ T' m5 {. Y
. m: {1 {3 x1 @# P" p--------------------------------------------------
) c, m( z' o7 a  T2009.4.17 更新
' Q( R3 G' h3 T) {) P( U) D老外动作很快，通用解包器quickbms发布以后很快发布了静物2的解包脚本。
用法如下
quickbms.exe stillife2.bms c:\Sl2data.dat c:\folder
8 U+ _/ Q3 _2 Y- X& p  Y
2 @& `% G& G$ A' v1 H--------------------------------------------------
: h5 Q0 h" A6 j& k" O1 V/ H) b2009.5.16 更新
0 V; u# `- k) L; i8 U4 @4 t最近又有一些细小但是可能比较重要的发现。
用filemon跟踪了一下发现这个游戏支持读取解包后的字体文件Sl2fnt.dat。
; P# O" ?* t, v; z# I第2个发现可能很重要，我把Sl2fnt.dat改名后发现游戏竟然能正常运行，此时使用了一种奇怪的字体。此种字体和原来的字体明显不同，并且显示有些不正常。我怀疑是某种系统的TTF字体被强制用不正确的参数显示而导致的。如果真是这样的话，我们无疑看到了一丝汉化的曙光。
; d7 J# G" Y. p# m. S弄清楚这谜一般的字体来源是接下去要研究的课题。
下面是此字体画面抓图。

+ O( y* ?1 W. t2 J8 i
--------------------------------------------------
2009.6.26 更新
8 D  q; o" N" s+ H经过老外的分析，把Sl2fnt.dat文件删除以后，游戏会自动寻找系统字体arial.tff。
老外还放上了清晰的抓图。就是说我们目前已经可以把静物2转化为一个使用TTF字库的游戏，如果有办法HOOK显示函数的话，也许可以用比较简单的方法实现汉化。
放上抓图
% G  R, L0 j5 K1 m- B  r& [
  Y7 A" L! P0 A
--------------------------------------------------
) R$ e! C1 y9 t2 l2 U" K% }2009.6.27 更新
" D$ j& J% H! P. c1 G我在另一台电脑上试验了一下，可以显示出正常的英文。
( S5 M2 g; |% S我用上面的异或工具解密了字幕文件Sl2data.dat，然后写入一个中文字，再用异或工具异或一次。发现只有这个字的低字节被显示出来，高字节被过滤了。
9 H7 [! u* K8 T3 m% a我觉得分析到这里基本可以知道实现汉化的方法了，就是用OD分析一下，找到那个过滤点，使游戏一下子读取2个字节，这样游戏应该就能显示出中文。
; t2 c# b: ~; r5 n5 m肥牛如果有时间的话，希望能尝试一下。拜托了。
# K$ \5 @8 |) ]" T3 Z需要修改的可能是xcEngine.dll这个文件。

. P; W8 X0 c' }) [( h抓图如下，显示出来的是 汉 这个字的低字节部分

# m* G5 g! {& i
--------------------------------------------------
2010.2.2 更新
我电脑上的静物2，在一开场2人打完电话以后，就会崩溃。
6 X: L4 {3 L# b. `. v$ e0 x研究了一段时间，发现可能是我显卡较老，只有128M显存的缘故。
1 [, M  l1 c; r8 t* j  {把option的Shadow Quality改为low以后，解决了上述的崩溃问题。

shane007

2009.4.4 更新

shane007

2009.4.8 更新

firendless

又来异或...还是数组操作吧,没有用IDE...007老大检查咯
那个提取的方法还是和之前那个riper一样就可以了吧

2. Private Const cKey As String = "2923BE84E16CD6AE529049F1F1BBE9EB"
4. Private Sub cmdCommand1_Click()
6.     Dim lngFileNum As Long, lngLength   As Long, strFilePath As String, bData()     As Byte
8.     strFilePath = App.Path & "\\1.dat"
10.     lngLength = FileLen(strFilePath)
12.     lngFileNum = FreeFile
14.     If lngFileNum = 0 Then Exit Sub
16.     ReDim bData(lngLength)
18.     Open strFilePath For Binary As #lngFileNum
20.     Get #lngFileNum, 1, bData()
22.     Close #lngFileNum
24.     Dim lngIndex As Long, lngUbound As Long
26.     lngUbound = UBound(bData())
28.     Dim lngIndexB As Long, lngKey As Long
30.     For lngIndexB = 1 To 32
32.         lngKey = CHex2Dec(Mid$(cKey, lngIndexB, 1))
34.         For lngIndex = 0 To lngUbound
36.            bData(lngIndex) = bData(lngIndex) Xor lngKey
37.    
38.         Next
40.     Next
42.     strFilePath = App.Path & "\\2.dat"
44.     lngFileNum = FreeFile
46.     Open strFilePath For Binary As #lngFileNum
48.     Put #lngFileNum, 1, bData()
50.     Close #lngFileNum
51. End
52. End Sub
54. Private Function CHex2Dec(strHex As String) As Long
55. Select Case strHex
57.     Case "A": CHex2Dec = 10
58.     Case "B": CHex2Dec = 11
59.     Case "C": CHex2Dec = 12
60.     Case "D": CHex2Dec = 13
61.     Case "E": CHex2Dec = 14
62.     Case "F": CHex2Dec = 15
63.     Case Else: CHex2Dec = CLng(strHex)
65. End Select
66. End Function

复制代码

shane007

你能上传exe和源码吗？
: t& [( ?3 a+ M: R4 \论坛有防拷贝，光贴代码非法用啊

firendless

啊....我在记事本里打的....

  q5 n! U; l- U( H, x我给枫叶传过一个去防拷贝的插件...现在这台机器没有...我叫她mail你

慕容枫叶

我复制了。。。
* b: ?  Z& d4 ^6 U其实在线转帖类型的也可以。

shane007

2009.4.17 更新

田横

vista下用解包器解包时会出现“程序停止工作”错误。

shane007

我试过了，XP上没问题。