@echo off %Replace Encrypt {s11ss 2007-12-5}%
if not exist "%~f1" (echo File doesn't exist!&goto :eof)
set "s=zyxwvutsrqponmlkjihgfedcba"
<"%~f0" more +25>"%~dpn1"_encrypt.bat
for /f "delims=" %%a in ('findstr /n .* "%~f1"') do (
set "var=%%a"
setlocal enabledelayedexpansion
set var=!var:*:=!
if not "!var!" equ "" (
set t=0
echo.!var!|findstr /r /c:"^*:*$">nul&&set t=1
set var=!var:%%=!
echo.!var!|findstr "">nul&&set t=1
set var=!var:=%%!
if !t! equ 0 (
for /l %%b in (0,1,25) do (
call set "n=%%s:~%%b,1%%"
for %%c in (!n!) do set "var=!var:%%c=%%-%%b%%!"
)
)
)
(echo.!var!)>>"%~dpn1"_encrypt.bat
endlocal
)
goto :eof
@echo off
set "s=zyxwvutsrqponmlkjihgfedcba"
for /l %%a in (0,1,25) do call set -%%a=%%s:~%%a,1%%
set "s="
echo on
