on $*:text:/^[!@.]gag/i:#: {
  if ($me ishop #) || ($me isop #) {
    if ($nick ishop #) || ($nick isop #) || ($address($nick,2) == *!*@is.a.fraud.com) {
      if ($$2 ishop #) && ($nick ishop #) notice $nick You cannot gag a halfop | halt
      if ($$2 isop #) && ($nick ishop #) notice $nick You cannot gag an Op | halt
      if ($$2 isvoice #) mode $chan -v+b $$2 ~q: $+ $address($$2,2)
      elseif ($$2 ishop #) mode $chan -h+b $$2 ~q: $+ $address($$2,2)
      elseif ($$2 isop #) mode $chan -o+b $$2 ~q: $+ $address($$2,2)
      else mode $chan +b ~q: $+ $address($$2,2)
    }
  }
}