alias badekle { if $1 { if $read(badnick.txt,w,$1) { echo -a $1 zaten badnick listesinde. | halt } | else { write badnick.txt $1 | echo -a $1 badnick listesine eklendi. } } }

alias badlist { 

  var %s = 1,%ss = $lines(badnick.txt) 

  if (%ss == 0) { echo -a badnick listesi boş! | halt }

  echo -a badnick'ler listeleniyor..

  while %s <= %ss { 

    echo -a %s $+ -) $read(badnick.txt,%s) 

    inc %s 

  }

  echo -a badnick listelendi.

}

alias badsil { if $1 { if !$read(badnick.txt,w,$1) { echo -a $1 badnick listesinde yok. | halt } | else { write $+(-dl,$readn) badnick.txt | echo -a $1 badnick listesinden silindi.  } } }