/ame with exceptions for StonedMonkey v1.0

; to set exceptions use: /set %ame_not #chan1,#chan2,#chan3,...

alias ame {
  if ($status !== connected) { linsep -a | echo $color(info) -a * /ame: not connected to a server | linesep -a | return }
  if (!$1-) { linsep -a | echo $color(info) -a * /ame: insufficient parameters | linsep -a | return }
  if ($chan(0) == 0) { linsep -a | echo $color(info) -a * /ame: no channel windows open | linsep -a | return }

  var %i = 1
  while (%i <= $chan(0)) {
    if (!$istok(%ame_not,$comchan($me,%i),44)) { describe $chan(%i) $1- }
    inc %i
  }
}