Code:
alias banall {
  if (!$ial($2)) return
  var %i = 1, %addresses
  while (%i <= 10) {
    %addresses = %addresses $address($2,%i)
    if (%i == $modespl) {
      mode $1 + $+ $str(b,%i) %addresses
      %addresses =
    }
    inc %i
  }
  if (%addresses) mode $1 + $+ $str(b,$numtok(%addresses,32)) %addresses
}


/banall #channel <nickname>