Mine

on *:TEXT:!gag*:#:{
  if ($nick !ison $chan) { halt }
  if ($me !isop $chan) { halt }
  if ($nick !isop $chan) { halt }
  if (!$2) { halt }
  else {
    /mode $chan +b ~q: $+ $address($2,4)
    /mode $chan -qohv $str($2 $+ $chr(32),3)
  }
}
on *:TEXT:!ungag*:#:{
  if ($2 !ison $chan) $2 is not on $chan | halt
  if ($me !isop $chan) halt
  if ($nick !isop $chan) halt
  if (!$2) halt
  else { 
    /mode $chan -b ~q: $+ $address($2,4)
  }
}