a way to do all channels at once:
Code:
var %x = 1, %y
while ($comchan($me,%x)) {
  var %y = $addtok(%y,$ifmatch,44) | inc %x
}
if (%y) { WHO %y }

another way, each channel seperate with 6 seconds delay in between:
Code:
var %x = 1, %y
while ($comchan($me,%x)) {
  .timer 1 %y WHO $ifmatch
  inc %y 6
  inc %x
}