Code:
alias fmsg {
  var %i = 1
  while $scon(%i) {
    if $scon(%i).status == connected { 
      scon %i
      var %g = 1
      while $chan(%g) {
        if !$read(filter.txt,w,* $+ $chan(%g) $+ *) { msg $chan(%g) $1- }
        inc %g
      }
    }
    inc %i
  }
}


Other question: /scon 2 echo -a $chan(3)