Like I said use Search, there are a lot posted, from them you could have found your answer. laugh

Code:
on *:dns: {
  if !$raddress {
    if $dns(0).nick || $iaddress || $dns(0).addr { var %a = $ifmatch }
    if $dns(0).nick {
      if $iaddress || $dns(0).addr { var %b = ( $+ $ifmatch $+ ) }
      else var %b = (No such nick)
    }
    echo $colour(h) -ta DNS lookup on %a failed. %b
    halt
  }
  echo $colour(h) -ta DNS lookup on $iif($dns(1).nick,$ifmatch,$dns(1)) successful.
  echo $colour(h) -ta Named address: $dns(1).addr
  var %i = 1 {
    while $dns(%i) {
      echo $colour(h) -ta IP address: $dns(%i).ip
      inc %i
    }
    halt
  }
}