alias ban.regs {
  var %a = 1, %b = 1, %s
  while ($address($nick($1,%a,r),2)) {
    %s = %s $v1
    if ($numtok(%s,32) == $modespl) {
      mode $1 $+(+,$str(b,$v1)) %s
      var %s
    }
    inc %a
  }
  if (%s) mode $1 $+(+,$str(b,$numtok(%s,32)))
  while ($nick($1,%b,r)) {
    kick $chan $v1
    inc %b
  }
}