script.quakenet.org/paste

Id: 10302; Nick: Anonymous; Timestamp: 2008-05-10 19:37:39; Pasted as: mIRC
Description: n/a

alias qallow { if ($1 == on) { set %q.allow 1 } | elseif ($1 == off) { set %q.allow 0 } }
 
on *:TEXT:*someword*:?: { 
  if ($nick ison #targetchannel) && (%q.allow == 0) {
    if ($nick == protectednick) { halt }
    else { msg $nick [Auto]: $nick $+ , you are NOT allowed to PM me asking about (...). A ban is being auto-applied for you right now. P.S.: (...). | msg q tempban #targetchannel $address($nick,2) 30m You have been BANNED from this channel. (Requested by somenick[Auto]): somemsg | ignore -u36000$address($nick,3) | ignore -u3600 $nick }
  }
  if (%q.allow == 1) { halt }
}

Parsed for bracket errors and indented:

alias qallow { if ($1 == on) { set %q.allow 1 } | elseif ($1 == off) { set %q.allow 0 } }
 
on *:TEXT:*someword*:?: {
  if ($nick ison #targetchannel) && (%q.allow == 0) {
    if ($nick == protectednick) { halt }
    else { msg $nick [Auto]: $nick $+ , you are NOT allowed to PM me asking about (...). A ban is being auto-applied for you right now. P.S.: (...). | msg q tempban #targetchannel $address($nick,2) 30m You have been BANNED from this channel. (Requested by somenick[Auto]): somemsg | ignore -u36000$address($nick,3) | ignore -u3600 $nick }
  }
  if (%q.allow == 1) { halt }
}

Options: New, Download, , mIRC Parser;