batch como crear una agenda personal en batch

 COMO CREAR  UNA AGENDA PERSONAL EN BATCH

Hola y bienvenidos a mi blog en este apartado aprenderemos a como crear una pequeña mini agenda en batch.

Como herramientas tenemos que tener un bloc de notas para poder guardar nuestro archivo nuestro archivos tienen que guardarse con extensión *.bat el cual es para poder generar nuestro código.

En nuestro bloc de notas colocamos el código siguiente :

@echo off

title Agenda Personal

:menu

cls

color f9

echo **************************************

echo *   BIENVENIDO A TU AGENDA PERSONAL  *

echo **************************************

echo.

echo.

echo 1) Nuevo Contacto

echo.

echo 2) Ver Contactos

echo.

echo 3) Mostrar agenda

echo.

echo 4) Salir

echo.

set /p opcion="Que deseas hacer elige una opcion:   "

if %opcion% == 1 (goto nuevo) 

if %opcion% == 2 (goto ver) 

if %opcion% == 3 (goto desocultar) 

if %opcion% == 4 (exit) else (goto error)

:nuevo

cls

color fc

echo **************************************

echo *  CREANDO CONTACTO         *

echo **************************************

echo.

set /p nombre="Nombre:  "

echo.

set /p direc="Direccion:  "

echo.

set/p tel= "Telefono:  " 

if exist agenda.txt (goto agregar) else (goto crear)

:agregar

cls

echo.

echo eston son los datos que deseas agregar

echo.

echo      %nombre%   %direc%    %tel% 

echo.

set /p confir="Si estos son los datos Y o N ...??     "

if %confir% == y (goto yes) 

if %confir% == n (goto not) else (goto error3)

pause>nul

:yes

cls

echo.

echo datos agregados...

echo.

echo %nombre%     %direc%     %tel% >>agenda.txt

pause>nul

goto menu

:not

cls

echo.

echo.

echo 1)  Escribirlo de nuevo

echo.

echo 2)  Ir al menu principal

echo.

set /p opcion1=  "Que deseas hacer entonces..?     "

if %opcion1% == 1 (goto nuevo)

if %opcion1% == 2 (goto menu) else (goto error2)

pause>nul

:crear

cls

echo.

echo eston son los datos que deseas agregar

echo.

echo      %nombre%   %direc%    %tel% 

echo.

echo.

set /p confir="Si estos son los datos S o N ...??     "

if %confir% == s (goto si) 

if %confir% == n (goto no) else (goto error1)

:si

cls

echo.

echo datos agregados...

echo.

echo %nombre%     %direc%     %tel% >agenda.txt

attrib +a +h agenda.txt

pause>nul

goto menu

:no

cls

echo.

echo.

echo 1)  Escribirlo de nuevo

echo.

echo 2)  Ir al menu principal

echo.

set /p opcion1=  "Que deseas hacer entonces..?     "

if %opcion1% == 1 (goto nuevo)

if %opcion1% == 2 (goto menu) else (goto error2)

pause>nul

:ver

if exist agenda.txt (goto mostrar) else (goto noexiste)

:mostrar

cls

echo.

for /f "eol=; tokens=1,50* delims=, " %%i in (agenda.txt) do echo %%i %%j

pause>nul

goto menu

:noexiste

cls

echo.

echo Lo sentimos pero la agenda no existe

echo.

echo podria ser que todavia no lo ha creado

echo.

echo Intentelo de nuevo

echo.

pause>nul

goto menu

:desocultar

cls

echo.

attrib -a -h agenda.txt

echo agenda desocultada

pause>nul

goto menu

:error

cls

echo.

echo este numero de opcion no se encuentra en el menu

echo.

echo te sugerimos que lo intentes de nuevo

pause>nul

goto menu

:error1

cls

echo.

echo Esta letra no es confirmativa para el menu

echo.

echo intentalo se nuevo 

pause>nul

goto crear

:error2

cls

echo.

echo Este numero no esta en el menu

echo.

echo Intental de nuevo

pause>nul

goto no

:error3

cls

echo.

echo Esta letra no es confirmativa para el menu

echo.

echo intentalo se nuevo 

pause>nul

goto agregar

por si no le entiendes al código pues te invito a que veas el siguiente video.

Contraseña:   tutos-edgar

Espero que te sirva y te ayude