Paso 2: Texto de descifrar
Guardar este archivo por lotes como Decrypt.bat o cualquier otra cosa con la extensión .bat
de
setlocal ENABLEDELAYEDEXPANSION ENABLEEXTENSIONS
Descifrar el título
color una
: menú principal
establecer savefile = en
:: conjunto Decrypt = nada
(set CHAR[UDFM45]=a) & (set CHAR[H21DGF]=b) (set CHAR[FDH56D]=c) & (set CHAR[FGS546]=d) & (set CHAR[JUK4JH]=e)
(set CHAR[ERG54S]=f) & (set CHAR[T5H4FD]=g) (set CHAR[RG641G]=h) & (set CHAR[RG4F4D]=i) & (set CHAR[RT56F6]=j)
(set CHAR[VCBC3B]=k) & (set CHAR[F8G9GF]=l) (set CHAR[FD4CJS]=m) & (set CHAR[G423FG]=n) & (set CHAR[F45GC2]=o)
(set CHAR[TH5DF5]=p) & (set CHAR[CV4F6R]=q) (set CHAR[XF64TS]=r) & (set CHAR[X78DGT]=s) & (set CHAR[TH74SJ]=t)
(set CHAR[BCX6DF]=u) & (set CHAR[FG65SD]=v) (set CHAR[4KL45D]=w) & (set CHAR[GFH3F2]=x) & (set CHAR[GH56GF]=y)
(set CHAR[45T1FG]=z) & (set CHAR[D4G23D]=1) (set CHAR[GB56FG]=2) & (set CHAR[SF45GF]=3) & (set CHAR[P4FF12]=4)
(set CHAR[F6DFG1]=5) & (set CHAR[56FG4G]=6) (set CHAR[USGFDG]=7) & (set CHAR[FKHFDG]=8) & (set CHAR[IFGJH6]=9)
(set CHAR[87H8G7]=0) & (set CHAR [G25GHF] = & (set CHAR[45FGFH]=#) (set CHAR[75FG45]=$) & (juego CHAR[54GDH5]=*)
(set CHAR[45F465]=() & (set CHAR[HG56FG]=.) & (set CHAR[DF56H4]=,) & (set CHAR[F5JHFH]=-) & (set CHAR [SGF4HF] =)
(set CHAR[45GH45]=\) y (CHAR[56H45G]=/)
echo Introduzca una cadena para descifrar:
Set /p Decrypt =
CLS
Set Decrypt2 = descifrar %
conjunto "DecryptOut ="
: decrypt2
establecer char = % Decrypt2: ~ 0, 6%
Set Decrypt2 = % Decrypt2: ~ 6%
Set DecryptOut = % DecryptOut %! CHAR [% char]!
Si no "% Decrypt2%" =="" goto decrypt2
echo cadena de entrada: % de descifrar
echo.
echo cadena de salida: % DecryptOut %
establecer cadena = % DecryptOut %
Set temp_str = % cadena %
Set str_len = 0
: lengthloop
Si define () temp_str
Set temp_str = temp_str %: ~ 1%
Set /A str_len += 1
Goto lengthloop)
echo.
echo cadena de salida es % str_len % caracteres!
Si echo.%D «% savefile % "==" en» ecryptOut % >> %~d0%~p0decrypted.txt
echo.
Inicio
hacer una pausa
CLS
Goto mainmenu
