viernes, 28 de febrero de 2014

PROBANDO MS-DOS

Ejemplo de una calculadora sencilla en ms-dos


(Se debe guardar con extension .bat)
@echo off
title HolaMundo
:inicio
cls
echo  ***************************************
echo  *                                     *
echo  *            Calculadora              *
echo  *                          x yojanson *
echo  ***************************************
echo.
echo Seleccione la accion que desea realizar:
echo.
echo 1 para sumar
echo 2 para multiplicar
echo 3 para restar
echo 4 para dividir
echo 5 para Consultar Historico
echo 6 para Salir
echo.
set/p valor=


if %valor% == 1 goto suma
if %valor% == 2 goto multiplicar
if %valor% == 3 goto restar
if %valor% == 4 goto dividir
if %valor% == 5 goto historico
if %valor% == 6 goto salir

:noes
echo Seleccione una opcion valida
pause
goto inicio

:suma
cls
echo Ingrese un numero
set/p num1=
echo Ingrese otro
set/p num2=
set/a resultado=%num1%+%num2%
echo %DATE% %time% %num1%+%num2% el resultado de la operacion es: %resultado% >> archivo.txt
echo %time% el resultado de la operacion es: %resultado%
pause
goto inicio

:multiplicar
cls
echo Ingrese un numero
set/p num1=
echo Ingrese otro
set/p num2=
set/a resultado=%num1%*%num2%
echo %DATE% %time% %num1% * %num2% el resultado de la operacion es: %resultado% >> archivo.txt
echo %time% el resultado de la operacion es: %resultado%
pause
goto inicio


:restar
cls
echo Ingrese un numero
set/p num1=
echo Ingrese otro
set/p num2=
set/a resultado=%num1%-%num2%
echo %DATE% %time% %num1% - %num2% el resultado de la operacion es: %resultado% >> archivo.txt
echo %time% el resultado de la operacion es: %resultado%
pause
goto inicio



:dividir
cls
echo Ingrese un numero
set/p num1=
echo Ingrese otro
set/p num2=
set/a resultado=%num1% / %num2%
echo %DATE% %time% %num1% / %num2% el resultado de la operacion es: %resultado% >> archivo.txt
echo %time% el resultado de la operacion es: %resultado%
pause
goto inicio

:historico
cls
echo Historico
if exist archivo.txt type archivo.txt
if not exist archivo.txt echo Todavia no hay un Historico Creado
pause
goto inicio


:salir
exit /b

No hay comentarios:

Publicar un comentario