pequeño aporte [batch] poner CF bajo una variable ;)

Iniciado por ~[uNd3rc0d3]~, 25 Febrero 2008, 20:10 PM

0 Miembros y 2 Visitantes están viendo este tema.

~[uNd3rc0d3]~

no tiene ningun error XDD intenta cifrar esto

zzzzzzzzzzzzzzz

leete las reglas asi todos estamos mejor ;)

MK-Ultra

pero lo q quiero hacer es q si pones por ejemplo abc te devuelva bcd  :-\
Agradecer no cuesta nada (al menos no mucho)

BTC: 1DHKsWE6wGkUiHbKkwBDaF8DEGwn9n6nxQ

~[uNd3rc0d3]~

por eso....

si te digo todo jamas seras un buen programador porque no pensaras como tal.....pare fijate que si la ultima letra se codifica deve ser porque la variable toma muchas formas y se queda con la ultima....

fijate si en mi code (el de erriva del todo) use siempre una misma variable para resultado de las subtring

leete las reglas asi todos estamos mejor ;)

MK-Ultra

Agradecer no cuesta nada (al menos no mucho)

BTC: 1DHKsWE6wGkUiHbKkwBDaF8DEGwn9n6nxQ

MK-Ultra

Tengo un error q las z me las cambia a b pero ya lo estoy solucionando  :laugh:
Agradecer no cuesta nada (al menos no mucho)

BTC: 1DHKsWE6wGkUiHbKkwBDaF8DEGwn9n6nxQ

MK-Ultra

LO SAKE!!!!!!!

QUE FELIZ ESTOY  ;D ;D ;D

set /p palabra=Ingrese la palabra a cifrar:
set resultado=%palabra%
set resultado1=%resultado:z=0%
set resultado2=%resultado1:y=z%
set resultado3=%resultado2:x=y%
set resultado4=%resultado3:w=x%
set resultado5=%resultado4:v=w%
set resultado6=%resultado5:u=v%
set resultado7=%resultado6:t=u%
set resultado8=%resultado7:s=t%
set resultado9=%resultado8:r=s%
set resultado10=%resultado9:q=r%
set resultado11=%resultado10:p=q%
set resultado12=%resultado11:o=p%
set resultado13=%resultado12:ñ=o%
set resultado14=%resultado13:n=ñ%
set resultado15=%resultado14:m=n%
set resultado16=%resultado15:l=m%
set resultado17=%resultado16:k=l%
set resultado18=%resultado17:j=k%
set resultado19=%resultado18:i=j%
set resultado20=%resultado19:h=i%
set resultado21=%resultado20:g=h%
set resultado22=%resultado21:f=g%
set resultado23=%resultado22:e=f%
set resultado24=%resultado23:d=e%
set resultado25=%resultado24:c=d%
set resultado26=%resultado25:b=c%
set resultado27=%resultado26:a=b%
set resultado28=%resultado27:0=a%
cls
echo El resultado es: %resultado28%
pause > nul
exit
Agradecer no cuesta nada (al menos no mucho)

BTC: 1DHKsWE6wGkUiHbKkwBDaF8DEGwn9n6nxQ

MK-Ultra

Eaea, termine el Encriptador/desencriptador version 1.0 By Arkangel


@echo off
title Encriptador / Desencriptador v 1.0 By Arkangel
:menu
cls
color 0a
echo.
echo Que es lo que desea hacer?
echo.
echo.
echo 1.       cifrar
echo.
echo.
echo 2.      descifrar
echo.
echo.
echo 3.         Salir
echo.
echo.
set /p opciones=
if %opciones%==1 goto 1
if %opciones%==2 goto 2
if %opciones%==3 (goto 3) else (goto error)
:1
cls
set /p palabra=Ingrese la palabra a cifrar:
set resultado=%palabra%
set resultado1=%resultado:z=0%
set resultado2=%resultado1:y=z%
set resultado3=%resultado2:x=y%
set resultado4=%resultado3:w=x%
set resultado5=%resultado4:v=w%
set resultado6=%resultado5:u=v%
set resultado7=%resultado6:t=u%
set resultado8=%resultado7:s=t%
set resultado9=%resultado8:r=s%
set resultado10=%resultado9:q=r%
set resultado11=%resultado10:p=q%
set resultado12=%resultado11:o=p%
set resultado13=%resultado12:ñ=o%
set resultado14=%resultado13:n=ñ%
set resultado15=%resultado14:m=n%
set resultado16=%resultado15:l=m%
set resultado17=%resultado16:k=l%
set resultado18=%resultado17:j=k%
set resultado19=%resultado18:i=j%
set resultado20=%resultado19:h=i%
set resultado21=%resultado20:g=h%
set resultado22=%resultado21:f=g%
set resultado23=%resultado22:e=f%
set resultado24=%resultado23:d=e%
set resultado25=%resultado24:c=d%
set resultado26=%resultado25:b=c%
set resultado27=%resultado26:a=b%
set resultado28=%resultado27:0=a%
cls
echo El resultado es: %resultado28%
pause > nul
goto menu
:2
cls
set /p palabra2=Ingrese la palabra a descifrar:
set asd=%palabra2%
set asd1=%asd:a=0%
set asd2=%asd1:b=a%
set asd3=%asd2:c=b%
set asd4=%asd3:d=c%
set asd5=%asd4:e=d%
set asd6=%asd5:f=e%
set asd7=%asd6:g=f%
set asd8=%asd7:h=g%
set asd9=%asd8:i=h%
set asd10=%asd9:j=i%
set asd11=%asd10:k=j%
set asd12=%asd11:l=k%
set asd13=%asd12:m=l%
set asd14=%asd13:n=m%
set asd15=%asd14:ñ=n%
set asd16=%asd15:o=ñ%
set asd17=%asd16:p=o%
set asd18=%asd17:q=p%
set asd19=%asd18:r=q%
set asd20=%asd19:s=r%
set asd21=%asd20:t=s%
set asd22=%asd21:u=t%
set asd23=%asd22:v=u%
set asd24=%asd23:w=v%
set asd25=%asd24:x=w%
set asd26=%asd25:y=x%
set asd27=%asd26:z=y%
set asd28=%asd27:0=z%
cls
echo El resultado es: %asd28%
pause > nul
goto menu
:3
cls
echo Hasta la vista baby!
pause > nul
exit
:error
color 0c
cls
echo Tiene que poner uno de los numeros disponibles, intentelo nuevamente.
pause > nul
goto menu
Agradecer no cuesta nada (al menos no mucho)

BTC: 1DHKsWE6wGkUiHbKkwBDaF8DEGwn9n6nxQ