This is a replacement for the built in mIRC /DNS. It works just like /DNS except
this allows you to receive much more detailed information, for example:mIRC's /DNS:
;Advanced DNS
;By Neo
;Copyright 2004
;[13:32] * Looking up hawkee.com
;[13:32] * Resolved hawkee.com to 269.93.153.250
; Advanced /dns:
;[13:32] * Looking up hawkee.com
;[13:32] * Resolved hawkee.com to 69.93.153.250, 69.93.153.251, 69.93.153.252
; It allows you to get a list of all IPs that the host resolves to rather than just the first.
ON *:DNS:{
if ($dns(0) == 0) {
echo $color(other) -ts * Unable To Resolve $iif($iaddress,$iaddress,$dns(0).addr)
}
else {
var %numhosts $dns(0), %host = 0
var %hosts
while (%host < %numhosts) {
inc %host 1
set %hosts %hosts $iif($dns(1) == $dns(1).ip,$dns(%host).addr,$dns(%host).ip) $+ $chr(44)
}
echo $color(other) -ts * Resolved $dns(1) to $left(%hosts,$calc($len(%hosts)-1))
}
halt
}
Good job ripping off someone elses code. This is char for char copy of http://www.mircscripts.org/comments.php?id=2100