Well I didn't made the script for the IAL function but for the IRC Operator Scan.

on *:JOIN:*:{
if ($nick == $me) goto scan
else goto one
:scan
.who $chan
halt
blushne
.who $nick
halt
}

raw 352:*:{
if (* isin $7) {
if ($level($address($6,15)) != 100) .guser 100 $6 1 IRC Operator
}
}