inversión de caracteres

kj
Colaborador

Desconectado

Mensajes: 918

el que madruga dios lo arruga

inversión de caracteres

« en: Octubre 06, 2008, 07:38:45 »

bueno, hace unos días estuve viendo los crackmes de smart y vi que invertía los caracteres, así que se me ocurrió hacer uno un code que invierta los caracteres de una forma más rápida y optimizada.

el resultado fue este:

Código:

@echo off

title Invertir by KJ
color 0a
mode con cols=45 lines=9

:v
echo.&echo.&echo.
set /p v=" >:"
if not defined v goto V
if defined v set v=%v%&goto inv

:inv
cls
if not "%v:~0,1%"=="" (set /a length=%length%+1)
set p=%v:~0,1%
set v=%v:~1%
set r=%p%%r%
if "%v%"=="" echo.&echo.&echo %r%&echo.&echo characters=%length%&pause>nul&exit
goto inv

salu2

kj


« Última modificación: Octubre 07, 2008, 09:02:14 por kj »	En línea

*si la vida te da la espalda agarrale el culo.
*la cerveza mata lentamente, pero no tengo apuro alguno.
*daria todo lo que se por la mitad de lo que ignoro.

Necesitas ser usuario para ver los enlaces Crear Usuario Hacer Sesion

acabemos con rapidshare y megaupload :: clic aqui ::

Necesitas ser usuario para ver los enlaces Crear Usuario Hacer Sesion

no mas lista negra para kaspersky - recupera y utiliza keys en lista negra :: clic aqui ::

:: SmartGenius™ ::
[Splendit Smart]
Moderación
Gran Colaborador

Desconectado

Mensajes: 2423

Campusero... :P

Re: inversión de caracteres

« Respuesta #1 en: Octubre 06, 2008, 08:13:38 »

Muy Bueno KJ...corto y eficiente...xD

Veo que de algo sirve lo que hago....para que traten de superarse y mejorar los codes.... Cheesy

Saludos.


	En línea

Espectro Infernal
T0 d0: -> Mejorar 3 en raya
Moderadores
Gran Colaborador

Desconectado

Mensajes: 1022

ESPECTRO INFERNAL

Re: inversión de caracteres

« Respuesta #2 en: Octubre 07, 2008, 07:23:43 »

Mucho más clarol a verdad, aunque el code que ha usado smart en alguna ocasión también servía para conseguir la longitud de la cadena.

De este modo puedes añadir esto al code y obtener el mismo resultado:

@echo off

title Invertir by KJ
color 0a
mode con cols=45 lines=9

:v
echo.&echo.&echo.
set /p v=" >:"
if not defined v goto V
if defined v set v=%v%&goto inv

:inv
cls
IF NOT "%V:~0,1%"=="" (SET /A LENGTH=%LENGTH%+1)
set p=%v:~0,1%
set v=%v:~1%
set r=%p%%r%
if "%v%"=="" echo.&echo.&echo.&echo %r%&ECHO.& ECHO LENGTH="%LENGTH%"& PAUSE>nul&exit
goto inv

Con eso tendrías un resultado muy optimizado. Ejemplo:

>:ESPECTRO INFERNAL

Citar

LANREFNI ORTCEPSE

LENGTH="17"

Bytes, Espectro Infernal.


	En línea

kj
Colaborador

Desconectado

Mensajes: 918

el que madruga dios lo arruga

Re: inversión de caracteres

« Respuesta #3 en: Octubre 07, 2008, 08:55:13 »

muy buena idea espectro, no había pensado en eso, lo aumento al code de arriba.

salu2

kj


	En línea

acabemos con rapidshare y megaupload :: clic aqui ::

Necesitas ser usuario para ver los enlaces Crear Usuario Hacer Sesion

no mas lista negra para kaspersky - recupera y utiliza keys en lista negra :: clic aqui ::

|Shadow|
Dein Nulls
Moderadores
Colaborador

Desconectado

Mensajes: 915

Fucking mnemonic c0d1n6!

Re: inversión de caracteres

« Respuesta #4 en: Octubre 08, 2008, 08:10:26 »

Aki empezo todo el royo:

Necesitas ser usuario para ver los enlaces Crear Usuario Hacer Sesion

Funcion :OCHE (invierte una cadena)

Necesitas ser usuario para ver los enlaces Crear Usuario Hacer Sesion

Funcion :LEN (devuelve la longitud de una cadena)

PS: Oh vamos smart


	En línea

Necesitas ser usuario para ver los enlaces Crear Usuario Hacer Sesion

Reglamento del Foro

Linux Registered User #473016

Páginas: [1]

Comunidad Underground Hispana \| Programacion \| Programación \| Batch (Moderadores: Espectro Infernal, \|Shadow\|) \| Tema: inversión de caracteres	« anterior próximo »

	Bienvenido(a), Visitante. Favor de ingresar o registrarse. ¿Perdiste tu email de activación? - Noviembre 18, 2008, 01:24:52