alias ame2 {
  var %a = 1
  while (%a <= $chan(0)) {
    if ($chan(%a) != #PThelp) { 
      if (#efnet iswm $chan(%a)) {
       ; put your code here!
        echo $chan(%a) %a $+ . success 
      }
    }
    inc %a
  }
}