|
_SUB Cmpa-Decryptor,W340H300,【Pecmd】脚本解/加密,,#1,
ITEM Button1,L30T60W78H30,选择脚本文件,CALL Browfile
EDIT ScriptFile,L113T65W190H18,,,0x100
ITEM Button2,L50T100W100H30,解 密,CALL CmpaDecryptor
ITEM Button3,L190T100W100H30,加 密,CALL CmpsDecryptor
ITEM Button4,L50T180W100H30,关 于,MESS+icon2 \n\n文件版本:1.0.2024.1119\n\n编译文件:Pecmd.exe 2012.1.72.0@关于 【Pecmd】脚本解/加密#OK
ITEM Button5,L190T180W100H30,退 出,KILL \【Pecmd】脚本解/加密,
GROU Group0,L15T15W305H233,【Pecmd】脚本解/加密
GROU Group1,L24T35W286H110,使用CMPA/CMPS解/加密【Pecmd】脚本
GROU Group2,L24T155W286H75,帮 助
_END
_SUB Browfile
BROW EDA1,D:\*.txt;*.ini;*.wcs;*wcz,请选择一个脚本文件,*
FIND $%EDA1%<>, TEAM ENVI @ScriptFile=%EDA1%| CALL Custom| TIPS. 所选工作文件为:,%EDA1%,1000000000,1,
_END
_SUB CmpaDecryptor
FIND $%ScriptFile%=,TEAM MESS+icon1 【选择脚本文件】不能为空! @提示:#OK |EXIT 1
ENVI @Button1.Enable=0
ENVI @Button2.Enable=0
ENVI @Button3.Enable=0
ENVI @Button4.Enable=0
ENVI @Button5.Enable=0
TIPS 提示:,正在解密文件……,1000000000,1,#1
EXEC =Cmpa_Decryptor.exe %ScriptFile%
NAME -ext FileName1=%ScriptFile%
NAME FileName2=%ScriptFile%
CODE -UNICODE,%CurDir%\%FileName1%.wcs,-UTF8,%CurDir%\%FileName2%.wcs
FILE %CurDir%\%FileName1%.wcs
EXEC =!sfk.exe -yes replace -binary /00/20/ -dir . -file %FileName2%.wcs
MESS+icon2 \n\n解密工作已完成,其中:\n\n所选脚本文件为:%ScriptFile% ;\n\n解密后的脚本文件是:%CurDir%\%FileName2%.wcs (UTF8编码)。@提示:#OK
ENVI @Button1.Enable=1
ENVI @Button2.Enable=1
ENVI @Button3.Enable=1
ENVI @Button4.Enable=1
ENVI @Button5.Enable=1
CALL Reset
_END
_SUB CmpsDecryptor
FIND $%ScriptFile%=,TEAM MESS+icon1 【选择脚本文件】不能为空! @提示:#OK |EXIT 1
ENVI @Button1.Enable=0
ENVI @Button2.Enable=0
ENVI @Button3.Enable=0
ENVI @Button4.Enable=0
ENVI @Button5.Enable=0
TIPS 提示:,正在加密文件……,1000000000,1,#1
NAME -ext FileName1=%ScriptFile%
NAME FileName2=%ScriptFile%
FILE %ScriptFile%=>%CurDir%\
EXEC =!ConCmd.exe %FileName1% /o:gbk
EXEC =!sfk.exe -yes replace -binary /00/20/ -dir . -file %FileName1%
EXEC =Cmpa_Decryptor.exe CMPS %CurDir%\%FileName1% %CurDir%\%FileName2%.wcz
FILE %CurDir%\%FileName1%
MESS+icon2 \n\n加密工作已完成,其中:\n\n所选脚本文件为:%ScriptFile% ;\n\n加密后的脚本文件是:%CurDir%\%FileName2%.wcz。@提示:#OK
ENVI @Button1.Enable=1
ENVI @Button2.Enable=1
ENVI @Button3.Enable=1
ENVI @Button4.Enable=1
ENVI @Button5.Enable=1
CALL Reset
_END
// 【公共设置】
_SUB Reset
ENVI ScriptFile=
ENVI @ScriptFile=
_END
CALL @Cmpa-Decryptor |
|