Archivo batch para encontrar ip libres

Te escanea las ip libres. Muy util para poder cambiar la ip de un modem 2wire y asi poder bajar N cosas del RapidShare o del Megaupload, etc.

Para saber el rango de los primeros 3 segmentos que te pide el batch ir a:
http://192.168.1.254/

De ahi click a la pestaña "enlace de banda ancha" y en direccion de internet es la ip 189.180.15.154, en este ejemplo unicamente poner 189.180.15 y despues te va a pedir el rango maximo poner 254.

Todos los creditos para:
http://www.octalh.mx.gs/

Copiar el siguiente Texto y guardarlo como archivo bat.

@echo off
:principal
color A
cls
title F!nD3R-IP [ www.octalh.mx.gs ]
SET txt=%date:~6,4%-%date:~3,2%-%date:~0,2%.tmp

FOR /L %%i IN (0,1,200) DO (

echo 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 1 0 1 0 1 0 0 1 1 1 0 1 0 0 1 1 1 0 0 0 1 1 0
echo 1 0 0 1 1 1 0 0 1 1 0 0 1 0 1 0 0 1 0 1 1 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 0 1
echo 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 1 0 1 0 1 0 0 1 1 1 0 1 0 0 1 1 1 0 0 0 1 1 0
echo 1 0 0 1 1 1 0 0 1 1 0 0 1 0 1 0 0 1 0 1 1 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 0 1
echo 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 1 0 1 0 1 0 0 1 1 1 0 1 0 0 1 1 1 0 0 0 1 1 0
echo 1 0 0 1 1 1 0 0 1 1 0 0 1 0 1 0 0 1 0 1 1 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 0 1
echo 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 1 0 1 0 1 0 0 1 1 1 0 1 0 0 1 1 1 0 0 0 1 1 0
echo 1 0 0 1 1 1 0 0 1 1 0 0 1 0 1 0 0 1 0 1 1 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 0 1
echo 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 1 0 1 0 1 0 0 1 1 1 0 1 0 0 1 1 1 0 0 0 1 1 0
echo 1 0 0 1 1 1 0 0 1 1 0 0 1 0 1 0 0 1 0 1 1 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 0 1
)

echo+1 0 0 1 1 1 8888 8 888b. d88b 888b. 888 888b. 1 0 1 0 1 0 0 1 1 0 1
echo+0 1 0 0 1 1 8www 8 8d8b. 8 8 wwP 8 .8 8 8 .8 0 0 1 1 1 0 0 0 1 1 0
echo+1 0 0 1 1 1 8 " 8P Y8 8 8 8 8wwK' wwww 8 8wwP' 1 0 1 0 1 0 0 1 1 0 1
echo+1 0 0 1 1 1 8 w 8 8 888P' Y88P 8 Yb 888 8 0 0 1 1 1 0 0 0 1 1 0
echo 1 0 0 1 1 1 0 0 1 1 0 0 1 0 1 0 0 1 0 1 1 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 0 1
echo 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 1 0 1 0 1 0 - By Octalh - 0 1 1 1 0 0 0 1 1 0
echo 1 0 0 1 1 1 0 0 1 1 0 0 1 0 1 0 0 1 0 1 1 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 0 1
echo 1 0 0 1 1 1 0 0 1 1 0 0 1 - octalh@gmail.com 0 1 1 1 0 1 0 1 0 1 0 0 1 1 0 1 0
echo 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 1 0 1 0 1 0 0 1 1 1 0 1 0 0 1 1 1 0 0 0 1 1 0
echo 1 0 0 1 1 1 0 0 1 1 0 0 1 0 1 0 0 1 0 1 1 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 0 1
echo 1 0 0 1 1 1 0 0 1 1 0 0 1 0 1 0 0 1 0 1 1 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 0 1
echo 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 1 0 1 0 1 0 0 1 1 1 0 1 0 0 1 1 1 0 0 0 1 1 0
echo 1 0 0 1 1 1 0 0 1 1 0 0 1 0 1 0 0 1 0 1 1 0 1 0 0 1 1 1 0 1 0 1 0 1 0 0 1 1 0 1
echo+
echo+
echo+
echo+ + Introduzca los 3 primeros grupos de IP.
echo+ Ejemplo: 201.137.107
set /p ip=

echo+
echo+

echo+ + Introduzca el rango a escanear [MAX. 254]
set /p r=
cls
echo+
echo+
echo+ + Por favor espere un momento....
echo+
FOR /L %%a IN (1,1,%r%) DO (
echo+ [ ESCANEANDO IP %%a de %r% ] - [%ip%.%%a]
ping -w 50 -n 1 %ip%.%%a | find "agotado" && @ECHO + IPs D0Rm1d4s ------ %ip%.%%a >>%txt%
)

cls

IF EXIST %txt% (
echo+
echo+
echo+ [OK] IPS listadas con Exito #
echo+
type %txt%
del %txt%
) ELSE (
echo+
echo+
echo+ -----=====================================-----
echo+ [ERROR] IPS No encontradas.
echo+ -----=====================================-----
echo+
echo+ Se sugiere ampliar el rango de busqueda.
echo+

)

echo+
echo+ + Desea realizar otro escaneo? S/N
echo+
set /p op=
if %op%==s goto principal
if %op%==n (
exit
)


pause > nul