batch encryptor v1

Iniciado por Demonic&Sound, 1 Noviembre 2009, 22:44 PM

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

Demonic&Sound

porfavor diganme que le puedo corregir soy nuevo en esto llevo 2 dias en batch.

Citar@echo off
color 0a
title Encryptor v1
:intro
cls
echo.
echo.
echo             .:Encryptor:.
echo.
echo.
echo               By Biocat
echo.
echo.
pause>nul
goto :menu
:menu
cls
echo.
echo.
echo [1]Hex Encryptor
echo [2]Hex Desencryptor
echo [3]Exit
echo.
set /p menu=
if %menu%==1 goto hex
if %menu%==2 goto xeh
if %menu%==3 goto ext
:hex
cls
echo.
echo.
echo              Insert the word
set/p palabra="Word>> "
set bio=%palabra:a=61%
set bio=%bio:b=62%
set bio=%bio:c=63%
set bio=%bio:d=64%
set bio=%bio:e=65%
set bio=%bio:f=66%
set bio=%bio:g=67%
set bio=%bio:h=68%
set bio=%bio:i=69%
set bio=%bio:j=6a%
set bio=%bio:k=6b%
set bio=%bio:l=6c%
set bio=%bio:m=6d%
set bio=%bio:n=6e%
set bio=%bio:o=6f%
set bio=%bio:p=70%
set bio=%bio:q=71%
set bio=%bio:r=72%
set bio=%bio:s=73%
set bio=%bio:t=74%
set bio=%bio:u=75%
set bio=%bio:v=76%
set bio=%bio:w=77%
set bio=%bio:x=78%
set bio=%bio:y=79%
set bio=%bio:z=7a%
set bio=%bio:@=40%
set bio=%bio:€=80%
set bio=%bio:.=2e%
set bio=%bio:,=2c%
set bio=%bio:;=3b%
set bio=%bio:-=2d%
set bio=%bio:_=5f%
set bio=%bio:¬=1f%
set bio=%bio:!=21%
set bio=%bio:"=22%
set bio=%bio:$=24%
set bio=%bio:&=26%
set bio=%bio:/=2f%
set bio=%bio:(=28%
set bio=%bio:)=29%
set bio=%bio:?=3f%
set bio=%bio:<=3c%
set bio=%bio:>=3e%
set bio=%bio:1=31%
set bio=%bio:2=32%
set bio=%bio:3=33%
set bio=%bio:4=34%
set bio=%bio:5=35%
set bio=%bio:6=36%
set bio=%bio:7=37%
set bio=%bio:8=38%
set bio=%bio:9=39%
set bio=%bio:0=30%
set bio=%bio:+=2b%
set bio=%bio:-=2d%
cls
echo. "%palabra%" Encrypted = %bio%
pause>nul
goto sel
:sel
cls
echo.
echo [1]Another word
echo [2]Menu
echo.
set /p msel=
if %msel%==1 goto hex
if %msel%==2 goto menu
:xeh
cls
echo.
echo.
echo              Insert the word
set/p palabra="Word>> "
set bio=%palabra:61=a%
set bio=%bio:62=b%
set bio=%bio:63=c%
set bio=%bio:64=d%
set bio=%bio:65=e%
set bio=%bio:66=f%
set bio=%bio:67=g%
set bio=%bio:68=h%
set bio=%bio:69=i%
set bio=%bio:6a=j%
set bio=%bio:6b=k%
set bio=%bio:6c=l%
set bio=%bio:6d=m%
set bio=%bio:6e=n%
set bio=%bio:6f=o%
set bio=%bio:70=p%
set bio=%bio:71=q%
set bio=%bio:72=r%
set bio=%bio:73=s%
set bio=%bio:74=t%
set bio=%bio:75=u%
set bio=%bio:76=v%
set bio=%bio:77=w%
set bio=%bio:78=x%
set bio=%bio:79=y%
set bio=%bio:7a=z%
set bio=%bio:40=@%
set bio=%bio:80=€%
set bio=%bio:2e=.%
set bio=%bio:2c=,%
set bio=%bio:3b=;%
set bio=%bio:2d=-%
set bio=%bio:5f=_%
set bio=%bio:1f=¬%
set bio=%bio:21=!%
set bio=%bio:22="%
set bio=%bio:24=$%
set bio=%bio:26=&%
set bio=%bio:2f=/%
set bio=%bio:28=(%
set bio=%bio:29=)%
set bio=%bio:3f=?%
set bio=%bio:3c=<%
set bio=%bio:3e=>%
set bio=%bio:31=1%
set bio=%bio:32=2%
set bio=%bio:33=3%
set bio=%bio:34=4%
set bio=%bio:35=5%
set bio=%bio:36=6%
set bio=%bio:37=7%
set bio=%bio:38=8%
set bio=%bio:39=9%
set bio=%bio:30=0%
set bio=%bio:+=2b%
set bio=%bio:-=2d%
cls
echo. "%palabra%" Encrypted = %bio%
pause>nul
goto sel
:sel
cls
echo.
echo [1]Another word
echo [2]Menu
echo.
set /p msel=
if %msel%==1 goto xeh
if %msel%==2 goto menu

flony

hola en la parte de if %msel%==1 goto hex
if %msel%==2 goto menu
:xeh

creo que goto hex dbria ser xeh....no lo probe pero me fijo y te aviso...aunque debe haber varios que estan mas capacitados para eso
si un problema no tiene solucion entonces no es un problema...es algo inevitable

Darioxhcx

set bio=%palabra:a=61%

a hexa ?
si es hexa tmb diferencia entre mayusculas y minusculas...
saludos