on *:text:!op *:%operkanali: {
  if $2 == ekle {
    if !$read(oper.txt,w,$nick) { msg $chan $+(",$nick,") Bu Komutu Kullanmaya Yetkili Degilsiniz. Yetki listesine bakmak için 3!op list 1yazınız }
    else { opekle $3 }
  }
  if $2 == sil {
    if !$read(oper.txt,w,$nick) { msg $chan $+(",$nick,") Bu Komutu Kullanmaya Yetkili Degilsiniz. Yetki listesine bakmak için 3!op list 1yazınız }
    elseif $read(%opernick,w,$3) { msg $chan $+(",$nick,") Root Admin Silinemez. }
    else { opsil $3 }
  }
  if $2 == list {
    msg $chan  Admin'ler Listeleniyor. | oplist | msg $chan Admin'ler Listesi Sonu.
  }
}
}
alias opekle { if $1 { if $read(oper.txt,w,$1) { msg $chan - $1 - Admin zaten listede. | halt } | else { write oper.txt $1 | msg $chan - $1 - Admin listeye eklendi. } } }
alias oplist { var %s = 1,%ss = $lines(oper.txt) | while %s <= %ss {  msg $chan 4 $read(oper.txt,%s) | inc %s } }
alias opsil { if $1 { if !$read(oper.txt,w,$1) { msg $chan - $1 - Admin listesinde yok. | halt } | else { write $+(-dl,$readn) oper.txt | msg $chan - $1 - Admin listesinden silindi. } } }