alias deop {
  var %x = 1
  while (%x <= $chan($me)) {
    mode $chan(%x) -qo $me $me
    inc %x
  }
}