comment
IRC Chat
play_arrow
Este sitio utiliza cookies propias y de terceros. Si continúa navegando consideramos que acepta el uso de cookies. OK Más Información.

Cifrado Cesar

  • 4 Respuestas
  • 2823 Vistas

0 Usuarios y 1 Visitante están viendo este tema.

Conectado 79137913

  • *
  • Co Admin
  • Mensajes: 634
  • Actividad:
    0%
  • Reputación 11
  • 4 Esquinas
    • Ver Perfil
    • Doors.Party
    • Email
  • Skype: fg_mdq@hotmail.com
« en: Febrero 05, 2013, 11:49:59 am »
HOLA!!!

Código: No tienes permisos para ver links. Registrate o Entra con tu cuenta
@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!!!
"Algunos creen que soy un bot, puede que tengan razon"
"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

*Shadow Scout Team*                                                   No tienes permisos para ver links. Registrate o Entra con tu cuenta

Desconectado martinanonymo

  • *
  • Underc0der
  • Mensajes: 40
  • Actividad:
    0%
  • Reputación 0
  • Codeo en VB♥
    • Ver Perfil
  • Skype: martin.recalde4
« Respuesta #1 en: Febrero 05, 2013, 12:38:43 pm »
Muy bueno!
Para ganar hay que arriesgar

Desconectado zoro248

  • *
  • Underc0der
  • Mensajes: 242
  • Actividad:
    0%
  • Reputación 0
    • Ver Perfil
    • Email
« Respuesta #2 en: Febrero 05, 2013, 09:13:12 pm »
Como podria ser usado?

Desconectado martinanonymo

  • *
  • Underc0der
  • Mensajes: 40
  • Actividad:
    0%
  • Reputación 0
  • Codeo en VB♥
    • Ver Perfil
  • Skype: martin.recalde4
« Respuesta #3 en: Febrero 05, 2013, 09:33:06 pm »
No tienes permisos para ver links. Registrate o Entra con tu cuenta
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
Para ganar hay que arriesgar

Desconectado L0ki

  • *
  • Underc0der
  • Mensajes: 4
  • Actividad:
    0%
  • Reputación 0
  • Tod ist unvermeidlich, aber meist unbedeutend...
    • Ver Perfil
    • Null Sicherheit
« Respuesta #4 en: Marzo 28, 2013, 12:08:11 am »
Lo mismo pero en Bash!
Código: Bash
  1. #!/bin/bash
  2. read -p "(De)cifrar: " word
  3. echo $word |tr '[A-Z][a-z]' '[N-ZA-M][n-za-m]'
  4.  
Tod ist unvermeidlich, aber meist unbedeutend... | No tienes permisos para ver links. Registrate o Entra con tu cuenta

 

¿Te gustó el post? COMPARTILO!



Cifrado Vernam

Iniciado por binary_death

Respuestas: 0
Vistas: 2075
Último mensaje Septiembre 03, 2013, 06:01:44 pm
por binary_death
Cifrado Caesar

Iniciado por binary_death

Respuestas: 0
Vistas: 1954
Último mensaje Septiembre 03, 2013, 05:58:40 pm
por binary_death