alias badnick {
  if $1 = ekle { 
    if $read(dosya.txt,w,$+(bad:*,$2,*)) { 
      echo -t : $2 zaten ekli durumda
    return }
    write dosya.txt $+(bad:,$2)
    echo -t : $2 listeye eklendi
  }
  if $1 = sil { 
    if !$read(dosya.txt,w,$+(bad:*,$2,*)) { 
      echo -t : $2 listede bulunamadı. 
      return
    }
    write $+(-dl,$readn) dosya.txt 
    echo -t : $2 lsiteden silindi.
  }
}