Conversor de numeros Decimales a Binareos [Bin]

[EddyW]

Bueno, despues de mucho posteo por aqui, recien estoy liberando mi tiempo, y pude hacer esto..
Es un conversor de numeros naturales o decimales a numeros Binarios:

Código (dos) [Seleccionar] Expandir

@Echo off
:Main
set /p nn=Escriba un Numero:/^>
set final=
:bin
set /a num=%nn%
set /a bnn=%num%/2
set /a mod=%bnn%+%bnn%
if ["%mod%"] EQU ["%num%"] (
   Set final=0%final%
) ELSE (
   set final=1%final%
)
if ["%bnn%"] NEQ ["0"] (
   Set /a nn=%bnn%
   Goto:bin
)
Echo %final%
goto:main
Ejemplo:

Código (dos) [Seleccionar] Expandir

Escriba un Numero:/>123456789
111010110111100110100010101

Espero les sirva, ya tienen una funcion mas para agregar a sus calculadoras..
SaluDOS!!!