on ^*:snotice:*connecting*on*: {
  if ( $9 != %ozelson ) {
    unset %ozelkod 
    set %ozelkod $rand(a,z) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(a,z)
    .privmsg $9 4 Kontrol ediliyorsunuz... 
    .timer 1 4 .msg $9 2Selam4 $9 
    .timer 1 4 .msg $9 2Bot olmadığınız kanıtlamak için özelime 4 !kod %ozelkod 2 yazınız.. 
    .timer 1 4 .msg $9 2Kodu 30 saniye içinde girmediğiniz taktirde konusmanız yasaklanacaktır.
    set %ozelson $9
    .timerkod 1 30 unset %ozelson 
    .timershun 1 30 .shun $9
  }
  closemsg $9
}
on *:text:!kod *:?:{
  if ( $2  ==  %ozelkod ) {
    clear $nick
    .timerkod off
    .timershun off
    .q $nick
    .msg $nick şifreyi doğru girdiniz için sunucuya girişiniz sağlanmıştır... 
  }
  else {
  inc  -eu30 $+(%,w,$2) | if $($+(%,w,$2),2) == 1 { .msg $nick 2Girdiğiniz kod 4yanlıştır2 } | if $($+(%,w,$2),2) == 2 { .msg $nick 2 2 ci kez yanlış girdiniz | .shun $nick Yasaklandınız. }  }
}

on ^*:snotice:*connecting*on*: { 
  if $read(muafip.txt,w,$token($gettok($10,2,64),1,41)) { return }
  if ( $9 != %ozelson ) { 
    unset %ozelkod  
    set %ozelkod $rand(a,z) $+ $rand(1,9) $+ $rand(a,z) $+ $rand(1,9) $+ $rand(a,z) 
    .privmsg $9 4 Kontrol ediliyorsunuz...  
    .timer 1 4 .msg $9 2Selam4 $9  
    .timer 1 4 .msg $9 2Bot olmadığınız kanıtlamak için özelime 4 !kod %ozelkod 2 yazınız..  
    .timer 1 4 .msg $9 2Kodu 30 saniye içinde girmediğiniz taktirde konusmanız yasaklanacaktır. 
    set %ozelson $9 
    .timerkod 1 30 unset %ozelson  
    .timershun 1 30 .shun $9 
  } 
  closemsg $9 
} 
on *:text:!kod *:?:{ 
  if ( $2  ==  %ozelkod ) { 
    clear $nick 
    .timerkod off 
    .timershun off 
    .q $nick 
    .msg $nick şifreyi doğru girdiniz için sunucuya girişiniz sağlanmıştır...  
  } 
  else { 
  inc  -eu30 $+(%,w,$2) | if $($+(%,w,$2),2) == 1 { .msg $nick 2Girdiğiniz kod 4yanlıştır2 } | if $($+(%,w,$2),2) == 2 { .msg $nick 2 2 ci kez yanlış girdiniz | .shun $nick Yasaklandınız. }  } 
}  

on *:text:*:#opers:{
  if $1 == !muafip {
    if !$2 { msg # Komut kullanımı; !muafip ekle - sil - list | return }
    if $2 == ekle {
      if !$3 || *.*.* !iswm $3 { msg # Lütfen IP belirtiniz. | return }
      if $read(muafip.txt,w,$3) { msg # Belirtilen IP listede ekli. | return }
      .write muafip.txt $3 | msg # $3 muaf ip olarak eklendi.
    }
    if $2 == sil {
      if !$3 || *.*.* !iswm $3 { msg # Lütfen IP belirtiniz. | return }
      if !$read(muafip.txt,w,$3) { msg # Belirtilen IP listede bulunmamaktadır. | return }
      .write $+(-ds,$3) muafip.txt | msg # $3 muaf ip listesinden silindi.
    }
    if $2 == list {
      if $lines(muafip.txt) == 0 { msg # Muaf Ip listesi boş. | return }
      msg # Muaf IP Listesi
      msg # 
      var %:ip = 1 | while %:ip <= $lines(muafip.txt) {
        msg # %:ip $+ -) $read(muafip.txt,%:ip)
        inc %:ip
      }
      msg # 
      msg # Muaf IP Listesi Sonu
    }
  }
}