alias özellist {
  echo -a 2Özel engel listesi siralaniyor.
  var %öengel 1
  while (%öengel <= $lines(ozelengel.txt)) {
    echo -a %öengel $read(ozelengel.txt,%öengel)
    inc %öengel
  }
}
alias özelekle {
  if !$1 { echo -a 2Lütfen nick belirtiniz. | return }
  if $read(ozelengel.txt,w, $+ * $+ $1 $+ * $+ ) { echo -a 2Eklemeye çalıştığın nick zaten listede ekli bulunuyor. | halt }
  write ozelengel.txt $1 | notice $1 4,1 Özel engel listeme eklendiniz.
  echo -a 4 $+ $1 $+ , 2Ozel engel listesine eklenmiştir.
}
alias özelsil {
  if !$1 { echo -a $nick 2Lütfen nick belirtiniz. | return }
  if $lines(ozelengel.txt) = 0 { echo -a 2Ozel engel kaydı bulunamadi. | halt }
  write $+(,-dl,$1,) ozelengel.txt
  echo -a $1 $+ , 2Numaralı nickin ozel engel kaydı silindi.
}
on *:open:?: { 
  if ($read(ozelengel.txt,w,$nick)) {
    msg $nick Özel engel listemdesin özel penceren otomatik olarak kapatıldı.
    closemsg $nick
  } 
}
on *:nick: { if $read(ozelengel.txt,w,$nick) { echo -a Ozel engel listesindeki  $nick  $newnick nickini aldığı için yeni nicki engel listesine eklendi. | write ozelengel.txt $newnick  | closemsg $newnick  } }