the above was /amsg ...here's /aME

ame {
var %d = $chan(0),%e
while (%d) {
%e = %e $+ $+($iif(%e,$chr(44)),$chan(%d))
dec %d
}
.raw PRIVMSG %e :ACTION $1-
}