alias imaway {
; prefs
var %dname = [color:Red]<dialogname>[/color], %id = [color:blue]<idnumber>[/color], %tok = 1, %chans
while ($gettok($didtok(%dname, %id, 44), %tok, 44) {
var %chans = $addtok(%chans, $ifmatch, 44)
if ($numtok(%chans, 44) == 15) || (%id == $did(%dname, %id).lines) {
/raw PRIVMSG %chans $+(:,$$1-)
/unset %chans
}
/inc %tok
}
}