Aquí algunos de mis bats

[hacking13]

Hola, este es mi primer post, aprovecho para daros algunos de mis batch:

Agenda:

Código:

@echo off
title Agenda 1.0 by Hacking13
:comprov1
if exist "%homedrive%\agenda_data" goto comprov1ok
if not exist "%homedrive%\agenda_data" goto comprov1fail

:comprov1fail
mkdir "%homedrive%\agenda_data"
attrib +h "%homedrive%\agenda_data"
goto comprov2

:comprov1ok
goto comprov2

:comprov2
if exist "%homedrive%\agenda_data\usuarios" goto comprov2ok
if not exist "%homedrive%\agenda_data\usuarios" goto comprov2fail

:comprov2fail
mkdir "%homedrive%\agenda_data\usuarios"
attrib +h "%homedrive%\agenda_data\usuarios"
goto register1

:comprov2ok
goto menu1

:register1
title Registrar usuario
cls
set /p nombreuser= Cual sera tu nombre?
cls
set /p passuser= Cual sera tu password?
cls
mkdir "%homedrive%\agenda_data\usuarios\%nombreuser%"
mkdir "%homedrive%\agenda_data\usuarios\%nombreuser%\pass_%passuser%"
attrib +h "%homedrive%\agenda_data\usuarios\%nombreuser%"
attrib +h "%homedrive%\agenda_data\usuarios\%nombreuser%\pass_%passuser%"
mkdir "%homedrive%\agenda_data\usuarios\%nombreuser%\admin"
attrib +h "%homedrive%\agenda_data\usuarios\%nombreuser%\admin"
cls
echo Como eres el primer usuario de la agenda seras el administrador.
echo El administrador es el unico que puede acceder a la configuracion de la agenda
pause
goto menu1

:menu1
title Agenda 1.0 by Hacking13
cls
echo                              1.Log In
echo                              2.Configuracion agenda
echo                              3.Registrarse
echo                              4.Salir
set /p menu1=   Que quieres hacer? (pon el numero correspondiente)
if %menu1%==1 goto login
if %menu1%==2 goto config
if %menu1%==3 goto register
if %menu1%==4 exit
cls
echo Opcion no valida
pause
goto menu1

:login
title Login
cls
set /p userlogin= Usuario:
cls
set /p userpass= Password:
cls
goto comprov3

:comprov3
if exist "%homedrive%\agenda_data\usuarios\%userlogin%" goto comprov3ok
if not exist "%homedrive%\agenda_data\usuarios\%userlogin%" goto comprov3fail

:comprov3fail
cls
echo Ese usuario no existe...
echo Pero puedes registrarlo en el menu
pause
goto menu1

:comprov3ok
cls
if exist "%homedrive%\agenda_data\usuarios\%userlogin%\pass_%userpass%" goto menuuser
if not exist "%homedrive%\agenda_data\usuarios\%userlogin%\pass_%userpass%" goto comprov3fail

:comprov3fail
cls
echo Password incorrecto
pause
goto menu1

:menuuser
title Bienvenido %userlogin%
cls
echo                              Bienvenido %userlogin%
echo                                1.Agregar contacto
echo                                2.Ver contacto
echo                                3.Borrar contacto
echo                                4.Salir
set /p menuuser=         Que quieres hacer? (pon el numero correspondiente)
if %menuuser%==1 goto agregar
if %menuuser%==2 goto ver
if %menuuser%==3 goto borrar
if %menuuser%==4 goto menu1
cls
echo Opcion no valida
pause
goto menuuser

:agregar
title Agregar contacto
cls
set /p nombrecont= Nombre:
cls
set /p apellido1cont= Primer Apellido:
cls
set /p apellido2cont= Segundo Apellido:
cls
set /p email= E-mail:
cls
set /p telefono= Telefono:
cls
set /p observaciones= Observaciones / datos adicionales:
cls
cd "%homedrive%\agenda_data\usuarios\%userlogin%"
echo Nombre: %nombrecont% >> %nombrecont%.txt
echo Primer apellido: %apellido1cont% >> %nombrecont%.txt
echo Segundo apellido: %apellido2cont% >> %nombrecont%.txt
echo E-mail: %email% >> %nombrecont%.txt
echo Telefono: %telefono% >> %nombrecont%.txt
echo Observaciones / datos adicionales: %observaciones% >> %nombrecont%.txt
cls
echo Contacto agregado!
pause
goto menuuser

:ver
cls
title Ver contacto
set /p contacto= Introduzca el nombre de pila del contacto:
cls
cd "%homedrive%\agenda_data\usuarios\%userlogin%"
type %contacto%.txt
pause
goto menuuser

:borrar
cls
title Borrar contacto
set /p contacto= Introduzca el nombre de pila del contacto:

:borrarcon
cls
set /p confirmacion= Esta seguro de que que quiere borrar a %contacto%? (s/n)
if %confirmacion%==s goto borrarsi
if %confirmacion%==n goto menuuser
cls
echo Solo introduzca s o n
pause
goto borrarcon

:borrarsi
erase "%homedrive%\agenda_data\usuarios\%userlogin%\%contacto%.txt"
cls
echo El contacto %contacto% ha sido borrado.
pause
goto menuuser

:config
cls
echo Aqui solo pueden entrar administradores
set /p userlogin= Usuario:
cls
echo Aqui solo pueden entrar administradores
set /p userpass= Password:
cls

:comprov4
if exist "%homedrive%\agenda_data\usuarios\%userlogin%" goto comprov4ok
if not exist "%homedrive%\agenda_data\usuarios\%userlogin%" goto comprov4fail

:comprov4fail
cls
echo Ese usuario no existe...
pause
goto menu1

:comprov4ok
cls
if exist "%homedrive%\agenda_data\usuarios\%userlogin%\pass_%userpass%" goto comprov5
if not exist "%homedrive%\agenda_data\usuarios\%userlogin%\pass_%userpass%" goto comprov4fail

:comprov4fail
cls
echo Password incorrecto
pause
goto menu1

:comprov5
if exist "%homedrive%\agenda_data\usuarios\%userlogin%\admin" goto menuadmin
if not exist "%homedrive%\agenda_data\usuarios\%userlogin%\admin" goto comprov5fail

:comprov5fail
cls
echo Tu no eres administrador! Solo los administradores pueden acceder aqui!
pause
goto menu1

:menuadmin
title Bienvenido %userlogin%
cls
echo                              Bienvenido %userlogin%
echo                                  1.Ver usuarios
echo                                2.Eliminar usuarios
echo                                 3.Eliminar agenda
echo                                   4.Salir
set /p menuadmin=                Que quieres hacer? (pon el numero correspondiente)
if %menuadmin%==1 goto verusers
if %menuadmin%==2 goto eliminarusers
if %menuadmin%==3 goto eliminaragenda
if %menuadmin%==4 goto menu1
cls
echo Opcion no valida
pause
goto menuadmin

:verusers
cls
title Ver usuarios
cd "%homedrive%\agenda_data\usuarios\"
echo Abajo se mostraran los usuarios en la columna mas a la derecha
dir /a:d
pause
goto menuadmin

:eliminarusers
title Eliminar usuarios
cls
set /p usuario= Que usuario quiere eliminar?
:eliminaruserscon
cls
set /p confirmacion= Esta seguro de que que quiere borrar a %usuario%? (s/n)
if %confirmacion%==s goto eliminarusersi
if %confirmacion%==n goto menuadmin
cls
echo Solo introduzca s o n
pause
goto eliminaruserscon

:eliminarusersi
cls
if not exist "%homedrive%\agenda_data\usuarios\%usuario%" goto noexiste
attrib -h "%homedrive%\agenda_data\usuarios\%usuario%"
rd "%homedrive%\agenda_data\usuarios\%usuario%" /S /Q
cls
echo El usuario %usuario% ha sido borrado.
pause
goto menuadmin

:noexiste
cls
echo Ese usuario no existe
pause
goto menuadmin

:eliminaragenda
title Eliminar agenda
cls
echo ATENCION! Si elimina la agenda se eliminaran todos los usuarios, incluso el administrador
set /p confirmacion= Esta seguro de que que quiere borrar la agenda? (s/n)
if %confirmacion%==s goto eliminaragendasi
if %confirmacion%==n goto menuadmin
cls
echo Solo introduzca s o n
pause
goto eliminaragenda

:eliminaragendasi
cls
attrib -h "%homedrive%\agenda_data"
rd "%homedrive%\agenda_data" /S /Q
cls
echo La agenda ha sido borrada.
pause
exit

:register
title Registrar usuario
cls
set /p nombreuser= Cual sera tu nombre?
cls
set /p passuser= Cual sera tu password?
cls
mkdir "%homedrive%\agenda_data\usuarios\%nombreuser%"
mkdir "%homedrive%\agenda_data\usuarios\%nombreuser%\pass_%passuser%"
attrib +h "%homedrive%\agenda_data\usuarios\%nombreuser%"
cls
echo Ahora ya puedes loguearte
pause
goto menu1
 

Alcoholímetro:

Código:

@echo off
title Alcoholimetro by Hacking13
set /p whisky=Cuantos whiskeys te has tomado?
set /a puntosalc=%whisky%
set /p cubatas=Cuantos cubatas te has tomado?
set /a puntosalc=%puntosalc% + %cubatas%
set /p vino=Cuantas copas de vino te has tomado?
set /a puntosalc=%puntosalc% + %vino%
set /p cerveza=Cuantas jarras de cerveza te has tomado?
set /a puntosalc=%puntosalc% + %cerveza%
set /p otras=Cuantas bebidas alcoholicas no mencionanadas te has tomado?
set /a puntosalc=%puntosalc% + %otras%
if %puntosalc% LSS 5 (
goto nb
)

if %puntosalc% GTR 5 (
goto b
)

:nb
cls
echo FELICIDADES! NO ESTAS borracho.
pause > nul
exit

:b
cls
echo ESTAS borracho.
pause > nul
exit

Anotador:

Código:

@echo off
title Anotador 1.0
:comprov1
if exist "%homedrive%%homepath%\anotador_notes.anotador" goto comprov1ok
if not exist "%homedrive%%homepath%\anotador_notes.anotador" goto comprov1fail

:comprov1ok
cd %homedrive%%homepath%
goto menu

:comprov1fail
cd %homedrive%%homepath%
echo Anotador 1.0 - Notas >> anotador_notes.anotador
echo _______________________ >> anotador_notes.anotador
goto menu

:menu
cls
echo                  1. Escribir una nota
echo                  2. Ver notas
echo                  3. Borrar notas
echo                  4. Salir

set /p opcmenu=      Que quieres hacer?
if %opcmenu%==1 goto escribir
if %opcmenu%==2 goto ver
if %opcmenu%==3 goto borrar
if %opcmenu%==4 (goto salir) else echo No te he preguntado eso && pause && goto comprov1

:escribir
cls
echo       Que quieres escribir, escribalo y pulse enter...
set /p queescribir=
echo %queescribir% >> anotador_notes.anotador
echo _______________________ >> anotador_notes.anotador
cls
echo Finalizado!!!!!!
pause > nul
goto comprov1

:ver
cls
type anotador_notes.anotador
echo Pulsa una tecla para volver al menu...
pause > nul
goto comprov1

:borrar
cls
set /p borrarono= Esta seguro de que quiere borrar TODAS las notas? (s/n)
if %borrarono%==s goto borrarsi
if %borrarono%==n (goto comprov1) else echo Solo contesta s o n && pause && goto comprov1

:borrarsi
erase anotador_notes.anotador
goto borrarok

:borrarok
cls
echo Notas borradas!!!!
pause > nul
goto comprov1

:salir
exit

Borrador de archivos inútiles:

Código:

@echo off
title Utilidades varias by Hacking13
:logono
set /p logono=Quieres que se haga un log de las actividades que se hagan en este programa?
if %logono%==s goto menulog
if %logono%==n goto menu
if %logono%==si goto menulog
if %logono%==no (goto menu) else echo No te he preguntado eso... && pause && goto logono

:menu
cls
echo                                   Que quiere hacer?
echo                                1. Limpieza de archivos temporales
echo                                2. Limpiar las cookies de Internet Explorer
echo                    3. Ahorrar espacio en disco borrando archivos inutiles
echo                                4.Salir
set /p opcmenu=              Que quieres hacer?
if %opcmenu%==1 goto temp
if %opcmenu%==2 goto cookies
if %opcmenu%==3 goto ahorrar
if %opcmenu%==4 (goto salir) else echo No te he preguntado eso... && pause && goto menu

:menulog
cls
echo                                   Que quiere hacer?
echo                                1. Limpieza de archivos temporales
echo                                2. Limpiar las cookies de Internet Explorer
echo                    3. Ahorrar espacio en disco borrando archivos inutiles
echo                                4. Ver log (el log esta en %homedrive%%homepath%)
echo                                5. Borrar log
echo                                6. Salir
set /p opcmenulog=              Que quieres hacer?
if %opcmenulog%==1 goto templog
if %opcmenulog%==2 goto cookieslog
if %opcmenulog%==3 goto ahorrarlog
if %opcmenulog%==4 goto vlog
if %opcmenulog%==5 goto blog
if %opcmenulog%==6 (goto salir) else echo No te he preguntado eso... && pause && goto menu

:temp
cls
echo %time% - Limpiando temporales...
cd %temp%
del /f /q /s *.*
echo %time% - Limpieza de temporales completada!!!!!!
echo Pulsa una tecla para volver al menu
pause > nul
goto menu

:templog
cls
cd %homepath%
echo %time% - Limpiando temporales... >> log.txt
cd %temp%
del /f /q /s *.*
cd %homepath%
echo %time% - Limpieza de temporales completada!!!!!! >> log.txt
echo --------------------------------------------- >> log.txt
echo %time% - Limpieza de temporales completada!!!!!!
echo Pulsa una tecla para volver al menu
pause > nul
goto menulog

:cookies
cls
echo %time% - Limpiando cookies de internet explorer...
cd %homepath%\cookies
del /f /q /s *.txt*
echo %time% - Limpieza de cookies de internet explorer completada!!!!!
echo Pulsa una tecla para volver al menu
pause > nul
goto menu

:cookieslog
cls
cd %homepath%
echo %time% - Limpiando cookies de internet explorer...
echo %time% - Limpiando cookies de internet explorer... >> log.txt
cd %homepath%\cookies
del /f /q /s *.txt*
cd %homepath%
echo %time% - Limpieza de cookies de internet explorer completada!!!!! >> log.txt
echo --------------------------------------------- >> log.txt
echo %time% - Limpieza de cookies de internet explorer completada!!!!!
echo Pulsa una tecla para volver al menu
pause > nul
goto menulog

:ahorrar
cls
echo %time% - Eliminando archivos inutiles de todo el sistema...
del /f /q /s *.log
del /f /q /s *.tmp
del /f /q /s *.~*
del /f /q /s *.??~
del /f /q /s ~*.*
del /f /q /s *.---
del /f /q /s *._mp
del /f /q /s *.old
del /f /q /s *.bak
del /f /q /s *.syd
del /f /q /s *.chk
del /f /q /s *.gid
del /f /q /s mscreate.dir
del /f /q /s 0???????.nch
del /f /q /s system.1st
del /f /q /s suhdlog.dat
del /f /q /s twain???.mtx
del /f /q /s modemdet.txt
del /f /q /s iebak.dat
del /f /q /s ffastun.*
del /f /q /s chklist.*
del /f /q /s Thumbs.db
echo %time% - Archivos inutiles eliminados!!!!!
echo Pulsa una tecla para volver al menu
pause > nul
goto menu

:ahorrarlog
cls
cd %homepath%
echo %time% - Eliminando archivos inutiles de todo el sistema... >> log.txt
echo %time% - Eliminando archivos inutiles de todo el sistema...
del /f /q /s *.log
del /f /q /s *.tmp
del /f /q /s *.~*
del /f /q /s *.??~
del /f /q /s ~*.*
del /f /q /s *.---
del /f /q /s *._mp
del /f /q /s *.old
del /f /q /s *.bak
del /f /q /s *.syd
del /f /q /s *.chk
del /f /q /s *.gid
del /f /q /s mscreate.dir
del /f /q /s 0???????.nch
del /f /q /s system.1st
del /f /q /s suhdlog.dat
del /f /q /s twain???.mtx
del /f /q /s modemdet.txt
del /f /q /s iebak.dat
del /f /q /s ffastun.*
del /f /q /s chklist.*
del /f /q /s Thumbs.db
cd %homepath%
echo %time% - Archivos inutiles eliminados!!!!! >> log.txt
echo --------------------------------------------- >> log.txt
echo %time% - Archivos inutiles eliminados!!!!!
echo Pulsa una tecla para volver al menu
pause > nul
goto menulog

:vlog
cls
type "%homedrive%%homepath%\log.txt"
echo Pulsa una tecla para volver al menu
pause > nul
goto menulog

:blog
cls
cd %homepath%
del /f /q /s log.txt
echo Pulsa una tecla para volver al menu
pause > nul
goto menulog

:salir
exit

Avisador:

Código:

@echo off
title Avisador 1.0
color a
:menu
cls
echo                              1. Avisar a una hora
echo                              2. Ver hora
echo                              3. Salir
set /p menuopc=                       Que quieres hacer?
if %menuopc%==1 goto avisar
if %menuopc%==2 start reloj.bat && goto menu
if %menuopc%==3 (exit) else echo No te he preguntado eso && pause && goto menu

:avisar
cls
set /p horaav=A que hora quieres que te avise?
at %horaav% msg * Llego la hora que pusiste...
cls
echo Ok, ahora me puedes cerrar si quieres.
pause > nul
goto menu

¿Está bien para ir empezando?

Saludos 

[hacking13]

Algunos más:

Buscador:

Código:

@echo off
title Buscador 1.0 by Hacking13
:menu
cls
echo            En que buscador quieres buscar?
echo 1.Google                        2.Cuil
echo 3.Yahoo                         4.Altavista
echo 5.Aol                           6.Live Search
echo 7.Ask                           8.Wikipedia (espanol)
echo 9.Metacrawler                   10.Mamma (principalmente para buscar en ingles)
echo 11.Excite                       12.Monster Crawler
echo 13.Lycos                        14.Search.com
rem 8 espacios derecha
echo.
set /p buscador= En que buscador quieres buscar? (pon el numero correspondiente)
if %buscador%==1 goto google
if %buscador%==2 goto cuil
if %buscador%==3 goto yahoo
if %buscador%==4 goto altavista
if %buscador%==5 goto aol
if %buscador%==6 goto livesearch
if %buscador%==7 goto ask
if %buscador%==8 goto wikipedia
if %buscador%==9 goto metacrawler
if %buscador%==10 goto mamma
if %buscador%==11 goto excite
if %buscador%==12 goto monstercrawler
if %buscador%==13 goto lycos
if %buscador%==14 (goto searchcom) else echo Eso no es un buscador && pause > nul && goto menu

:google
cls
set /p busqueda= Que quieres buscar en Google?
call :busqueda
start http://www.google.com/search?q=%busqueda%
goto menu

:cuil
cls
set /p busqueda= Que quieres buscar en Cuil?
call :busqueda
start http://www.cuil.com/search?q=%busqueda%
goto menu

:yahoo
cls
set /p busqueda= Que quieres buscar en Yahoo?
call :busqueda
start http://es.search.yahoo.com/search?p=%busqueda%
goto menu

:altavista
cls
set /p busqueda= Que quieres buscar en Altavista?
call :busqueda
start http://www.altavista.com/web/results?q=%busqueda%
goto menu

:aol
cls
set /p busqueda= Que quieres buscar en Aol?
call :busqueda
start http://search.aol.com/aol/search?query=%busqueda%
goto menu

:livesearch
cls
set /p busqueda= Que quieres buscar en Live Search?
call :busqueda
start http://search.live.com/results.aspx?q=%busqueda%
goto menu

:ask
cls
set /p busqueda= Que quieres buscar en Ask?
call :busqueda
start http://es.ask.com/web?q=%busqueda%
goto menu

:wikipedia
cls
set /p busqueda= Que quieres buscar en la Wikipedia?
set busqueda=%busqueda: =_%
start http://es.wikipedia.org/wiki/%busqueda%
goto menu

:metacrawler
cls
set /p busqueda= Que quieres buscar en Metacrawler?
call :busqueda
start http://www.metacrawler.com/metacrawler/ws/results/Web/%busqueda%/1/417/TopNavigation/Relevance/iq=true/zoom=off/_iceUrlFlag=7?_IceUrl=true
goto menu

:mamma
cls
set /p busqueda= Que quieres buscar en Mamma?
call :busqueda
start http://www.mamma.com/Mamma?query=%busqueda%
goto menu

:excite
cls
set /p busqueda= Que quieres buscar en Excite?
call :busqueda
start http://msxml.excite.com/info.xcite/search/web/%busqueda%/1/-/1/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/-/417/top
goto menu

:monstercrawler
cls
set /p busqueda= Que quieres buscar en Monster Crawler?
call :busqueda
start http://search.monstercrawler.com/monster/ws/results/Web/%busqueda%/1/417/top/Relevance/iq=true/zoom=off/_iceUrlFlag=7?_IceUrl=true
goto menu

:lycos
cls
set /p bsuqueda= Que quieres buscar en Lycos?
call :busqueda
start http://search.lycos.com/?query=%busqueda%
goto menu

:searchcom
cls
set /p busqueda= Que quieres buscar en Search.com?
call :busqueda
start http://www.search.com/search?q=%busqueda%
goto menu

:busqueda
set busqueda=%busqueda: =+%

Creador de autoruns:

Código:

@echo off
title Generador de aurorun 1.0 by Hacking13
color a
:menu
cls
echo 1.Generar autorun
echo 2.Que es un autorun?
echo 3.Salir
echo.
set /p opcmenu= Que quieres hacer? (pon el numero correspondiente)
if %opcmenu%==1 goto generar1
if %opcmenu%==2 goto quees1
if %opcmenu%==3 (exit) else echo Introdujiste un numero no valido solo vale 1, 2 y 3 && pause > nul && goto menu

:generar1
cls
echo 1.Se ejecutara un ejecutable (Archivos exe y bat)
echo 2.Se abrira un archivo (Cualquier archivo menos exe y bat - Ejemplo: txt)
echo 3.Cancelar
echo.
set /p ques1= Que se abrira al meter el disco? (pon el numero correspondiente)
if %ques1%==1 goto generar2
if %ques1%==2 goto generar5
if %ques1%==3 (goto menu) else echo Introdujiste un numero no valido solo vale 1, 2 y 3 && pause > nul && goto generar1

:generar2
cls
set /p ejecutable=Como se llamara el ejecutable? (si esta en la raiz del disco solo poner el nombre - Ejemplo: hola.exe, pero si no tambien poner el directorio donde se encuentra - Ejemplo: archivos/hola.exe):
cls
set /p iconodisco=Icono para el disco (si esta en la raiz del disco solo poner el nombre - Ejemplo: hola.ico, pero si no tambien poner el directorio donde se encuentra - Ejemplo: archivos/hola.ico):
echo [autorun] >> autorun.inf
echo open="%ejecutable%" >> autorun.inf
echo icon="%iconodisco%" >> autorun.inf

:generar3
cls
echo 1.Anadir opcion adicional al cd
echo 2.No anadir funcion adicional al cd
echo 3.Que es esto
echo.
set /p ques2= Que quieres hacer? (pon el numero correspondiente)
if %ques2%==1 goto generar4
if %ques2%==2 goto ok
if %ques2%==3 (goto quees2) else echo Introdujiste un numero no valido solo vale 1, 2 y 3 && pause > nul && goto generar3

:generar4
cls
echo 1.Una opcion adicional
echo 2.Dos opciones adicionales
echo 3.No anadir opciones adicionales
echo.
set /p ques3= Cuantas opciones adicionales quieres anadir? (pon el numero correspondiente)
if %ques3%==1 goto generar41
if %ques3%==2 goto generar42
if %ques3%==3 (goto ok) else echo Introdujiste un numero no valido solo vale 1, 2 y 3 && pause > nul && goto menu

:generar41
cls
set /p etiqueta1= Etiqueta (nombre) de la opcion adicional 1:
cls
set /p exec1= Archivo que se ejecutara con la opcion adicional 1:
echo SHELL\VERB1=%etiqueta1% >> autorun.inf
echo SHELL\VERB1\COMMAND=%exec1% >> autorun.inf
goto ok

:generar42
cls
set /p etiqueta1= Etiqueta (nombre) de la opcion adicional 1:
cls
set /p exec1= Archivo que se ejecutara con la opcion adicional 1:
cls
set /p etiqueta2= Etiqueta (nombre) de la opcion adicional 2:
cls
set /p exec2= Archivo que se ejecutara con la opcion adicional 2:
echo SHELL\VERB1=%etiqueta1% >> autorun.inf
echo SHELL\VERB1\COMMAND=%exec1% >> autorun.inf
echo SHELL\VERB2=%etiqueta2% >> autorun.inf
echo SHELL\VERB2\COMMAND=%exec2% >> autorun.inf
goto ok

:generar5
cls
set /p archivo=Como se llamara el archivo? (si esta en la raiz del disco solo poner el nombre - Ejemplo: hola.txt, pero si no tambien poner el directorio donde se encuentra - Ejemplo: archivos/hola.txt):
cls
set /p iconodisco=Icono para el disco (si esta en la raiz del disco solo poner el nombre - Ejemplo: hola.ico, pero si no tambien poner el directorio donde se encuentra - Ejemplo: archivos/hola.ico):
echo [autorun] >> autorun.inf
echo open=Start"%archivo%" >> autorun.inf
echo icon="%iconodisco%" >> autorun.inf
goto generar3


:ok
cls
echo OK! Ahora puedes colocar el archivo autorun.inf que se ha creado en la raiz del cd...
echo Gracias por usar generador de autorun 1.0!
pause > nul
goto menu

:quees1
cls
echo Un autorun es una archivo que se coloca en la raiz de un cd que dice lo que se ejecuta nadamas leer el cd.
pause > nul
goto menu

:quees2
cls
echo Una opcion adicional se pone en el cd para que si le das con boton derecho al icono del cd en Mi Pc saldran las opciones adicionales con el nombre y el archivo que se hayan puesto
pause > nul
goto generar3

[sub-zero]

  estan buenisimos, tenes mas imaginacion q yo y eso q yo llevo un rato mas largo con el batch
y no hice nada tan completo como lo tuyo, es q no me pongo nunca a codear nada en batch por la
vagancia y la poca imaginacion q tengo jajaja xD. la agenda esta muy bien, pero alguien que se fijara
en el code y viera donde estan las contraseñas, etc. podria meterse en cualquier usuario, no???
me he fijado con detenimiento en tu agenda, en el alcoholimetro (muy bueno tmb ) en los otros no me he fijado muy bien pero en el avisador
hay un error:

Código:

@echo off
title Avisador 1.0
color a
:menu
cls
echo                              1. Avisar a una hora
echo                              2. Ver hora
echo                              3. Salir
set /p menuopc=                       Que quieres hacer?
if %menuopc%==1 goto avisar
if %menuopc%==2 start [color=red]reloj.bat[/color] && goto menu
if %menuopc%==3 (exit) else echo No te he preguntado eso && pause && goto menu

:avisar
cls
set /p horaav=A que hora quieres que te avise?
at %horaav% msg * Llego la hora que pusiste...
cls
echo Ok, ahora me puedes cerrar si quieres.
pause > nul
goto menu

compila este code y dale a la opcion 2, no funciona ,no?? porque no hay nada que se llame reloj.bat
te ha faltado crear un archivo que abra el reloj y no se como se hace xD por lo demas esta bien. pareces bueno en batch, podrias entrar en el batch lab pasando una de las pruebas (si haces la 1 no podra ser la agenda de aqui dado q la has posteado pero puedes hacer otra u otra prueba).

saludos

                         

[hacking13]

Es verdad, este es el code de reloj.bat

Código:

@echo off
title Reloj 1.0
color a
:reloj10
cls
echo                             %date% %time%
goto reloj10

[sub-zero]

Es verdad, este es el code de reloj.bat

Código:

@echo off
title Reloj 1.0
color a
:reloj10
cls
echo                             %date% %time%
goto reloj10

si esta bien, pero a mi me parece que queda un poco como trabado, podrias poner un ping para que no fuese tan asi (aunque si a ti te gusta como lo tienes, bien por ti )

Código:

@echo off
title Reloj 1.0
color a
:reloj10
cls
echo                             %date% %time%
ping n- 2 127.00.00.1
goto reloj10

tmb puedes cambiar el n- 2 por otro numero(n- 3,5,etc.) y es la cantidad de "pings" que hara y luego volvera a mostrar otra hora depende de los segundos que hayan pasado, porque sino es que como que se traba y va muy rapido, en cambio con el ping se ve un poco mejor (te digo lo del ping por si no lo sabias, sino sorry xD).

saludos

[hacking13]

si esta bien, pero a mi me parece que queda un poco como trabado, podrias poner un ping para que no fuese tan asi (aunque si a ti te gusta como lo tienes, bien por ti )

Código:

@echo off
title Reloj 1.0
color a
:reloj10
cls
echo                             %date% %time%
ping n- 2 127.00.00.1
goto reloj10

tmb puedes cambiar el n- 2 por otro numero(n- 3,5,etc.) y es la cantidad de "pings" que hara y luego volvera a mostrar otra hora depende de los segundos que hayan pasado, porque sino es que como que se traba y va muy rapido, en cambio con el ping se ve un poco mejor (te digo lo del ping por si no lo sabias, sino sorry xD).

saludos

Sí, gracias