Mine

on me:*:join:#:{ set %qnames $addtok(%qnames,$chan,32) | raw -q names $chan }  
alias names { set %qnames $remtok(%qnames,$chan,1,32) | names #$$1 }
raw 353:*:{ if ($istok(%qnames,$chan,32)) { haltdef } }
raw 366:*:{ if ($istok(%qnames,$chan,32)) { haltdef } }