alias f5 { if ($me isop #) { deop } | else { op } }
alias op {
  var %i = 1, %e = $comchan($me,0)
  while (%i <= %e) { 
    if (#* iswm $comchan($me,%i)) && ($comchan($me,%i).op == $false) { mode $comchan($me,%i) +o $me }
    inc %i
  }
}
alias deop {
  var %i = 1, %e = $comchan($me,0)
  while (%i <= %e) { 
    if (#* iswm $comchan($me,%i)) && ($comchan($me,%i).op == $true) { mode $comchan($me,%i) -o $me }
    inc %i
  }
}