autounban

n *:RAWMODE:#: { 
  if ($me !isop # && $me !ishop #) { return } 
  var %x 1,%t 1 
  while $mid($1,%x,1) { 
    if ($v1 isin +-) { 
      var %w $v1 
      inc %x 
      continue 
    } 
    if ($v1 !isincs $token($chanmodes,4,44)) { 
      inc %t 
      if (%w = + && $mid($1,%x,1) === b) { 
        var %a $(,$ $+ %t) 
        if ($regex(%a,/^(?:~[nq]:)?(.+)$/) && $regml(1) iswm $address($me,5)) { var %b %b %a } 
        elseif ($regex(%a,/^~r:\Q $+ $replace($fullname,$chr(32),_) $+ \E$/)) { var %b %b %a } 
        elseif ($regex(%a,/^~c:[^#]?(.+)$/) && $me ison $regml(1)) { var %b %b %a } 
      } 
    } 
    inc %x 
  } 
  if (%b) mode # - $+ $str(b,$modespl) %b