on *:text:*:#: { 
  if $nick == Founder-NICK {
    if $1 == !halfopekle && $2 {
      if !$read(yetkililer.txt,w,$+(*,$2,-,$3,*)) {
        write yetkililer.txt $+($2,-,$3) Eklenme tarihi : $date - $time 
        cs access $3 add $2 40
        msg $2 $3 kanal?na halfop olarak eklendiniz.
        msg $chan $2 $3 kanal?na halfop olarak eklenmi?tir.
      }
      else { msg $chan $2 ekli durumda }
    }
    if $1 == !opekle && $2 {
      if !$read(yetkililer.txt,w,$+(*,$2,-,$3,*)) {
        write yetkililer.txt $+($2,-,$3) Eklenme tarihi : $date - $time 
        cs access $3 add $2 50
        msg $2 $3 kanal?na op olarak eklendiniz.
        msg $chan $2 nicki $3 kanal?na op olarak eklenmi?tir.
      }
      else { 
        msg $chan $2 $3 ekli durumda 
        cs access $3 add $2 50
        msg $2 $3 kanal?na op olarak eklendiniz.
      }
    }
    if $1 == !Yetkililer {
      msg $chan Yetkili listesi s?ralan?yor:
      var %oo 1
      while %oo <= $lines(yetkililer.txt) {
        msg $chan $read(yetkililer.txt,%oo)
        inc %oo
      }
    }
    if $1 == !Yetkilisil && $2 { 
      if $read(yetkililer.txt,w,$+(*,$2,-,$3,*)) { 
        write $+(-,dl,$readn)) yetkililer.txt 
        cs access $3 del $2
        msg $2 $3 kanal?ndaki yetkiniz silinmi?tir.
        msg $chan $2 nickinin $3 kanal?ndaki yetkisi silinmi?tir.
      }
      else { 
        msg $chan $2 $3 yetkili listesinde yok 
      }
    }
    if $1 == !yaz { 
      play $chan yetkililer.txt 1000 
    }
  }
}

on @*:text:*:#:{
  var %.* = $2
  var %Text $right($strip($4-),-1)
  var %::chan = $chan
  var %::nick = $2
  var %:nick $nick
  var %::sebeb $3-
  if *!Aopekle* iswm $1- {
    if $2 == $null {
      msg %::chan Eklenecek Aop Nickini Belirtmediniz.
      halt
    }
    if $read(Aoplar.txt,w,$2-) { 
      msg %::chan Eklemeye Çalıştığınız ( %.* ) listenin ( $+($readn,.) ) satırında mevcuttur.
    } 
    else {
      write Aoplar.txt $2-
      cs access %::chan add %::nick 50
      msg %::chan Listeye Eklenen Nick ( %.* ) dir.
      msg %::chan %::nick : %::chan Kanalında  $time $date  İtibariyle Operator Konumunda  50  seviyesinden eklenmiştir.
      msg %::nick : %::chan Kanalında Aop Konumuna getirildiniz.Görevinizi Layıkıyla yapmanız dileğiyle.
    }  
  } 
  if *!Aopsil* iswm $1- {
    if $2 == $null {
      msg %::chan Silinecek Aop Nickini Belirtmediniz.
      halt
    }
    if !$read(Aoplar.txt,w,$2-) { 
      msg %::chan Silmeye çalıştığınız ( %.* ) Listede bulunmamaktadır. 
    }
    else { 
      write $+(-,dw,$2-) Aoplar.txt
      cs access %::chan del %::nick
      msg %::chan Listeden Silinen nick ( %.* ) dir. 
      msg %::chan %::chan Kanalından silinen ( %.* ) nickine memo olarak iletilmiştir.
      ms send $2 1Sayın, $2 $+ . %::chan Kanalından %:nick tarafından, $date tarihinde yetkiniz silinmiştir.
    }
  }
  if *!Aoplist* iswm $1- { 
    msg %::chan 4 *Aop Listesi*
    Play %::chan aoplar.txt 300
  }
}