alias allban {
  var %x = $comchan($1,0) 
  var %a = 1
  while %a <= %x {
    mode $comchan($1,%a) +b $1
    mode $comchan($1,%a) +b $address($1,4)
    if $1 ison $comchan($1,%a) { kick $comchan($1,%a) $1 All ban! }
    inc %a
  }
}