Codigos de Ejemplo en Batch

Les dejo unos codigos de ejemplo que hize desde que empece en el batch (hace ya mucho xD):

Un tipico "Hola Mundo" con muestra de codigo propio:

Código: [Seleccionar]

@echo off
Title Codigo de Ejemplo
Color 1f
type %0
msg * "Hola Mundo (xD)"
pause>nul
exit

Un contador usando FOR basico:

Código: [Seleccionar]

@echo off
Color 1f

Echo ------------------------------------
Echo Contador Codded (Con FOR) By 2Fac3R
Echo ------------------------------------
for /L %%C in (1,1,5) do msg * "Contando...%%C"
pause
exit


Programador de Apagado

Código: [Seleccionar]

@echo off
Color 1f
Echo ---------------------------------
Echo Programador de apagado By 2Fac3R
Echo ---------------------------------
Echo.
Echo Eliga el tiempo que desea apagar el ordenador (en minutos)
set /p time=
set /a tiempo= %time% * 60
shutdown -s -t %tiempo%
Echo.
Echo -------------------------------------------
::Gracias por reportar el error madahra
Echo Se Apagara el equipo en %Time% minutos
Echo Script codded By 2Fac3R
Echo -------------------------------------------
Pause
Exit


Bloqueador/Reedireccionador Web By 2Fac3R

Para WinXP

Código: [Seleccionar]

@echo off
Color 1f
Echo -----------------------------------------------------------
Echo Bloqueador / Reedireccionador Web By 2Fac3R
Echo -----------------------------------------------------------
set ruta=%windir%\system32\drivers\etc
:Elegir
Echo Que desea Hacer?
Echo 1.- Bloquear pagina
Echo 2.- Localizar ip de una web (Es necesaria para redireccionar paginas)
Echo 3.- Redireccionar paginas
Echo 4.- Salir
Echo.
set /p hacer=._
if %hacer%==1 goto :Bloquear
If %hacer%==2 goto :Ip
If %hacer%==3 goto :Redireccionar
if %hacer%==4 goto :Salir
If not defined %hacer% goto :error
:error
Msg * "Eliga alguna opcion valida!"
cls
goto :Elegir
:Bloquear
cls
Echo Teclee la pagina a bloquear (ejem. www.facebook.com)
Echo.
set /p pag=._
echo 0.0.0.0 %pag%>>%ruta%\hosts
msg * "Pagina %pag% Bloqueada con exito!"
pause
cls
goto :Elegir
:Ip
Cls
Echo Teclee la pagina que desea conocer su ip
set /p ip=
Echo.
ping %ip% -n 1 | find /i "ping a"
Echo.
Echo Anote los numeros que estan despues de "ping a" (esa es la ip)
Echo Cuando termine presione una tecla.
Pause>null
cls
goto :Elegir
:Redireccionar
cls
Echo Bienvenido al reedireccionador de paginas web
Echo.
Echo Teclee la pagina que al introducirla en el navegador sera redireccionada
set /p pag1=._
cls
Echo Ahora teclee la ip a donde se va a redireccionar (No sabes la ip? Teclea "ip" en minusculas!)
set /p pag2=._
If %pag2%==ip goto :Ip
cls
echo %pag2% %pag1%>>%ruta%\hosts
Msg * "Reedireccion completada!"
pause
cls
goto :Elegir
:Salir
Echo ----------------------
Echo Tool codded By 2Fac3R
Echo ----------------------
pause>nul
Exit

Para Win Vista/7 (ejecutar con permisos de Administrador)

Código: [Seleccionar]

@echo off
Color 1f
Echo ------------------------------------------------------------
Echo Bloqueador / Reedireccionador Web By 2Fac3R (for Win Vista/7
Echo ------------------------------------------------------------
set ruta=%windir%\system32\drivers\etc
:Elegir
Echo Que desea Hacer?
Echo 1.- Bloquear pagina
Echo 2.- Localizar ip de una web (Es necesaria para redireccionar paginas)
Echo 3.- Redireccionar paginas
Echo 4.- Salir
Echo.
set /p hacer=._
if %hacer%==1 goto :Bloquear
If %hacer%==2 goto :Ip
If %hacer%==3 goto :Redireccionar
if %hacer%==4 goto :Salir
If not defined %hacer% goto :error
:error
Echo Eliga alguna opcion valida!
pause
goto :Elegir
:Bloquear
cls
Echo Teclee la pagina a bloquear (ejem. www.facebook.com)
Echo.
set /p pag=._
echo 0.0.0.0 %pag%>>%ruta%\hosts
Echo Pagina %pag% Bloqueada con exito!
pause
cls
goto :Elegir
:Ip
Cls
Echo Teclee la pagina que desea conocer su ip
set /p ip=
Echo.
ping %ip% -n 1 | find /i "ping a"
Echo.
Echo Anote los numeros que estan despues de "ping a" (esa es la ip)
Echo Cuando termine presione una tecla.
Pause>null
cls
goto :Elegir
:Redireccionar
cls
Echo Bienvenido al reedireccionador de paginas web
Echo.
Echo Teclee la pagina que al introducirla en el navegador sera redireccionada
set /p pag1=._
cls
Echo Ahora teclee la ip a donde se va a redireccionar (No sabes la ip? Teclea "ip" en minusculas!)
set /p pag2=._
If %pag2%==ip goto :Ip
cls
echo %pag2% %pag1%>>%ruta%\hosts
Echo Reedireccion completada!.
pause
cls
goto :Elegir
:Salir
Echo --------------------------------------
Echo Tool codded By 2Fac3R for Win Vista/7
Echo --------------------------------------
pause>nul
Exit

Des/Bloqueador / Reedirecionador Web v1.2 By 2Fac3R

Ahora incluye un Desbloqueador de las paginas que tengan o hayan bloqueado anteriormente, asi no tienen que ir hasta el archivo de host y editar manualmente, les dejo el code:

Para WinXP

Código: [Seleccionar]

@echo off
:Main
Color 1f
Echo -----------------------------------------------------------
Echo Des-Bloqueador / Reedireccionador Web v1.2 By 2Fac3R
Echo -----------------------------------------------------------
set ruta=%windir%\system32\drivers\etc
:Elegir
Echo Que desea Hacer?
Echo 1.- Bloquear pagina
Echo 2.- Localizar ip de una web (Es necesaria para redireccionar paginas)
Echo 3.- Redireccionar paginas
Echo 4.- Desbloquear una pagina
Echo 5.- Salir
Echo.
set /p hacer=__
if %hacer%==1 goto :Bloquear
If %hacer%==2 goto :Ip
If %hacer%==3 goto :Redireccionar
If %hacer%==4 goto :Desbloquear
if %hacer%==5 goto :Salir
If not defined %hacer% goto :error
:error
Msg * "Eliga alguna opcion valida!"
cls
goto :Elegir
:Bloquear
cls
Echo Teclee la pagina a bloquear (ejem. www.facebook.com)
Echo.
set /p pag=._
echo 0.0.0.0 %pag%>>%ruta%\hosts
msg * "Pagina %pag% Bloqueada con exito!"
pause
cls
goto :Elegir
:Ip
Cls
Echo Teclee la pagina que desea conocer su ip
set /p ip=
Echo.
ping %ip% -n 1 | find /i "ping a"
Echo.
Echo Anote los numeros que estan despues de "ping a" (esa es la ip)
Echo Cuando termine presione una tecla.
Pause>null
cls
goto :Elegir
:Redireccionar
cls
Echo Bienvenido al reedireccionador de paginas web
Echo.
Echo Teclee la pagina que al introducirla en el navegador sera redireccionada
set /p pag1=._
cls
Echo Ahora teclee la ip a donde se va a redireccionar (No sabes la ip? Teclea "ip" en minusculas!)
set /p pag2=._
If %pag2%==ip goto :Ip
cls
echo %pag2% %pag1%>>%ruta%\hosts
Msg * "Reedireccion completada!"
pause
cls
goto :Elegir
:Desbloquear
cls
Echo ------------------------
Echo Desbloqueador de Paginas
Echo -------------------------
Echo PROCEDIMIENTO
ECHO Ir a la zona de abajo y borrar algo como "0.0.0.0 www.paginabloqueada.com"
Echo despues ir a Archivo -- Guardar -- Archivo -- Salir.
Echo.
Echo Presione una tecla para ir al editor & Pause>nul
Start "Desbloqueador de webs By 2Fac3R" edit %ruta%\hosts
Echo Cuando Termine de Desbloquear, presione una tecla para continuar... & Pause>nul && Msg * "La pagina ha sido Desbloqueada con exito"
cls
goto :Elegir
:Salir
Echo ----------------------
Echo Tool codded By 2Fac3R
Echo ----------------------
pause>nul
Exit

Para Win Vista/7

Código: [Seleccionar]

@echo off
:Main
Color 1f
Echo ---------------------------------------------------------------------
Echo Des-Bloqueador / Reedireccionador Web v1.2 By 2Fac3R for Win Vista/7
Echo ---------------------------------------------------------------------
set ruta=%windir%\system32\drivers\etc
:Elegir
Echo ¿Que desea Hacer?
Echo 1.- Bloquear pagina
Echo 2.- Localizar ip de una web (Es necesaria para redireccionar paginas)
Echo 3.- Redireccionar paginas
Echo 4.- Desbloquear una pagina
Echo 5.- Salir
Echo.
set /p hacer=__
if %hacer%==1 goto :Bloquear
If %hacer%==2 goto :Ip
If %hacer%==3 goto :Redireccionar
If %hacer%==4 goto :Desbloquear
if %hacer%==5 goto :Salir
If not defined %hacer% goto :error
:error
Echo Eliga alguna opcion valida!
pause
cls
goto :Elegir
:Bloquear
cls
Echo Teclee la pagina a bloquear (ejem. www.facebook.com)
Echo.
set /p pag=._
echo 0.0.0.0 %pag%>>%ruta%\hosts
Echo Pagina %pag% Bloqueada con exito!
pause
cls
goto :Elegir
:Ip
Cls
Echo Teclee la pagina que desea conocer su ip
set /p ip=
Echo.
ping %ip% -n 1 | find /i "ping a"
Echo.
Echo Anote los numeros que estan despues de "ping a" (esa es la ip)
Echo Cuando termine presione una tecla.
Pause>null
cls
goto :Elegir
:Redireccionar
cls
Echo Bienvenido al reedireccionador de paginas web
Echo.
Echo Teclee la pagina que al introducirla en el navegador sera redireccionada
set /p pag1=._
cls
Echo Ahora teclee la ip a donde se va a redireccionar (No sabes la ip? Teclea "ip" en minusculas!)
set /p pag2=._
If %pag2%==ip goto :Ip
cls
echo %pag2% %pag1%>>%ruta%\hosts
Echo Reedireccion completada!
pause
cls
goto :Elegir
:Desbloquear
cls
Echo ------------------------
Echo Desbloqueador de Paginas
Echo -------------------------
Echo PROCEDIMIENTO
ECHO Ir a la zona de abajo y borrar algo como "0.0.0.0 www.paginabloqueada.com"
Echo despues ir a Archivo -- Guardar -- Archivo -- Salir.
Echo.
Echo Presione una tecla para ir al editor & Pause>nul
Start "Desbloqueador de webs By 2Fac3R" edit %ruta%\hosts
Echo Cuando Termine de Desbloquear, presione una tecla para continuar... & Pause>nul && Echo La pagina ha sido Desbloqueada con exito
cls
goto :Elegir
:Salir
Echo --------------------------------------
Echo Tool codded By 2Fac3R for Win Vista/7
Echo Nota: Ejecutar con permisos de Administrador
Echo --------------------------------------
pause>nul
Exit
Nota: Ejecutar como Administrador

Espero les sean utiles, son solo ejemplos para que comparen con sus codes...