on @*:TEXT:!acc-list *:#:{
if ($2 ischan) {
set %acclist.on on
set %acclist.chan $chan
.msg ChanServ access $2 list
}
}
on *:NOTICE:*:?:{
if ($nick == ChanServ) && (%acclist.on) {
msg %acclist.chan $1-
if ($1-4 == End of access list.) { unset %acclist.* }
}
}