Tema: Binary Converter By JaAViEr

Bueno, según la web [Solo usuarios registrados pueden ver los links. ], esto debería estar correcto, es mi nuevo convertidor y desconvertidor binario...
Aun me falta poner el if exist antes de comprobar el archivo...
La verdad es que me dio muchos problemas y me da pereza arreglarlo.
Distingue entre Mayusculas y minusculas, Puntos, comas, signo de exclamacion.
Convertidor:

Código:

@echo off
cls
title Binary Converter By JaAViEr
FOR /F "tokens=*" %%A IN (%1) DO (
set E=%%A
)
set E=%E: =00100000%
set E=%E:a=01100001%
set E=%E:b=01100010%
set E=%E:c=01100011%
set E=%E:d=01100100%
set E=%E:e=01100101%
set E=%E:f=01100110%
set E=%E:g=01100111%
set E=%E:h=01101000%
set E=%E:i=01101001%
set E=%E:j=01101010%
set E=%E:k=01101011%
set E=%E:l=01101100%
set E=%E:m=01101101%
set E=%E:n=01101110%
set E=%E:o=01101111%
set E=%E:p=01110000%
set E=%E:q=01110001%
set E=%E:r=01110010%
set E=%E:s=01110011%
set E=%E:t=01110100%
set E=%E:u=01110101%
set E=%E:v=01110110%
set E=%E:w=01110111%
set E=%E:x=01111000%
set E=%E:y=01111001%
set E=%E:z=01111010%
set E=%E:A=01000001%
set E=%E:B=01000010%
set E=%E:C=01000011%
set E=%E:D=01000100%
set E=%E:E=01000101%
set E=%E:F=01000110%
set E=%E:G=01000111%
set E=%E:H=01001000%
set E=%E:I=01001001%
set E=%E:J=01001010%
set E=%E:K=01001011%
set E=%E:L=01001100%
set E=%E:M=01001101%
set E=%E:N=01001110%
set E=%E:O=01001111%
set E=%E:P=01010000%
set E=%E:Q=01010001%
set E=%E:R=01010010%
set E=%E:S=01010011%
set E=%E:T=01010100%
set E=%E:U=01010101%
set E=%E:V=01010110%
set E=%E:W=01010111%
set E=%E:X=01011000%
set E=%E:Y=01011001%
set E=%E:Z=01011010%
set E=%E:!=00100001%
set E=%E:,=00101100%
set E=%E:.=00101110%
set E=%E:i=11101101%
set E=%E:a=11100001%
set E=%E:e=00100000%
set E=%E:o=11110011%
set E=%E:u=11111010%
echo Tu Texto codificado 
echo %E%

Desconvertidor:

Código:

@echo off
cls
title Binary Converter By JaAViEr
FOR /F "tokens=*" %%B IN (%1) DO (
set E=%%B
)
set E=%E:00100000= %
set E=%E:01100001=a%
set E=%E:01100010=b%
set E=%E:01100011=c%
set E=%E:01100100=d%
set E=%E:01100101=e%
set E=%E:01100110=f%
set E=%E:01100111=g%
set E=%E:01101000=h%
set E=%E:01101001=i%
set E=%E:01101010=j%
set E=%E:01101011=k%
set E=%E:01101100=l%
set E=%E:01101101=m%
set E=%E:01101110=n%
set E=%E:01101111=o%
set E=%E:01110000=p%
set E=%E:01110001=q%
set E=%E:01110010=r%
set E=%E:01110011=s%
set E=%E:01110100=t%
set E=%E:01110101=u%
set E=%E:01110110=v%
set E=%E:01110111=w%
set E=%E:01111000=x%
set E=%E:01111001=y%
set E=%E:01111010=z%
set E=%E:01000001=A%
set E=%E:01000010=B%
set E=%E:01000011=C%
set E=%E:01000100=D%
set E=%E:01000101=E%
set E=%E:01000110=F%
set E=%E:01000111=G%
set E=%E:01001000=H%
set E=%E:01001001=I%
set E=%E:01001010=J%
set E=%E:01001011=K%
set E=%E:01001100=L%
set E=%E:01001101=M%
set E=%E:01001110=N%
set E=%E:01001111=O%
set E=%E:01010000=P%
set E=%E:01010001=Q%
set E=%E:01010010=R%
set E=%E:01010011=S%
set E=%E:01010100=T%
set E=%E:01010101=U%
set E=%E:01010110=V%
set E=%E:01010111=W%
set E=%E:01011000=X%
set E=%E:01011001=Y%
set E=%E:01011010=Z%
set E=%E:00100001=!%
set E=%E:00101100=,%
set E=%E:00101110=.%
set E=%E:11101101=i%
set E=%E:11100001=a%
set E=%E:00100000=e%
set E=%E:11110011=o%
set E=%E:11111010=u%
echo Tu Texto Decodificado 
echo %E%

Espero que valoren mi pequeño esfuerzo.

Saludos.

Un programador sabe cuando su programa va y cuando no.

un programador no dice: me da pereza arreglarlo

Muy bueno, tambien sigo tus aportes en otro foro, aunque estoy de acuerdo con lo comentado por P4|3L0.

Un saludo

Gracias a todos, ahora lo estoy mejorando para un mejor funcionamiento.
Gracias por sus criticas constructivas.