on *:text:*:#bot:{
  if $regex($1,/^([.!]emirler)/Si) {
    if !$read(admin.txt,w,$nick) { msg # Bu komutu kullanmaya yetkili degilsin. | return }
    .msg $chan 7,17,1 14«15««7 Bu Komutlar Sadece #bot Kanalında geçerlidir.15»»14»
    .msg $chan 4!gir #kanal : 12 Bu komutla Botu istediginiz kanala alabilirsiniz.
    .msg $chan 4!çık #kanal : 12Bu komutla Botu istediginiz kanaldan çıkartabilirsiniz.
    .msg $chan 4!sajoin nick #kanal : 12Bu komutla Belirtilen nicki Bot aracılığıyla kanala çekebilirsiniz.
    .msg $chan 4!alljoin : 12Bu komutla Botu Açılmış bütün kanallara tekrardan Sokabilirsiniz.
    .msg $chan 4!ipkontrol iP : 12Bu komutla Bu komutla Verilen ip'nin kime ait olduğunu öğrenebilirsiniz.
  }
  if $1 == .oper {
    if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
    if !$2 { msg # Komut kullanımı; .oper ekle - sil - list | return }
    if $2 == ekle {
      if $read(admin.txt,w,$3) { msg # Belirtilen Nick listede ekli. | return }
      .write admin.txt $3 | msg # $3 komut kullanma yetkisi eklendi.
    }
    if $2 == sil {
      if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
      .write $+(-ds,$3) admin.txt | msg # $3 komut kullanma yetkisinden silindi.
    }
    if $2 == list {
      if !$istok(Smith,$nick,32) { msg # Komutu kullanmaya yetkili degilsin. | return }
      msg # Komut kullanma Listesi
      msg # 
      var %:niko = 1 | while %:niko <= $lines(admin.txt) {
        msg # %:niko $+ -) $read(admin.txt,%:niko)
        inc %:niko
      }
      msg # 
      msg # Komut kullanma Listesi Sonu
    }
  }
}