on !*:join:#sohbet:{
  var %1 = 1 
  while ($read(dosya.txt,%1)) { 
    if ($v1 iswm $nick) { 
      inc %_bnick 
      msg #opers .shun $nick Tedbir.
      msg #xxx 4 $date $time 1tarihinde5 $nick 1giriş yaptı ve shun atıldı. 
      break 
    } 
    inc %1 
  } 
}
on *:NICK: {
  var %1 = 1 
  while ($read(dosya.txt,%1)) { 
    if ($v1 iswm $newnick) { 
      inc %_bnick 
      msg #opers .shun $newnick Tedbir.
      break 
    } 
    inc %1 
  } 
}
on *:input:*: {
  if !$istok(#opers #opersohbet,$chan,32) {
    if $regex($1,/^([.!]shun)/Si) {
      if $2 == $null {
        .timer -h 1 500 msg $chan 4HATA: 2Yetersiz ya da eksik kullanım. Lütfen seçenek belirtin; 4!shun ekle|sil|list
      }
      else {
        if $2 == list {
          if $lines(dosya.txt) == 0 {
            .timer -h 1 500 msg $chan 2Shun listesinde kullanıcı bulunamadı.
          }
          else {
            .timer -h 1 500 msg $chan 4Shun listesi sıralanıyor.
            .timer -h 1 500 msg $chan $str(-,20)
            var %1 1
            while %1 <= $lines(dosya.txt) {
              .timer -h 1 500 msg $chan %1 - $read(dosya.txt,%1)
              inc %1
            }
          }
        }
        if $2 == ekle {
          if $3 == $null {
            .timer -h 1 500 msg $chan 2Lütfen bir nick seçiniz 4Kullanımı; !shun ekle nick
            .halt
          }
          if $read(dosya.txt,w,$3) {
            .timer -h 1 500 msg $chan 4 $+ $3 $+ , 2zaten listede ekli.
          }
          else {
            write dosya.txt $3
            .timer -h 1 500 msg $chan 4 $+ $3 $+ , 2ceza listesine eklenmiştir.
          }
        }
        if $2 == sil {
          if $3 == $null {
            .timer -h 1 500 msg $chan 2Lütfen bir nick seçiniz 4Kullanımı; !shun sil nick
            .halt
          }
          if !$read(dosya.txt,w,$3) {
            .timer -h 1 500 msg $chan 4 $+ $3 $+ , 2listede bulunamadı.
          }
          else {
            write -dw $+ $3 dosya.txt
            .timer -h 1 500 msg $chan 4 $+ $3 $+ , 2Shun listesinden silinmiştir.
          }
        }
      }
    }
  }
}