alias banac {
  if $me !isop # {
    mode # +o $me
    var %' = $ibl(#,0), %.
    while %' {
      if ($calc($ctime - $ibl(#,%').ctime) >= 900) {
        %. = $addtok(%.,$ibl(#,%'),32)
        if $numtok(%.,32) == $modespl {
          !mode # $+(-,$str(b,$v1)) %.
          %. =
        }
      }
      dec %'
    }
    if %. {
      !mode # $+(-,$str(b,$numtok(%.,32))) %.
    }
  }
}