@echo off
cls
title Agenda de Direcciones
rem aqui va nuestra firma del curso espero q os guste
rem la e sacao de internet pero mola ehh...
echo.
echo.
echo , ,
echo $, $, ,
echo "ss.$ss. .s'
echo , .ss$$$$$$$$$$s,
echo $. s$$$$$$$$$$$$$$`$$Ss
echo "$$$$$$$$$$$$$$$$$$o$$$ ,
echo s$$$$$$$$$$$$$$$$$$$$$$$$s, ,s
echo s$$$$$$$$$"$$$$$$""""$$$$$$"$$$$$,
echo s$$$$$$$$$$s""$$$$ssssss"$$$$$$$$"
echo s$$$$$$$$$$' `"""ss"$"$s""
echo s$$$$$$$$$$, `"""""$ .s$$s
echo s$$$$$$$$$$$$s,... `s$$' `
echo `ssss$$$$$$$$$$$$$$$$$$$$####s. .$$"$. , s-
echo `""""$$$$$$$$$$$$$$$$$$$$#####$$$$$$" $.$'
echo "$$$$$$$$$$$$$$$$$$$$$####s"" .$$$|
echo "$$$$$$$$$$$$$$$$$$$$$$$$##s .$$" $
echo $$""$$$$$$$$$$$$$$$$$$$$$$$$$$$$$" `
echo $$" "$"$$$$$$$$$$$$$$$$$$$$S""""'
echo , ," ' $$$$$$$$$$$$$$$$####s
echo $. .s$$$$$$$$$$$$$$$$$####"
echo , "$s. ..ssS$$$$$$$$$$$$$$$$$$$####"
echo $ .$$$S$$$$$$$$$$$$$$$$$$$$$$$$#####"
echo Ss ..sS$$$$$$$$$$$$$$$$$$$$$$$$$$$######""
echo "$$sS$$$$$$$$$$$$$$$$$$$$$$$$$$$########"
echo , s$$$$$$$$$$$$$$$$$$$$$$$$#########""'
echo $ s$$$$$$$$$$$$$$$$$$$$$#######""' s' ,
echo $$..$$$$$$$$$$$$$$$$$$######"' ....,$$.... ,$
echo "$$$$$$$$$$$$$$$######"' , .sS$$$$$$$$$$$$$$$$s$$
echo $$$$$$$$$$$$#####" $, .s$$$$$$$$$$$$$$$$$$$$$$$$s.
echo ) $$$$$$$$$$$#####' `$$$$$$$$$###########$$$$$$$$$$$.
echo (( $$$$$$$$$$$##### $$$$$$$$###" "####$$$$$$$$$$
echo ) \ $$$$$$$$$$$$####. $$$$$$###" "###$$$$$$$$$ s'
echo ( ) $$$$$$$$$$$$$####. $$$$$###" ####$$$$$$$$s$$'
echo ) ( ( $$"$$$$$$$$$$$#####.$$$$$###' Curso Batch .###$$$$$$$$$$"
echo ( ) ) _,$" $$$$$$$$$$$$######.$$##' .###$$$$$$$$$$
echo ) ( ( \. "$$$$$$$$$$$$$#######,,,. ..####$$$$$$$$$$$"
echo( )$ ) ) ,$$$$$$$$$$$$$$$$$$####################$$$$$$$$$$$"
echo( ($$ ( \ _sS" `"$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$S$$,
echo ) )$$$s ) ) . . `$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$"' `$$
echo ( $$$Ss/ .$, .$,,s$$$$$$##S$$$$$$$$$$$$$$$$$$$$$$$$S"" '
echo \)_$$$$$$$$$$$$$$$$$$$$$$$##" $$ `$$. `$$.
echo `"S$$$$$$$$$$$$$$$$$#" $ `$ `$
echo `"""""""""""""' ' ' '
echo.
echo.
pause > nul
goto menu
:menu
cls
echo.
echo 1.Crear usuario
echo 2.Eliminar usuario
echo 3.Login usuario
echo 4.salir
set /p opc=Que quiere hacer?
If %opc%==1 goto newu
If %opc%==2 goto delu
If %opc%==3 goto regs
If %opc%==4 (goto exit) else echo Caracter no conocido && pause && goto menu
:newu
cls
set /p use=Nombre:
set /p pas=Contraseña:
cls
echo guardando usuario...
mkdir c:\Agenda\%use%
echo %pas% > c:\Agenda\%use%\%pas%.txt
attrib +h c:\Agenda\%use%\%pas%.txt
echo usuario guardado de forma correcta
echo pulse una tecla para regresar al menu principal...
pause > nol
goto menu
:menu
cls
echo.
echo 1.Crear usuario
echo 2.Eliminar usuario
echo 3.Login usuario
echo 4.salir
set /p opc=Que quiere hacer?
If %opc%==1 goto newu
If %opc%==2 goto delu
If %opc%==3 goto regs
If %opc%==4 goto exit
:newu
cls
set /p use=Nombre:
set /p pas=Contraseña:
cls
echo guardando usuario...
mkdir c:\Agenda\%use%
echo %pas% > c:\Agenda\%use%\%pas%.txt
echo usuario guardado de forma correcta
echo pulse una tecla para regresar al menu principal...
pause > nol
goto menu
:delu
cls
set /p nde=Nombre:
set /p pde=Contraseña:
comprobando informacion...
If exist c:\Agenda\%nde% ( goto delu1 )
If not exist c:\Agenda\%nde% (echo El nombre de usuario no existe&echo pulse una tecla para volver al menu principal..&pause > nul&goto menu)
:delu1
cls
If exist c:\Agenda\%nde%\%pde%.txt ( goto delu2 )
If not exist c:\Agenda\%nde%\%pde%.txt (echo Contraseña incorrecta&echo pulse un tecla para regresar al menu&pause > nul&goto menu)
:delu2
cls
set con=Seguro que quiere borrar toda la informacion de %nde%? s/n
If %con%==s goto delu3
If %con%==n goto menu
:delu3
cls
Borrando informacion...
del c:\Agenda\%nde%
echo Se ha borrado la informacion de %nde% con exito
echo pulse una tecla para regresar al menu principal...
pause > nul
goto menu
:regs
cls
set /p nom=Nombre:
set /p psw=Contraseña:
If exist c:\Agenda\%nom% (goto regs1)
If not exist c:\Agenda\%nom% (echo El nombre de usuario no existe&echo pulse una tecla para volver al menu principal..&pause > nul&goto menu)
:regs1
If exist c:\Agenda\%nom%\%psw%.txt (goto usermenu)
If not exist c:\Agenda\%nom%\%psw%.txt (echo La contraseña es incorrecta&echo pulse una tecla para volver al menu principal..&pause > nul&goto menu)
:usermenu
cls
echo Hola %nom%
echo.
echo.
echo 1.Agregar nuevo contacto.
echo 2.Eliminar contacto.
echo 3.Agenda.
echo 4.Volver al menu principal.
echo 5.Salir.
echo.
echo.
set /p var=Elija una opcion ingresando el numero de que la acompaña:
If %var%==1 goto 001
If %var%==2 goto 002
If %var%==3 goto 003
If %var%==4 goto menu
If %var%==5 goto exit
:001
if exist C:\Agenda (goto 010) else mkdir C:\Agenda&goto 010
:010
cd \
cls
echo Rellene los siguientes campos acerca de su contacto:
echo.
set /p nombre=Nombre:
echo.
set /p aapellido=Primer apellido:
echo.
set/p bapellido=Segundo apellido:
echo.
set /p direccion=Direccion:
echo.
set /p tel=Telefono:
echo.
echo Nombre: %nombre% > Agenda\%nom%\%nombre%_%aapellido%.txt
echo Primer apellido: %aapellido% >> Agenda\%nom%\%nombre%_%aapellido%.txt
echo Segundo apellido: %bapellido% >> Agenda\%nom%\%nombre%_%aapellido%.txt
echo Diereccion: %direccion% >> Agenda\%nom%\%nombre%_%aapellido%.txt
echo Telefono: %tel% >> Agenda\%nom%\%nombre%_%aapellido%.txt
cls
echo Se guardara la siguente informacion:
echo Nombre: %nombre%
echo Primer Apellido: %aapellido%
echo Segundo Apellido: %bapellido%
echo Direccion: %direccion%
echo Telefono: %tel%
set /p val=¿es correcta? s/n :
If %val%==s echo guardando informacion...&echo Pulsa una tecla para continuar...&pause > nul&goto usermenu
If %val%==n echo Pulse una tecla para volver a introducir los datos...&del Agenda\%nom%\%nombre%_%aapellido%.txt&pause > nul%goto 001
:002
cd \
cls
set /p borrar=Escriba el nombre del contacto que desea borrar:
set /p borraa=Escriba el primer apellido del nombre que desea borrar:
cls
set /p confir=¿Esta seguro de que quiere eliminar el contacto "%borrar% %borraa%"? s/n:
If %confir%==s (goto 020)
If %confir%==n (goto usermenu)
:020
cd \
cls
echo Borrando contacto...
del Agenda\%nom%\%borrar%_%borraa%.txt
echo Su contacto se a eliminado de forma correcta.
echo pulse una tecla para regresar al menu...
pause > nul
goto usermenu
:003
cd \
cls
set /p contac=Escriba el nombre del contacto que desea ver:
cls
set /p apelli=Escriba el primer apellido del contacto que desea ver:
cls
echo su contacto se esta abriendo...
start Agenda\%nom%\%contac%_%apelli%.txt
cls
echo su contacto se ha abierto de forma correcta
echo Puse una tecla para regresar al menu...
pause > nol
goto usermenu
:exit
cls
echo Hasta la proxima
pause
cls
echo.
echo.
echo , ,
echo $, $, ,
echo "ss.$ss. .s'
echo , .ss$$$$$$$$$$s,
echo $. s$$$$$$$$$$$$$$`$$Ss
echo "$$$$$$$$$$$$$$$$$$o$$$ ,
echo s$$$$$$$$$$$$$$$$$$$$$$$$s, ,s
echo s$$$$$$$$$"$$$$$$""""$$$$$$"$$$$$,
echo s$$$$$$$$$$s""$$$$ssssss"$$$$$$$$"
echo s$$$$$$$$$$' `"""ss"$"$s""
echo s$$$$$$$$$$, `"""""$ .s$$s
echo s$$$$$$$$$$$$s,... `s$$' `
echo `ssss$$$$$$$$$$$$$$$$$$$$####s. .$$"$. , s-
echo `""""$$$$$$$$$$$$$$$$$$$$#####$$$$$$" $.$'
echo "$$$$$$$$$$$$$$$$$$$$$####s"" .$$$|
echo "$$$$$$$$$$$$$$$$$$$$$$$$##s .$$" $
echo $$""$$$$$$$$$$$$$$$$$$$$$$$$$$$$$" `
echo $$" "$"$$$$$$$$$$$$$$$$$$$$S""""'
echo , ," ' $$$$$$$$$$$$$$$$####s
echo $. .s$$$$$$$$$$$$$$$$$####"
echo , "$s. ..ssS$$$$$$$$$$$$$$$$$$$####"
echo $ .$$$S$$$$$$$$$$$$$$$$$$$$$$$$#####"
echo Ss ..sS$$$$$$$$$$$$$$$$$$$$$$$$$$$######""
echo "$$sS$$$$$$$$$$$$$$$$$$$$$$$$$$$########"
echo , s$$$$$$$$$$$$$$$$$$$$$$$$#########""'
echo $ s$$$$$$$$$$$$$$$$$$$$$#######""' s' ,
echo $$..$$$$$$$$$$$$$$$$$$######"' ....,$$.... ,$
echo "$$$$$$$$$$$$$$$######"' , .sS$$$$$$$$$$$$$$$$s$$
echo $$$$$$$$$$$$#####" $, .s$$$$$$$$$$$$$$$$$$$$$$$$s.
echo ) $$$$$$$$$$$#####' `$$$$$$$$$###########$$$$$$$$$$$.
echo (( $$$$$$$$$$$##### $$$$$$$$###" "####$$$$$$$$$$
echo ) \ $$$$$$$$$$$$####. $$$$$$###" "###$$$$$$$$$ s'
echo ( ) $$$$$$$$$$$$$####. $$$$$###" ####$$$$$$$$s$$'
echo ) ( ( $$"$$$$$$$$$$$#####.$$$$$###' Curso Batch .###$$$$$$$$$$"
echo ( ) ) _,$" $$$$$$$$$$$$######.$$##' .###$$$$$$$$$$
echo ) ( ( \. "$$$$$$$$$$$$$#######,,,. ..####$$$$$$$$$$$"
echo( )$ ) ) ,$$$$$$$$$$$$$$$$$$####################$$$$$$$$$$$"
echo( ($$ ( \ _sS" `"$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$S$$,
echo ) )$$$s ) ) . . `$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$$"' `$$
echo ( $$$Ss/ .$, .$,,s$$$$$$##S$$$$$$$$$$$$$$$$$$$$$$$$S"" '
echo \)_$$$$$$$$$$$$$$$$$$$$$$$##" $$ `$$. `$$.
echo `"S$$$$$$$$$$$$$$$$$#" $ `$ `$
echo `"""""""""""""' ' ' '
echo.
echo.
pause
exit