HOLA!!!
@ECHO OFF
SETlocal enabledelayedexpansion
SET /P OP=ENCRIPTAR(1), DESENCRIPTAR(2),SALIR(ELSE):
IF %OP%==1 GOTO ENCRIPTAR
IF %OP%==2 GOTO DESENCRIPTAR
EXIT
:DESENCRIPTAR
SET A=ZYXWVUTSRQPONMLKJIHGFEDCBAZYXWVUTSRQ
SET /P F=STRING A DESENCRIPTAR:
CALL SET DESPLAZA=%%F:~%H%,1%%%
set /a H+=1
GOTO LOOPA
:ENCRIPTAR
SET A=ABCDEFGHIJKLMNOPQRSTUVWXYZABCDEFGHIJ
SET /P F=STRING A ENCRIPTAR:
SET /P DESPLAZA=DESPLAZAMIENTO:
SET RN=%DESPLAZA%
GOTO LOOPA
:LOOPA
CALL SET G=%%F:~%H%,1%%%
IF "%G%"=="" (GOTO TERMINAR)
set /a H+=1
SET C=0
:LOOP
call set B=%%A:~%C%,1%%%
set /a C+=1
IF "%C%" EQU "27" (GOTO LOOPA)
IF "%G%"=="%B%" (
SET /A D=%C%+%DESPLAZA%-1
CALL SET E=%%A:~!D!,1%%%
SET RN=%RN%!E!
)
IF "%G%"==" " (SET RN=%RN%%G%
GOTO LOOPA)
IF "%G%"=="1" (SET RN=%RN%%G%
GOTO LOOPA)
IF "%G%"=="2" (SET RN=%RN%%G%
GOTO LOOPA)
IF "%G%"=="3" (SET RN=%RN%%G%
GOTO LOOPA)
IF "%G%"=="4" (SET RN=%RN%%G%
GOTO LOOPA)
IF "%G%"=="5" (SET RN=%RN%%G%
GOTO LOOPA)
IF "%G%"=="6" (SET RN=%RN%%G%
GOTO LOOPA)
IF "%G%"=="7" (SET RN=%RN%%G%
GOTO LOOPA)
IF "%G%"=="8" (SET RN=%RN%%G%
GOTO LOOPA)
IF "%G%"=="9" (SET RN=%RN%%G%
GOTO LOOPA)
IF "%G%"=="0" (SET RN=%RN%%G%
GOTO LOOPA)
GOTO LOOP
:TERMINAR
ECHO %RN%
pause
EXIT
GRACIAS POR LEER!!!
Muy bueno!
Como podria ser usado?
You are not allowed to view links.
You are not allowed to view links.
Register or Login or You are not allowed to view links.
Register or Login
Como podria ser usado?
copias el codigo en un bloc de notas , luego le pones en guardar y le das a "elnombresquequierasponerle.bat" la extencion le vas a tener que dar a .bat y listo
Lo mismo pero en Bash!
#!/bin/bash
read -p "(De)cifrar: " word
echo $word |tr '[A-Z][a-z]' '[N-ZA-M][n-za-m]'