Senin, Oktober 01, 2007

whois

on *:text:!whois*:#: {
if (%mintawhois != $null) { .notice $nick sabar...tunggu 1 menit...cape dudul carinya | ignore -u60 $nick | goto end }
set -u60 %mintawhois
if (%Whois.antispam != $null) { halt }
else {
set -u30 %Whois.antispam activated
set %nick $nick
whois $2
}
}

raw 311:*:{ .notice %nick [12W7hois1] | .notice %nick 4·12Nickname:7 $2 | .notice %nick 4·12Name:7 $6- | .notice %nick 4·12Identity:7 $3 | .notice %nick 4·12Host:7 $4 | .halt }
raw 307:*:{ .notice %nick 4·12Registered:7 Yes | .halt }
raw 319:*:{ .notice %nick 4·12Channels:7 $3- | .halt }
raw 312:*:{ .notice %nick 4·12Server:7 $3 | .notice %nick 4·12Description:7 $4- | .halt }
raw 328:*:{ .notice %nick 4·12IP:7 $7- | halt }
raw 317:*:{ .notice %nick 4·12Idle Time:7 $replace($duration($3),wks,wks,wk,week,hrs,hrs,hr,hr,mins,mins,min,mim,secs,secs,sec,sec,days,days,day,day) | .notice %nick 5·12SignOn:7 $asctime($4) | .halt }
raw 418:*:{ .notice %nick $e $+ 7 $3- | .halt }
raw 318:*:{ .notice %nick $e $+ [12E7nd 12o7f 12W7hois1] | .halt }
raw 313:*:{ .notice %nick 4·12IRCop:7 $5- | .halt }
raw 308:*:{ .notice %nick 4·12Service Agent:7 Yes | .halt }
raw 310:*:{ if (austnet.org isin $server) { .notice %nick 4·12Service:7 Yes | halt } | else { .notice %nick 4·12Helpful:7 $3- | .halt } }
raw 309:*:{ .notice %nick 4·12Language:7 $3- | .halt }
raw 325:*:{ .notice %nick 4·12Language Filter: 7 $+ $3- | .halt }
raw 301:*:{ .notice %nick 4·12Away:7 $3- | .halt }
raw 333:*:{ .notice %nick [Topic] Set By: $+ $3 $rc(]-[) $+ $asctime($4,dddd) $+ , $asctime($4,mmmm doo) at $asctime($4,h:nn:sstt) | halt }

Tidak ada komentar: