IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası

- mIRC Scripting Sorunları (https://www.ircforumlari.net/mirc-scripting-sorunlari/)

- - !kod (https://www.ircforumlari.net/mirc-scripting-sorunlari/354651-kod.html)

peki 30 sn içinde kodu girmez ise shun attıra bilirmiyiz bu parçayı atlamayalım :)

Kod:

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. }  }

}

böyle olacaktır

Kod:

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.

  }

}

Kod:

[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!

Sunucuya 30 saniyede bir user girmedigine göre , kodlar karişir ve useri hep shunlarsin bunuda bir dene istersen , hayırlı IF'ler.

peki söyle yapabilirmiyiz. sunucu ismi girerek oraya göre uygulansa ? örnegin 2 sunucudayim 2sinde degilde ismini belirledigim sunucuda uyarı versin?

Kod:

on ^*:snotice:*connecting*on*: {

  if ($server == irc.bilmem.net) {

    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!

  }

}

if ($server == irc.bilmem.net) { bu kısma sunucunun ismini yazarsin ve sadece o sunucuda calişir.

Kodu girmene rağmen herkese shun atıyo komuta tekrar bakarmısınız

Kod:

 

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.

 

}

on *:text:!kod *:?:{

  if ($2 == %ozelkod [ $+ [ $nick ] ]) {

    .msg $nick Kodu Dogru Girdiniz Girisiniz Tamamlanmistir!

    $+(.timer,$nick) off

  }

  else {

    .msg $nick Kodu Yanlis Girdiniz.

  $+(.timer,$9) 1 30 /shun $9 1h Yasaklandiniz!

  }

}

Yanliş girince shunlamasi için bu şekil olmali

Kod:

 

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.

 

}

on *:text:!kod *:?:{

  if ($2 == %ozelkod [ $+ [ $nick ] ]) {

    .msg $nick Kodu Dogru Girdiniz Girisiniz Tamamlanmistir!

    $+(.timer,$nick) off

  }

  else   if ($2 != %ozelkod [ $+ [ $nick ] ])  {

    .msg $nick Kodu Yanlis Girdiniz.

  } else { 

  $+(.timer,$9) 1 30 /shun $9 1h Yasaklandiniz!

  }

}

30 saniyesinin mantiği böyle olabilir.

Kişi sunucudan ayrıldığında shun larıda kaldırsa (unshun) daha güzel olur sanki. Bunu da yapın daha güzel olsun

o zaman söyle bisi yapmakda mümkün. misal özele uyarı veriyor kodu girmesi icin. kodu girmeden kanallara giriş izni olmasın kodu dogru girince otomatikmen kanallara girebilsin olarak ayarlayabilirmiyiz..

Deneme yaptım kodu girmedin shun filan atmadı koda tekrar bakarmısınız