on *:text:*:#yetki:{ 
  if $regex($1,/[!.]dj/Si) { 
    if $2 == list {
      .timer -h 1 500 msg $chan - djler listeleniyor.
      var %:mnck = 1, %mnc = $lines(muafdj.txt)
      while %:mnck <= %mnc  {
        .timer -h 1 500 msg $chan $+(%:mnck,$chr(41)) $read(muafdj.txt,%:mnck)
        inc %:mnck
      }
      .timer -h 1 500 msg $chan - Toplam dj Sayısı:04 %mnc
    }
    if $2 == ekle { 
      if !$regex($3,/^([a-zA-ZĞğıİöÖüÜşŞçÇ_^\133\135}{][a-zA-ZĞğıİöÖüÜşŞçÇ0-9_|^}\{\133\135`-]{0,30})$/i) { msg # Lütfen nick belirtiniz. | return }
      .write muafdj.txt $strip($3) 
      else { .enable #yetki | set %kanal # | cs access #dj add $3- 45 }
    }
    if $2 == sil { 
      if !$regex($3,/^([a-zA-ZĞğıİöÖüÜşŞçÇ_^\133\135}{][a-zA-ZĞğıİöÖüÜşŞçÇ0-9_|^}\{\133\135`-]{0,30})$/i) { msg # Lütfen nick belirtiniz. | return }
      if $read(muafdj.txt,w,$strip($3)) { write -dl $+ $readn muafdj.txt  }
      else { .enable #yetki | set %kanal # | cs access #dj del $3- }
    }
  }
}
#yetki on
on *:notice:*:?:{
  if $regex($nick,/^ChanServ$/i) {
    if $regex($1-,/kanal[ıiİ]\skayitl[ıiİ]\sde[gğĞ][ıiİ]l/Si) { msg %kanal $1- | .disable #yetki | return }
    if $regex($1-,/erisim\slistesi.+kayitli.+nick/Si) { msg %kanal $1- | .disable #yetki }
    if $regex($1-,/Erisim\sseviyesi.+ve.+arasinda/Si) { msg %kanal $1- | .disable #yetki }
    if $regex($1-,/nick.+kanalindaki\serisim.+zaten/Si) { msg %kanal $1- | .disable #yetki }
    if $regex($1-,/nick.+kanalindaki\serisim\sseviyesi.+degisti/Si) { msg %kanal $1- | .disable #yetki }
    if $regex($1-,/nick.+kanalinin\serisim.+seviyeden.+eklendi/Si) { msg %kanal $1- | .disable #yetki }
    if $regex($1-,/nick.+akanalinin\dserisim.+silindi/Si) { msg %kanal $1- | .disable #yetki }
    if $regex($1-,/nick.+bkanalinin\serisim.+bulunamadi/Si) { msg %kanal $1- | .disable #yetki }
  }
}
#yetki end