alias amsg213 { 
  var %a = 1
  while ($chan(%a) <= $chan(0)) { 
    if !$istok(#idle #vivec #pancakes,$chan(%a),32) {
      msg $chan(%a) $1- 
    }  
    inc %a 
  } 
}