Paso 1: Cifrar texto
Copie este código en el Bloc de notas y guárdelo como Encryt.bat o cualquier otra cosa con la extensión .bat
de
setlocal ENABLEDELAYEDEXPANSION ENABLEEXTENSIONS
título Encrypt
color una
: menú principal
establecer savefile = en
:: establecer Encrypt = nada
(set CHAR[a]=UDFM45) & (set CHAR[b]=H21DGF) (set CHAR[c]=FDH56D) & (set CHAR[d]=FGS546) & (set CHAR[e]=JUK4JH)
(set CHAR[f]=ERG54S) & (set CHAR[g]=T5H4FD) (set CHAR[h]=RG641G) & (set CHAR[i]=RG4F4D) & (set CHAR[j]=RT56F6)
(set CHAR[k]=VCBC3B) & (set CHAR[l]=F8G9GF) (set CHAR[m]=FD4CJS) & (set CHAR[n]=G423FG) & (set CHAR[o]=F45GC2)
(set CHAR[p]=TH5DF5) & (set CHAR[q]=CV4F6R) (set CHAR[r]=XF64TS) & (set CHAR[s]=X78DGT) & (set CHAR[t]=TH74SJ)
(set CHAR[u]=BCX6DF) & (set CHAR[v]=FG65SD) (set CHAR[w]=4KL45D) & (set CHAR[x]=GFH3F2) & (set CHAR[y]=GH56GF)
(set CHAR[z]=45T1FG) & (set CHAR[1]=D4G23D) (set CHAR[2]=GB56FG) & (set CHAR[3]=SF45GF) & (set CHAR[4]=P4FF12)
(set CHAR[5]=F6DFG1) & (set CHAR[6]=56FG4G) (set CHAR[7]=USGFDG) & (set CHAR[8]=FKHFDG) & (set CHAR[9]=IFGJH6)
(set CHAR[0]=87H8G7) & (set CHAR [& (set CHAR[#]=45FGFH) (set CHAR[$]=75FG45) & (set CHAR[*]=54GDH5)
(set CHAR[(]=45F465) y (CHAR [.] = HG56FG) & (set CHAR[,]=DF56H4) & (set CHAR[-]=F5JHFH) & (set CHAR [] = SGF4HF)
(set CHAR[\]=45GH45) y (CHAR[/]=56H45G)
echo Introduzca una cadena a cifrar:
Set /p Encrypt =
CLS
Set Encrypt2 = Encrypt %
conjunto "EncryptOut ="
: encrypt2
establecer char = % Encrypt2: ~ 0, 1%
Set Encrypt2 = % Encrypt2: ~ 1%
Set EncryptOut = % EncryptOut %! CHAR [% char]!
Si no "% Encrypt2%" =="" goto encrypt2
echo cadena de entrada: Encrypt %
echo.
echo cadena de salida: % EncryptOut %
establecer cadena = % EncryptOut %
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 "% savefile %" =="en" echo.%EncryptOut% >> %~d0%~p0encrypted.txt
echo.
Inicio http://forum.imgburn.com/index.php?/topic/21566-batch-encryption-working/
hacer una pausa
CLS
Goto mainmenu
