23 April 2012

Semak Ngan Whois...

/*
/whois flood protection (for ircops)
By GT`Crewz

would be 2 /whois's in 5 seconds.
*/
alias max.whois return 2 5
on ^*:snotice:* did a /whois on you.: {
  $iif(!$($+(%,$2,whois),2),set $+(-u,$gettok($max.whois,2,32)) $+(%,$2,whois) 1,inc $+(%,$2,whois) 1)
  if ($($+(%,$2,whois),2) == $gettok($max.whois,1,32)) { unset $($+(%,$2,whois),1) | kill $2 [ /whois abuser - $max.whois in $max.whois.time secs GT`crewz ] }

No comments: