$checkexcept(%cnick,nick)
alias listcheck {
var %cnick = $gettok($1,1,33)
var %cident = $gettok($gettok($1,1,64),2,33)
var %chost = $gettok($gettok($1,1,58),2,64)
var %crname = $gettok($gettok($1,1,61),2,58)
var %cip = $gettok($1,2,61)
if ($checkexcept(%cnick,nick)) {
msg #opers Except Nick: $1
}
}
alias checkexcept {
if ($2 == nick) {
if ($read($mircdirbllistsexception
ick.exc, w, $2)) {
return 1
}
else {
var %i = 1
while ($read($mircdirbllistsexceptionwcnick.exc,%i)) {
if ($read($mircdirbllistsexceptionwcnick.exc,%i) iswm $2) {
return 1
halt
}
else {
inc %i 1
}
}
}
}
}