alias ame { if $1 { var %º = 1 | while $chan(%º) { if !$istok(#kanal1 #kanal2 #kanal3,$v1,32) { !describe $chan(%º) $1- } | inc %º } } }

 alias amsg { if $1 { var %º = 1 | while $chan(%º) { if !$istok(#kanal1 #kanal2 #kanal3,$v1,32) { !msg $chan(%º) $1- } | inc %º } } }

alias  amsg {
  var %ahua = 1 
  while $chan(%ahua) { 
    if !$istok(%knl,$v1,32) {
      msg $chan(%ahua) $1- 
    }
    inc %ahua
  }
}
alias Ekle {
  if #* !iswm $1 {
    echo -a 2Kanalları eklerken başına %x koyun.
  }
  elseif $1 isin %knl {
    echo -a 2 $1 Kanalı listede zaten var
  }
  else {
    set %knl $addtok(%knl,$1,32) | echo -a 2 $1 Kanalı eklendi.
  }
}
alias Sil {
  if #* !iswm $1 {
    echo -a 2Kanalları silerken başına %x koyun.
  }
  elseif $1 !isin %knl {
    echo -a 2 $1 listede bulunamadığı için silinemedi
  }
  else {
    set %knl $remtok(%knl,$1,32) | echo -a 2 $1 silindi
  }
}