Yup I could, but I don't particularly fancy regsubex loop for this. Yours is 105 bytes. (with the word alias it will be added up to 111 bytes) And here is mine:
alias masshl var %x $$1- | while ($nick(#,$0)) tokenize 32 $1- $v1 | say $remove($2-,$me) $+ : %x
which is 97 bytes. (without the word alias, it's 91 bytes)
Even if you change $chan to #, yous will still be bigger in size.