CODE: [Copy to clipboard]
@echo off&color 9f&mode con lines=10
title 批处理加密解密工具
echo.&echo.&echo.&echo.
echo made by zw19750516
ping /n 3 127.1 >nul
cls
echo.&echo.&echo.&echo.
set /p a= 请将要处理的批处理或文本文件拖放到这里:
:select
cls
echo.&echo.&echo.&echo.
set /p b= 请选择要做何处理:(1.加密 2.解密)
if "%b%"=="1" goto change
if "%b%"=="2" goto back
cls
echo.&echo.&echo.&echo.
echo 输入无效,请返回正确输入!
ping /n 3 127.1 >nul&goto select
:change
cls
echo.&echo.&echo.&echo.
set c=change
set /p c= 请输入要生成的txt文件名(默认为change):
for /f "tokens=*" %%i in ('findstr ".*" %a%') do (
set str=%%i
setlocal enabledelayedexpansion
set str=!str:a=犇!
set str=!str:b=猋!
set str=!str:c=骉!
set str=!str:d=蟲!
set str=!str:e=麤!
set str=!str:f=毳!
set str=!str:g=淼!
set str=!str:h=掱!
set str=!str:i=焱!
set str=!str:j=垚!
set str=!str:k=煊!
set str=!str:l=烜!
set str=!str:m=煐!
set str=!str:n=焓!
set str=!str:o=烓!
set str=!str:p=焺!
set str=!str:q=瓛!
set str=!str:r=炜!
set str=!str:s=翙!
set str=!str:t=燚!
set str=!str:u=焜!
set str=!str:v=琰!
set str=!str:w=燊!
set str=!str:x=眚!
set str=!str:y=奡!
set str=!str:z=慤!
echo "!str!" >>%c%.txt rem 为了处理特殊字符"!"无耐给字符加上了双引号
endlocal
)
cls
echo.&echo.&echo.&echo.
echo 正在转换中请稳候...
ping /n 3 127.1 >nul
cls
echo.&echo.&echo.&echo.
echo 已转换加密完毕,转换后的文件为%c%.txt,
echo 请妥协保管好加密后的文件,按任意键退出。
pause >nul&goto :eof
:back
cls
echo.&echo.&echo.&echo.
set c=back
set /p c= 请输入要生成的bat文件名(默认为back):
for /f "tokens=*" %%i in ('findstr ".*" %a%') do (
set str=%%~i rem 这里可有大学问(脱去字符双引号)
setlocal enabledelayedexpansion
set str=!str:犇=a!
set str=!str:猋=b!
set str=!str:骉=c!
set str=!str:蟲=d!
set str=!str:麤=e!
set str=!str:毳=f!
set str=!str:淼=g!
set str=!str:掱=h!
set str=!str:焱=i!
set str=!str:垚=j!
set str=!str:煊=k!
set str=!str:烜=l!
set str=!str:煐=m!
set str=!str:焓=n!
set str=!str:烓=o!
set str=!str:焺=p!
set str=!str:瓛=q!
set str=!str:炜=r!
set str=!str:翙=s!
set str=!str:燚=t!
set str=!str:焜=u!
set str=!str:琰=v!
set str=!str:燊=w!
set str=!str:眚=x!
set str=!str:奡=y!
set str=!str:慤=z!
echo !str:~,-18! >>%c%.bat rem 脱掉两次替换时每行后生成的17位空格
endlocal
)
cls
echo.&echo.&echo.&echo.
echo 正在转换中请稳候...
ping /n 3 127.1 >nul
cls
echo.&echo.&echo.&echo.
echo 已解密完毕,解密后的文件为%c%.bat,按任意键退出。
pause >nul&goto :eof
[