Paso 1: El código
: comenzar
CLS
echo ________________________________________________________________________________
Eco de cripta - texto Encryptor/Decryptor por Sean Dobson
echo ________________________________________________________________________________
¿Set comando /p = encriptar o desencriptar? (e/d):
Si % command % == goto e ENC
Si % command % == d goto DEC
Goto MenuError
: MenuError
CLS
echo ERROR: comando % es una opción válida
hacer una pausa
Goto comenzar
: ENC
CLS
echo ________________________________________________________________________________
Eco de cripta - texto Encryptor/Decryptor por Sean Dobson
echo ________________________________________________________________________________
Set /p nombre = ingresar el nombre del archivo que desea guardar el texto (Eg. Texto):
CLS
: ENCpwd
echo ________________________________________________________________________________
Eco de cripta - texto Encryptor/Decryptor por Sean Dobson
echo ________________________________________________________________________________
Set /p texto = ingresar el texto que desea cifrar (limitan de 20 caracteres, caracteres pueden incluir [a-z] [A-z] [0-9]):
CLS
echo ________________________________________________________________________________
Eco de cripta - texto Encryptor/Decryptor por Sean Dobson
echo ________________________________________________________________________________
Cifrado de eco...
: ENC2
establecer num2 = 0
Set c =
Set /a num1 = num1% + 1
Set /a num3 = num3% + 1
Si num3% == 1 set c = % texto: ~ 0, 1%
Si num3% == 2 set c = % texto: ~ 1, 1%
Si num3% == 3 set c = % texto: ~ 2, 1%
Si num3% == 4 set c = % texto: ~ 3, 1%
Si num3% == 5 set c = % texto: ~ 4, 1%
Si num3% == 6 set c = % texto: ~ 5, 1%
Si num3% == 7 set c = % texto: ~ 6, 1%
Si num3% == 8 set c = % texto: ~ 7, 1%
Si num3% == 9 set c = % texto: ~ 8, 1%
Si num3% == 10 set c = % texto: ~ 9, 1%
Si num3% == 11 set c = % texto: ~ 10, 1%
Si num3% == 12 set c = % texto: ~ 11, 1%
Si num3% == 13 set c = % texto: ~ 12, 1%
Si num3% == 14 set c = % texto: ~ 13, 1%
Si num3% == 15 set c = % texto: ~ 14, 1%
Si num3% == 16 set c = % texto: ~ 15, 1%
Si num3% == 17 set c = % texto: ~ 16, 1%
Si num3% == 18 set c = % texto: ~ 17, 1%
Si num3% == 19 set c = % texto: ~ 18, 1%
Si num3% == 20 set c = % texto: ~ 19, 1%
Si num3% == 21 goto ENC4
: ENC3
Si num2% == 0 conjunto L =
Si num2% == 1 sistema L = un
Si num2% == 2 sistema L = b
Si num2% == conjunto 3 L = c
Si num2% == sistema 4 L = d
Si num2% == 5 set L = e
Si num2% == 6 sistema L = f
Si num2% == set 7 L = g
Si num2% == 8 sistema L = h
Si num2% == set 9 L = i
Si num2% == conjunto 10 L = j
Si num2% == 11 set L = k
Si num2% == set 12 L = l
Si num2% == 13 conjunto L = m
Si num2% == set 14 L = n
Si num2% == 15 set L = o
Si num2% == set 16 L = p
Si num2% == set 17 L = q
Si num2% == 18 set L = r
Si num2% == 19 set L = s
Si num2% == 20 sistema L = t
Si num2% == set 21 L = u
Si num2% == 22 set L = v
Si num2% == 23 set L = w
Si num2% == 24 set L = x
Si num2% == set 25 L = y
Si num2% == set 26 L = z
Si num2% == 27 set L = A
Si num2% == 28 set L = B
Si num2% == 29 set L = C
Si num2% == 30 sistema L = D
Si num2% == 31 sistema L = E
Si num2% == 32 sistema L = F
Si num2% == conjunto 33 L = G
Si num2% == conjunto 34 L = H
Si num2% == 35 conjunto L = I
Si num2% == 36 conjunto L = J
Si num2% == 37 sistema L = K
Si num2% == conjunto 38 L = L
Si num2% == conjunto 39 L = M
Si num2% == 40 conjunto L = N
Si num2% == 41 conjunto L = O
Si num2% == 42 conjunto L = P
Si num2% == conjunto 43 L = Q
Si num2% == 44 conjunto L = R
Si num2% == set 45 L = S
Si num2% == 46 set L = T
Si num2% == conjunto 47 L = U
Si num2% == set 48 L = V
Si num2% == 49 conjunto L = W
Si num2% == conjunto 50 L = X
Si num2% == conjunto 51 L = Y
Si num2% == conjunto 52 L = Z
Si num2% == conjunto 53 L = 1
Si num2% == conjunto 54 L = 2
Si num2% == conjunto 55 L = 3
Si num2% == 56 conjunto L = 4
Si num2% == set 57 L = 5
Si num2% == conjunto 58 L = 6
Si num2% == 59 set L = 7
Si num2% == 60 set L = 8
Si num2% == set 61 L = 9
Si num2% == set 62 L = 0
e Set % num1% =
Si "%c %"=="%L %" definido e % num1 = num2%
Si "%c %" =="" set num1 de e % = 0
Set /a num2 = num2% + 1
Si se ha definido e % num1% goto ENC2
Goto ENC3
: ENC4.1
Set /a Rnum = % Rnum %-1
: ENC4
Set /a Rnum = Rnum % + 1
Set rcheck =
Set rcheck2 =
Set rcheck = % azar: ~ 0, 4%
Set /a rcheck2 = % rcheck + 63
Si % rcheck % 1063 LSS goto ENC4.1
Si % rcheck2% GTR 9999 goto ENC4.1
conjunto r % Rnum = % rcheck %
Si define r20 goto ENC5
Goto ENC4
: ENC5
Set /a e1 = e1% + % r1%
Set /a e2 = e2% + % r2%
Set /a e3 = % e3% + % r3
Set /a e4 = % e4% + r4%
Set /a e5 e5% = % de r5
Set /a e6 = e6% + % r6
Set /a e7 e7% = % de r7
Set /a e8 = e8% + % de r8
Set /a e9 = e9% + % r9
Set /a e10 = e10% + % r10
Set /a e11 = e11% + % r11
Set /a e12 = e12% + % r12
Set /a e13 = e13% + % r13
Set /a e14 e14% = r14%
Set /a e15 e15% = r15%
Set /a e16 = e16% + % r16
Set /a e17 = e17% + % r17
Set /a e18 e18% = % de r18
Set /a e19 e19% = % de r19
Set /a e20 = e20% + % r20
echo % e1 %% e2 %% e3 %% e4 %% e5 %% e6 %% e7 %% e8 %% e9 %% e10 %% e11 %% e12 %% e13 %% e14 %% e15 %% e16 %% e17 %% e18 %% e19 %% e20% > "% filename%.pwd"
Eco r1% %% r2 %% r3 %% r4 %% r5 %% r6 %% r7 %% r8 %% r9 %% r10 %% r11 %% r12 %% r13 %% r14 %% r15 %% r16 %% r17 %% r18 %% r19 %% r20% > "% filename%.key"
: ENC6
CLS
echo ________________________________________________________________________________
Eco de cripta - texto Encryptor/Decryptor por Sean Dobson
echo ________________________________________________________________________________
Eco cifrado completo!
hacer una pausa
salida
: DIC
CLS
echo ________________________________________________________________________________
Eco de cripta - texto Encryptor/Decryptor por Sean Dobson
echo ________________________________________________________________________________
Eco de la Nota: el archivo encriptado (*.pwd) y el archivo de clave (* .key) debe estar bajo el mismo nombre (Eg. Password.PWD y Password.key)
Eco y en el mismo directorio que este archivo por lotes.
echo.
Set /p nombre = Ingrese el nombre de archivo el texto cifrado se guardó bajo (Eg. Texto):
CLS
echo ________________________________________________________________________________
Eco de cripta - texto Encryptor/Decryptor por Sean Dobson
echo ________________________________________________________________________________
Si no existen "% filename%.pwd" goto ERRpwd
Si no existen "% filename%.key" goto ERRkey
Goto DEC2
: ERRpwd
echo ERROR: no se encontró %filename%.pwd
hacer una pausa
Goto DEC
: ERRkey
echo ERROR: no se encontró %filename%.key
hacer una pausa
Goto DEC
: DEC2
CLS
echo ________________________________________________________________________________
Eco de cripta - texto Encryptor/Decryptor por Sean Dobson
echo ________________________________________________________________________________
Descifrado de eco...
tecla SET /p = < "% filename%.key"
Set /p pwd = < "% filename%.pwd"
Set k1 = tecla %: ~ 0, 4%
Set k2 = tecla %: ~ 4, 4%
sistema k3 = tecla %: 8, 4%
Set k4 = tecla %: ~ 12, 4%
Set k5 = tecla %: ~ 16, 4%
sistema k6 = tecla %: ~ 20, 4%
Set k7 = tecla %: ~ 24, 4%
Set k8 = tecla %: ~ 28, 4%
Set k9 = tecla %: ~ 32, 4%
establecer k10 = tecla %: ~ 36, 4%
establecer k11 = tecla %: ~ 40, 4%
establecer k12 = tecla %: ~ 44, 4%
sistema k13 = tecla %: ~ 48, 4%
establecer k14 = tecla %: ~ 52, 4%
establecer k15 = tecla %: 56, 4%
establecer k16 = tecla %: ~ 60, 4%
establecer k17 = tecla %: ~ 64, 4%
establecer k18 = tecla %: ~ 68, 4%
sistema k19 = tecla %: ~ 72, 4%
establecer k20 = tecla %: ~ 76, 4%
establece e1 = % pwd: ~ 0, 4%
establecer e2 = % pwd: ~ 4, 4%
sistema e3 = % pwd: ~ 8, 4%
Set e4 = % pwd: ~ 12, 4%
establecer e5 = % pwd: ~ 16, 4%
establecer e6 = % pwd: ~ 20, 4%
establecer e7 = % pwd: ~ 24, 4%
establecer e8 = % pwd: ~ 28, 4%
sistema e9 = % pwd: ~ 32, 4%
establecer e10 = % pwd: ~ 36, 4%
establecer e11 = % pwd: ~ 40, 4%
establecer e12 = % pwd: ~ 44, 4%
establecer e13 = % pwd: ~ 48, 4%
conjunto e14 = % pwd: ~ 52, 4%
establecer e15 = % pwd: 56, 4%
establecer e16 = % pwd: ~ 60, 4%
configurar e17 = % pwd: ~ 64, 4%
establecer e18 = % pwd: ~ 68, 4%
establecer e19 = % pwd: ~ 72, 4%
establecer e20 = % pwd: ~ 76, 4%
: DEC3
establecer num2 = 0
conjunto t =
Set /a num % num % = 1
Si % num % == 1 t set /a = % e1% k1%
Si % num % == 2 set /a t = % e2% % de k2
Si % num % == 3 set /a t = % e3% k3%
Si % num % == 4 set /a t = % e4% k4%
Si % num % == 5 set /a t = e5-% k5%
Si % num % == 6 set /a t = e6-% k6%
Si % num % == 7 set /a t = e7-% k7%
Si % num % == 8 set /a t = e8% k8%
Si % num % == 9 set /a t = % e9% k9%
Si % num == 10 set /a t = e10% k10%
Si % num % == 11 set /a t = e11% k11%
Si % num % == 12 set /a t = e12% k12%
Si % num % == 13 set /a t = e13% k13%
Si % num % == 14 set /a t = e14% k14%
Si % num % == 15 set /a t = e15% k15%
Si % num % == 16 set /a t = e16% k16%
Si % num % == 17 set /a t = e17% k17%
Si % num % == 18 set /a t = e18% k18%
Si % num % == 19 set /a t = e19-% k19%
Si % num % == 20 set /a t = e20-% k20%
Si % num % == 21 goto DEC5
: DEC4
Si num2% == 0 conjunto L = en blanco
Si num2% == 1 sistema L = un
Si num2% == 2 sistema L = b
Si num2% == conjunto 3 L = c
Si num2% == sistema 4 L = d
Si num2% == 5 set L = e
Si num2% == 6 sistema L = f
Si num2% == set 7 L = g
Si num2% == 8 sistema L = h
Si num2% == set 9 L = i
Si num2% == conjunto 10 L = j
Si num2% == 11 set L = k
Si num2% == set 12 L = l
Si num2% == 13 conjunto L = m
Si num2% == set 14 L = n
Si num2% == 15 set L = o
Si num2% == set 16 L = p
Si num2% == set 17 L = q
Si num2% == 18 set L = r
Si num2% == 19 set L = s
Si num2% == 20 sistema L = t
Si num2% == set 21 L = u
Si num2% == 22 set L = v
Si num2% == 23 set L = w
Si num2% == 24 set L = x
Si num2% == set 25 L = y
Si num2% == set 26 L = z
Si num2% == 27 set L = A
Si num2% == 28 set L = B
Si num2% == 29 set L = C
Si num2% == 30 sistema L = D
Si num2% == 31 sistema L = E
Si num2% == 32 sistema L = F
Si num2% == conjunto 33 L = G
Si num2% == conjunto 34 L = H
Si num2% == 35 conjunto L = I
Si num2% == 36 conjunto L = J
Si num2% == 37 sistema L = K
Si num2% == conjunto 38 L = L
Si num2% == conjunto 39 L = M
Si num2% == 40 conjunto L = N
Si num2% == 41 conjunto L = O
Si num2% == 42 conjunto L = P
Si num2% == conjunto 43 L = Q
Si num2% == 44 conjunto L = R
Si num2% == set 45 L = S
Si num2% == 46 set L = T
Si num2% == conjunto 47 L = U
Si num2% == set 48 L = V
Si num2% == 49 conjunto L = W
Si num2% == conjunto 50 L = X
Si num2% == conjunto 51 L = Y
Si num2% == conjunto 52 L = Z
Si num2% == conjunto 53 L = 1
Si num2% == conjunto 54 L = 2
Si num2% == conjunto 55 L = 3
Si num2% == 56 conjunto L = 4
Si num2% == set 57 L = 5
Si num2% == conjunto 58 L = 6
Si num2% == 59 set L = 7
Si num2% == 60 set L = 8
Si num2% == set 61 L = 9
Si num2% == set 62 L = 0
Set t % num % =
Si % de %t == num2% t set % num % = %L %
Si t % num % goto DEC3
Set /a num2 = num2% + 1
Goto DEC4
: DEC5
Si t1% == set en blanco "t1 ="
Si t2% == set en blanco "t2 ="
Si t3% == set en blanco "t3 ="
Si % t4% == set en blanco «t4 = "
Si t5% == set en blanco "t5 ="
Si t6% == set en blanco "t6 ="
Si % t7 == set en blanco «t7 = "
Si t8% == set en blanco «t8 = "
Si t9% == set en blanco «t9 = "
Si t10% == set en blanco "t10 ="
Si t11% == set en blanco "t11 ="
Si t12% == set en blanco "t12 ="
Si t13% == set en blanco "t13 ="
Si t14% == set en blanco "t14 ="
Si t15% == set en blanco "t15 ="
Si t16% == set en blanco "t16 ="
Si t17% == set en blanco "t17 ="
Si t18% == set en blanco "t18 ="
Si t19% == set en blanco "t19 ="
Si t20% == set en blanco "t20 ="
CLS
echo ________________________________________________________________________________
Eco de cripta - texto Encryptor/Decryptor por Sean Dobson
echo ________________________________________________________________________________
Eco descifrar completo!
echo tu texto es: t1% %% t2 %% t3 %% t4 %% t5 %% t6 %% t7 %% t8 %% t9 %% t10 %% t11 %% t12 %% t13 %% t14 %% t15 %% t16 %% t17 %% t18 %% t19 %% % t20
hacer una pausa
salida
