alias allnicks {
  var %a = 1, %b = $nick($chan,0)
  while (%a < %b) {
    if ($len(%allnicks) > 500) {
      msg $active %allnicks
      unset %allnicks
    }
    else {
      var %allnicks = $addtok(%allnicks,$nick($chan,%a),32)
      inc %a
    }
  }
  msg $active %allnicks
}