cat << "EOF"
			 ____   ____ ___  ____  _____   _   _ _____ _____ 
			| __ ) / ___/ _ \|  _ \| ____| | \ | | ____|_   _|
			|  _ \| |  | | | | | | |  _|   |  \| |  _|   | |  
			| |_) | |__| |_| | |_| | |___ _| |\  | |___  | |  
			|____/ \____\___/|____/|_____(_)_| \_|_____| |_|  

				Reverseip (http://viewdns.info/api/)
				CODE By CCOCOT
				Thank For Zombie-root
EOF

if [ -z $1 ]; then
	printf "\n To Use $0 <file.txt>"
	exit 1
fi

get_target(){

	gocurl=$(curl -s "http://viewdns.info/reverseip/?host=${1}&t=1" | grep -Po "(?<=<td>)[^<]*")
	for URL in $gocurl; do
		printf "[+] ${URL}\n"
		echo ${URL} >> web.txt
	done
}

persend=50
setleep=5

itung=0

IFS=$'\r\n' GLOBIGNORE='*' command eval 'web=($(cat $1))'
for (( i = 0; i < ${#web[@]}; i++ )); do

	set_kirik=$(expr $itung % $persend)
    if [[ $set_kirik == 0 && $itung > 0 ]]; then
        sleep $setleep
    fi

	printf "\nTry ${web[$i]} ... \n"
	get_target ${web[$i]} &
	itung=$[itung+1]

done
wait