gban {
  var %a = 1
  while ($chan(%a)) {
    if ($nick($v1,$me,ho)) mode $chan(%a) +b $$1
    inc %a
  }
}