dlsocool commented on a Page, Blacklist  -  Dec 01, 2010
alias -l purge {
  var %x = 1
  while ($nick($active,%x)) {
    var %z = 1
    while ($read(Blacklist.txt,%z)) {
      if ($address($nick($active,%x),1) == $read(Blacklist.txt,%z)) {
        mode $active +b $address($nick($active,%x),1)
        kick $active $nick($active,%x) 07B14lacklisted
        inc %z
      }
      else {
        inc %z
      }
    }
    inc %x
  }
}

This loop would be slower. If user in channel is more than 300...

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.