alias ame2 {
  var %a = 1
  while (%a <= $chan(0)) {
    if ($chan(%a) != #PThelp) || ( #efnet !iswm $chan( %a) ) { 
      describe $chan(%a) $1-
    }
    inc %a
  }
}