; Op/Deop all (/opall + /deopall)
; By Eric Marcarelli

alias opall {
  var %t = $chan(0)
  while ( %t > 0 ) {
    cs op $chan(%t) $me
    var %t = $calc(%t - 1) 
  }  
} 
alias deopall {
  var %t = $chan(0)
  while ( %t > 0 ) {
    mode $chan(%t) -o $me
    var %t = $calc(%t - 1) 
  }  
}