on ^*:text:*:#:{
if $hget(ignore,$nick) || $hfind(ignore,$address($nick,5),1).data {
halt
}
else echo $chan $+(<,$nick,>) $1-
}
menu nicklist,channel {
Add to Ignore : add.ignore $iif($snicks,$snicks,$$?="Nicks to be ignored")
Remove from Ignore : rem.ignore $iif($snicks,$snicks,$$?="Nicks to be removed")
}
alias add.ignore {
var %nicks = $replace($1-,$chr(44),$chr(32)), %a = 1, %b = $numtok(%nicks,32)
while %a <= %b {
.hadd -m Ignore $gettok(%nicks,%a,32) $iif($address($nick,5),$v1,$false)
inc %a
}
}
alias rem.ignore {
var %nicks = $replace($1-,$chr(44),$chr(32)), %a = 1, %b = $numtok(%nicks,32)
while %a <= %b {
.hdel Ignore $gettok(%nicks,%a,32)
inc %a
}
}
on *:start:{
if !$hget(ignore) { .hmake Ignore 10 }
if $exists(ignore.hsh) { .hload Ignore ignore.hsh }
}
on *:exit:{
.hsave -o Ignore ignore.hsh
}
on *:disconnect:{
.hsave -o Ignore ignore.hsh
}