I'm pretty sure someone already made this, or a lot of you used this before, but anyway :]
This is just an alias that echoes users that are sharing channels with you, aka $comchan users :]
I needed this for something, so I thought to myself "why not share it" :P
alias shared {
echo -a :: Shared users for $active :
set %gch 1
while (%gch <= $chan(0)) {
var %j $nick($active,0)
while (%j) {
if ($nick($active,%j) ison $chan(%gch)) && ($nick($active,%j) != $me) && ($chan(%gch) != $active) {
echo -a on $chan(%gch) : $nick($active,%j)
}
dec %j
}
inc %gch
}
echo -a :: End of shared users for $active :
}