on *:JOIN:#:{
  inc $+(%,jcount,$chan)
}
On *:TEXT:/^[!@.\`]jcount$/Si:#: {
  $iif(@* iswm $1,msg $chan,notice $nick) There have been $+(%,jcount,$chan) joins I've seen in $chan 
}