#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