Foro de elhacker.net

Programación => Scripting => Mensaje iniciado por: xassiz_ en 12 Marzo 2010, 22:02 pm



Título: Agenda - by xassiz
Publicado por: xassiz_ en 12 Marzo 2010, 22:02 pm
xD

Bueno, tenia que apuntar los examenes de esta semana que se me juntaron muchos :P entonces hice este script rapido.

A diferencia de otras "agendas" que vi, este es un codigo mas corto y no crea archivos adicionales :P


Aqui el codigo:

Código
  1. @echo off
  2. title Agenda - by xassiz
  3. setlocal enabledelayedexpansion
  4.  
  5. :menu
  6. cls
  7. echo:    ^| MENU ^|
  8. echo: 1. Ver Agenda
  9. echo: 2. Agregar Tarea
  10. echo: 3. Salir
  11. set "op="
  12. set/p "op=>> "
  13. if not defined op (goto:menu)
  14. if ["%op%"]==["1"] (goto:Show)
  15. if ["%op%"]==["2"] (goto:Add)
  16. if ["%op%"]==["3"] (exit)
  17. goto:menu
  18.  
  19. :Show
  20. cls
  21. for /f "tokens=*" %%x in (%~0) do (
  22. set "line=%%x"
  23. if ["!line:~0,10!"]==["::AGENDA::"] (
  24. set "line=!line:~10!"
  25. echo:!line!
  26. )
  27. )
  28. goto:menu
  29.  
  30. :Add
  31. cls
  32. set "fecha="
  33. set/p "fecha=- Fecha (dd/mm/aaaa): "
  34. if not defined fecha (goto:Add)
  35. set "tarea="
  36. set/p "tarea=- Tarea: "
  37. if not defined tarea (goto:Add)
  38. for %%y in ("fecha","tarea") do (
  39. for %%z in ("^","&","<",">","|") do (set "%%~y=!% style="color: #448888;">%~y:%%~z=^%%~z!")
  40. )
  41. echo:::AGENDA::%fecha% - %tarea% >> %~0
  42. goto:menu
  43.  
  44.  
  45.  


Saludos!  ::) ;)


Título: Re: Agenda - by xassiz
Publicado por: Komodo en 12 Marzo 2010, 22:07 pm
Interesante código.