求助代码迷惑支持中文的方法[已解决]

半芯竹

#PRE_Run_Obfuscator=y                                        ;代码迷惑
MsgBox(0, "AutoIt中文论坛", 'AutoIt中文论坛欢迎你,Welcome!')

生成EXE文件之后，只显示英文，中文不显示，就算加 Local 和DIM 先定义内容也一样不显示。
如果在INI文件里定义内容的话，再使用INIREAD读取调用后，可以正常显示中文。
希望有更好的办法增加对中文的支持。

gzh888666

这个是硬伤呀！AU3代码迷惑开发的时候没有考虑中文问题，所以基本上只能等更新了。

happytc

生成EXE文件之后，只显示英文，中文不显示，就算加 Local 和DIM 先定义内容也一样不显示。
如果在INI文件 ...
半芯竹 发表于 2012-1-17 00:51

这个现在不支持的
看了开发作者言，基本上后续版本也没有把支持象中文这样的语言包含在Todo之内

所以最好的办法就是代码里不要有任何中文，都用读取Ini来代替需要的中文显示

3mile

执行以下代码,读取包含中文字符串的AU3文件.
另存为新文件后,代码迷惑,编译.

只对简单的中文字符串处理,请大家多提供点不同形态的字符串.

$file = FileOpenDialog("GBK2Bin", @ScriptDir, "Au3 File(*.au3)")
If @error Then Exit
$SoureCode = FileRead($file)
$NeedChange = StringRegExp($SoureCode, '["' & "'].*?[\x{4e00}-\x{9fa5}]+.*?[" & '"' & "']", 3)
For $i = 0 To UBound($NeedChange) - 1
        $Bin = StringToBinary(StringRegExpReplace($NeedChange[$i], '^["' & "'](.*?[\x{4e00}-\x{9fa5}]+.*?)[" & '"' & "']$", "$1"))
        $SoureCode = StringReplace($SoureCode, $NeedChange[$i], "BinaryToString('" & $Bin & "')", 1, 1)
Next

Local $var = FileSaveDialog("另存为.", @ScriptDir, "AU3脚本 (*.au3)", 2)
If Not @error Then
        If Not StringRegExp($var, '.+\.au3$', 0) Then $var = $var & ".au3"
        $fileopen = FileOpen($var, 2)
        FileWrite($fileopen, $SoureCode)
EndIf

menfan1

转成二进制的方法不错呵呵学习学习

半芯竹

回复 4# 3mile


    果然是高手，非常感谢，待晚上再试试，现在抱着小孩不方便……累啊。。。。

半芯竹

回复 4# 3mile


    -### Obfuscation Error: Found Call() statement using unsolvable Func, which will/could lead to problems running your obfuscated script.
>### current Func: _SQLite_Startup
D:\autoit3\include\SQLite.au3(208,1) Warning for line:Local $vInlineVersion = Call('__SQLite_Inline_Version')

-### Obfuscation Error: Found Call() statement using unsolvable Func, which will/could lead to problems running your obfuscated script.
>### current Func: _SQLite_GetTable2d
D:\autoit3\include\SQLite.au3(699,1) Warning for line:$iCbRval = Call($sCallBack, $aDataRow)

-### Obfuscation Error: Found Call() statement using unsolvable Func, which will/could lead to problems running your obfuscated script.
>### current Func: _SQLite_GetTable2d
D:\autoit3\include\SQLite.au3(715,1) Warning for line:$iCbRval = Call($sCallBack, $aDataRow)

-#############################################################################################
-#### Obfuscator Found   3 Error(s)!!!!    This means your script could have problems running properly.  ####
-#############################################################################################
+> Obfuscator v1.0.29.3 finished obfuscating 9450 lines, stripped 14423 comment lines. created:C:\Documents and Settings\Administrator\桌面\时间控制\new lock_Obfuscated.au3
=lock.

syhw2222

希望早日能支持中文！

txm

见解很不错，但复杂点儿的中文字符串就有些问题了，比如：
_GUICtrlEdit_AppendText($Edit9, @YEAR & "-" & @MON & "-" & @MDAY & $tecs & " " & "测试文本" & @CRLF)
转换后：
_GUICtrlEdit_AppendText($Edit9, @YEAR & BinaryToString('0x2D22202620404D4F4E202620222D22202620404D444159202620247465637320262022202220262022B2E2CAD4CEC4B1BE') & @CRLF)

一些宏也被转换了，真正要转换的就只有“测试文本”几个字就可以了，还望修正，谢谢！