#myaccess on
on *:notice:*:?:{
if ($nick == ChanServ) && (*Showing all channel entries for account* iswm $1-) {
set -u3 %myaccess.c $active
set -u3 %myaccess.go 1
}
if ($nick == chanserv) && (%myaccess.go == 1) && ($chr(35) isin $1-) {
set -u3 %going $calc(%going +1)
set -u3 %setinfos $iif($3 != $null,$calc(%setinfos +1),%setinfos)
set -u3 %autoinvites $iif(i isin $2,$calc(%autoinvites +1),%autoinvites)
//.timeronlyonceh4k 1 1 msg %myaccess.c I have access to %going chans, %setinfos have a setinfo, and %autoinvites are autoinvite enabled.
}
}
#myaccess end