1 20 50 150 500
欢迎来到存起来软件站,找素材,搜软件,就上存起来软件站!
当前位置 >Home >脚本 >脚本下载 >批处理 >加密解密
文本文件加解密批处理代码
跳转至下载链接

脚本介绍

文本文件加解密程序
原理:使用DEBUG 脚本动态生成可执行程序对输入文件逐字节异或编码
特性:加解密互逆,多文件操作,单数字密钥

复制代码代码如下:
@echo off & setlocal & chcp 437>nul & graftabl 936>nul
if "%~1"=="" (
echo.
echo.=文本文件加解密程序 :: qzwqzw :: 2007-06-05 :: Release 7
echo.
echo.=原理:使用DEBUG 脚本动态生成可执行程序对输入文件逐字节异或编码
echo.
echo.=特性:加解密互逆,多文件操作,单数字密钥
echo.
set /p file=-请输入文件名(支持通配符,默认为 .*.txt):
set /p pass=-请输入密钥(一位0~F的十六进制数,默认为0):
echo.
) else (
set "file=%~1"
set "pass=%~2"
)
if "%file%"=="" set file=*.txt
if "%pass%"=="" set pass=0
if not exist "%file%" echo !找不到文件: "%file%" && goto end
:: 生成并执行 DEBUG 脚本,生成转换程序
echo e 100 B4 06 B2 FF CD 21 74 08 34 E%pass% 88 C2 CD 21 EB F0 C3>_codec.scr
for %%s in (rcx 11 n_codec.com w q) do echo %%s>>_codec.scr
debug <_codec.scr | find "Error">nul && echo !密钥错误: "%pass%" && goto :end
:: 搜索指定路径所有匹配文件进行转换
for %%f in ("%file%") do set "fPath=%%~dpf"
for /f "delims=" %%f in ('dir /a/b/od "%file%" 2^>nul') do (
(set "fIn=%fPath%%%f") && (set "fOut=%fPath%#%%f")
call :Codec
)
echo.
if exist _codec.* del _codec.*
if "%~0"=="%~f0" pause
goto :eof
:Codec
if exist "%fOut%" echo !已存在文件: "%fOut%" && pause && goto :eof
echo +正在转换 "%fIn%" ...
if exist _codec.com _codec.com < "%fIn%" > "%fOut%"
if not exist "%fOut%" echo !转换失败,未生成 "%fOut%" && pause

警告:运行BAT源码是一种危险的动作,如果你不熟悉,请不要尝试!

下载地址

特别说明:

本站所有资源仅供学习与参考,请勿用于商业用途,否则产生的一切后果将由您自己承担!

本站为非营利性站点,所有资源均是网上搜集或私下交流学习之用,任何涉及

商业盈利目的均不得使用,否则产生的一切后果将由您自己承担!本站仅仅提供

一个观摩学习的环境,将不对任何资源负法律责任。所有资源请在下载后24小时内删除。若无意中侵犯到您的版权利益,敬请来信联系我们。我们会在收到信息三天内给予处理!

本站提供的普通下载点可能造成多线程类的软件无法下载,建议直接点击或另存为下载!

如有侵犯您的版权,请及时联系513175919#qq.com(#换@),我们将尽快处理。

Top