Agenda em Batch

Started by Trojan, 29 de November , 2007, 08:39:34 PM

Previous topic - Next topic

0 Members and 1 Guest are viewing this topic.

Trojan

No Sabado passado, tive uma ideia maluca, procurei aqui no darkers para ver se ja tinha aqui e não achei nada, então resolvi fazer, pequei um papel ( Por incrivel q pareça não fui direto ao PC  :D )
 e comecei a escrever como tinha q ser, depois fui ao PC e comecei a Digitar, e saiu nisso, uma agenda ou quase isso, uma especie de agenda, Separada em duas partes, de contatos e de data.

A de contato, você cadastra o contato, com nome, telefone, e-mail
E a parte de data, a qual você coloca uma data importante, com um lembrete..
Preciso fazer duas alterações.


1- Colocar senha, para q o usuario q entrar no programa, veja apenas o seus contatos.
2- Fazer com que os arquivos Ag.txt e Ca.txt fiquem ocultos ou em uma pasta escondida, para que o usuario não veja.


o code tah ai:

Quote:BOF
@cls
@title Agenda
@color 8
@echo.
@VER
@echo ======================================
@echo                Agenda
@echo ======================================
@echo                     By: Trojan
@echo.
@echo Este aplicativo e dividido em duas partes
@echo a primeira voce pode salvar quantos contatos
@echo quiser, E no segundo voce pode marcar quantas
@echo datas importantes quiser.
@echo Toda vez que voce abrir uma parte do
@echo aplicativo, exemplo Contato, vai abrir junto
@echo os contatos ja salvos. E na Data
@echo acontece a mesma coisa, ira abrir junto
@echo as datas importantes!
@echo ATENCAO: VOCE NAO PODERA ALTERAR O REGISTRO DE UM
@echo CONTATO OU DATA QUE JA FOI DIGITADO.
@echo.
@echo.
@echo Ola! qual o seu nome?
@set /p nome=
@cls
@echo ======================================
@echo                Agenda
@echo ======================================
@echo                     By: Trojan
@echo.
@echo.
@echo Ola %nome%!
@echo.
:repl
:sinal
@echo Escolha uma das opcoes abaixo para dar inicio
@echo ao programa ou sair do mesmo!
@echo [1] - Contato ( Editar contatos )
@echo [2] - Data ( Edite as datas importantes )
@echo [3] - Sair
@set /p in=
@cls
@If "%in%" == "1" ( set sinal= 1 & goto parte1 )
@If "%in%" == "2" ( set sinal= 2 & goto parte2 )
@If "%in%" == "3" ( set sinal= 3 & goto exit )
@If not "%in%" == "1" ( goto repl )
@If not "%in%" == "2" ( goto repl )
@If not "%in%" == "3" ( goto repl )
:parte1
@echo arquivos gravados:
@type Ag.txt
@echo.
@echo Digite o nome do contato
@set /p nome1=
@echo Digite o telefone
@set /p tel1=
@echo Digite o e-mail
@set /p em1=
@echo.
@echo.
@echo nome: %nome1% >> Ag.txt
@echo telefone: %tel1% >> Ag.txt
@echo e-mail: %em1% >> Ag.txt
@echo. >> Ag.txt
:resps
@echo Deseja inserir mais um contato?  (Y= Sim/ N= Sair/ I= inicio)
@set /p resp=
@cls
@If %resp% EQU Y ( goto parte1 )
@If %resp% EQU y ( goto parte1 )
@If %resp% EQU I ( goto repl )
@If %resp% EQU i ( goto repl )
@If %resp% EQU N ( exit )
@If %resp% EQU n ( exit )
@If not %resp% EQU Y ( goto resps )
@If not %resp% EQU y ( goto resps )
@If not %resp% EQU I ( goto resps )
@If not %resp% EQU i ( goto resps )
@If not %resp% EQU N ( goto resps )
@If not %resp% EQU n ( goto resps )
@pause > nul
@cls
:parte2
@echo Registros passados:
@type Ca.txt
@echo.
@echo Digite o Dia/Mes
@set /p DM=
@echo Digite o recado importante do dia acima
@set /p RI=
@echo.
@echo.
@echo Dia e Mes: %DM% >> Ca.txt
@echo Recado importante: %RI% >> Ca.txt
@echo. >> Ca.txt
:dat
@echo Deseja inserir mais uma Data?  (Y= Sim/ N= Sair/ I= inicio)
@set /p resp=
@cls
@If %resp% EQU Y ( goto parte2 )
@If %resp% EQU y ( goto parte2 )
@If %resp% EQU I ( goto repl )
@If %resp% EQU i ( goto repl )
@If %resp% EQU N ( exit )
@If %resp% EQU n ( exit )
@If not %resp% EQU Y ( goto dat )
@If not %resp% EQU y ( goto dat )
@If not %resp% EQU I ( goto dat )
@If not %resp% EQU i ( goto dat )
@If not %resp% EQU N ( goto dat )
@If not %resp% EQU n ( goto dat )
@pause > nul
@cls
exit

Creio q não tem Bug.
Porfavor, comentem, Thanks!  ;)

Anonymous

Bom!!!

Eu sei fazer isso em pascal, mas não sabia da técnica com o
bloco de notas até então, somente em java.

Batch é show.

E você está se saindo muito bem.

Trojan

Vlw, incentivos sempre são bem vindos!

Soh q ainda vou ver se consigo alterar, colocar as 2 coisas q citei no começo do outro post. se conseguir ficara muito bom!  :D


Aceita-se ajuda! ::)