alias fdns {
  set -u20 %forcedns $true
  .dns $1-
}

on *:dns: {
  var %i $dns(0)
  while (%i) {
    if (%forcedns) {
      echo -a $+(14, $time) $BArB $dns(%i).ip
    }
    else {
      set -u20 %dnsstr $DELIM $dns(%i).ip

    }
    dec %i
  }
  unset %forcedns
  haltdef
}