on *:join:#: {
  if (%take. [ $+ [ $chan ] ] != $null) {
    mode # -o $nick
  }
}
on *:op:#: {
  if (%take. [ $+ [ $chan ] ] != $null) && ($opnick != $me) {
    mode # -o $opnick
  }
}
menu channel {
  -
  Take:/set %take. [ $+ [ $chan ] ] true | /massdeop
  Untake:/unset %take. [ $+ [ $chan ] ]
  -
}
alias massdeop {
  var %x 1
  while (%x <= $nick(#,0)) {
    set %nicks %nicks $remove($nick(#,%x,a,v),$me)
    if ($numtok(%nicks,32) == $modespl) { 
      mode # - $+ $str(o,$modespl) %nicks 
      unset %nicks
    }
    inc %x
  }
  if %nicks { 
    mode # - $+ $str(o,$modespl) %nicks 
    unset %nicks
  }
}