Traductor morse en batch

Iniciado por Sr.Origami, 14 Junio 2010, 19:34 PM

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

Sr.Origami

Soy medio nuevo y estoy intentando hacer un traductor en batch para traducir a morse pero tengo varias dudas. gracias por responder

Sr.Origami

tengo ya el codigo pero hay bastantes cosas que mejorar. el codigo es este:

[@echo off
title Text to morse converter
:start
set /p var=
if %var%==* (
cls
goto start
)
if %var%==a (
echo .-
goto start
)
if %var%==b (
echo -...
goto start
)
if %var%==c (
echo -.-.
goto start
)
if %var%==ch (
echo ----
goto start
)
if %var%==d (
echo -..
goto start
)
if %var%==e (
echo .
goto start
)
if %var%==f (
echo ..-.
goto start
)
if %var%==g (
echo --.
goto start
)
if %var%==h (
echo ....
goto start
)
if %var%==i (
echo ..
goto start
)
if %var%==j (
echo .---
goto start
)
if %var%==k (
echo -.-
goto start
)
if %var%==l (
echo .-..
goto start
)
if %var%==m (
echo --
goto start
)
if %var%==n (
echo -.
goto start
)
if %var%==o (
echo ---
goto start
)
if %var%==p (
echo .--.
goto start
)
if %var%==q (
echo --.-
goto start
)
if %var%==r (
echo .-.
goto start
)
if %var%==s (
echo ...
goto start
)
if %var%==t (
echo -
goto start
)
if %var%==u (
echo ..-
goto start
)
if %var%==v (
echo ...-
goto start
)
if %var%==w (
echo .--
goto start
)
if %var%==x (
echo -..-
goto start
)
if %var%==y (
echo -.--
goto start
)
if %var%==z (
echo --..
goto start
)
if %var%==1 (
echo .----
goto start
)
if %var%==2 (
echo ..---
goto start
)
if %var%==3 (
echo ...--
goto start
)
if %var%==4 (
echo ....-
goto start
)
if %var%==5 (
echo .....
goto start
)
if %var%==6 (
echo -....
goto start
)
if %var%==7 (
echo --...
goto start
)
if %var%==8 (
echo ---..
goto start
)
if %var%==9 (
echo ----.
goto start
)
if %var%==0 (
echo -----
goto start
)
if %var%==. (
echo .-.-.-
goto start
)
if %var%==? (
echo ..--..
goto start
)/code]

por ejemplo... cuando pones una letra sale traducido debajo... pero quiero que la letra que has puesto se borre y que salga todo el codigo en una linea si es posible. gracias

y si no he puesto algo bien en el mensaje o algo es porque soy totalmente nuevo aqui en foro el hacker

TeKNo dUKe

Por que no guardas en alguana variable en lugar de hacer echos y antes de cortar la ejecucion hace el echo de ello, o mandas directamente el echo a un archivo y asi tienes todo...

"Lucy is an artist. Lucy paints pictures of Barbara Streisand"

Sr.Origami

ok. lo he hecho asi por mis pocos conocimientos en batch  ;D intentare hacerlo ;D
si alguien pone el codigo mejor... gracias. mientras intentare pensarlo un poco

BlacKGilgamesH

Te dejo este pequeño code que encontre en mi PC haber si te sirve:

@echo off
title convertidor morse
color f0
:menu
cls
echo.
echo.
echo.
echo.
echo.
echo Hola este es un diccionario
echo de codigo morse...
echo.
echo           1.Convertir palabra al morse
echo.
echo           2.Salir
echo.
set/p opc=Que deseas hacer 1 o 2? :
if %opc%==1 goto submen
if %opc%==2 (goto salir) else goto menu

:submen
cls
echo.
echo.
echo.
echo.
echo.
echo Escribe la palabra!!! que quieras convertir a codigo morse
echo y presiona enter...
set/p pal=PALABRA:
if [%pal%]==[] echo Basio&pause > nul&goto menu
set pal=%pal:a=.- %
set pal=%pal:b=-... %
set pal=%pal:c=-.-. %
set pal=%pal:d=-.. %
set pal=%pal:e=. %
set pal=%pal:f=..-.*%
set pal=%pal:g=--. %
set pal=%pal:h=.... %
set pal=%pal:i=.. %
set pal=%pal:j=.--- %
set pal=%pal:k=-.- %
set pal=%pal:l=.-.. %
set pal=%pal:m=-- %
set pal=%pal:n=-. %
set pal=%pal:o=---. %
set pal=%pal:p=.-- %
set pal=%pal:q=--.- %
set pal=%pal:r=.-. %
set pal=%pal:s=... %
set pal=%pal:t=- %
set pal=%pal:u=..- %
set pal=%pal:v=...- %
set pal=%pal:w=.-- %
set pal=%pal:x=-..- %
set pal=%pal:y=-.-- %
set pal=%pal:z=--.. %
echo.
echo.
echo.
echo.
echo.
echo Cargando...
ping -n 3 localhost >nul
cls
echo.
echo.
echo.
echo.
echo.
echo Esta es su codificacion en morse %pal%
pause > nul
goto menu

:salir
exit


Saludos

Sr.Origami

es perfecto. lo retocare un poco para acoplarlo a lo que necesito pero es exactamente lo que buscaba, muchas gracias
;-) ;-) ;-)