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*: {
  set -u31 $+(%,ozelkod,$9) $rand(0,999)
  .msg $9 2Selam4 $9 
  .msg $9 2Bot olmadığınız kanıtlamak için özelime 4 !kod  %ozelkod [ $+ [ $9 ] ] 2 yazınız.. 
  .msg $9 2Kodu 30 saniye içinde girmediğiniz taktirde konusmanız yasaklanacaktır.
  $+(.timer,$9) 1 30 /shun $9 1h Yasaklandiniz!
}
on *:text:!kod *:?:{
  if ($2 == %ozelkod [ $+ [ $nick ] ]) {
    .msg $nick Kodu Dogru Girdiniz Girisiniz Tamamlanmistir!
    $+(.timer,$nick) off
  }
  else {
    .msg $nick Kodu Yanlis Girdiniz.
  }
}

[04:50] <Sinan> Selam aSa
[04:50] <Sinan> Bot olmadığınız kanıtlamak için özelime  !kod 748  yazınız..
[04:50] <Sinan> Kodu 30 saniye içinde girmediğiniz taktirde konusmanız yasaklanacaktır.
[04:50] <aSa> !kod 745
[04:50] <Sinan> Kodu Yanlis Girdiniz.
[04:50] <aSa> !kod 748
[04:50] <Sinan> Kodu Dogru Girdiniz Girisiniz Tamamlanmistir!