/gm {
  if ($1) {
    var %i = 1
    while (%i <= $chan(0)) {
      if ($me isop $chan(%i)) || ($me ishop $chan(%i)) { /mode $chan(%i) $1- }
      inc %i
    }
  }
}