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

IRCForumları - IRC ve mIRC Kullanıcılarının Buluşma Noktası (https://www.ircforumlari.net/)

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

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

GhostLy

13 Eylül 2010 00:22

!kod

arkadaşlar bu kodu Client connecting girişinde verse 30 sn içinde !kod girmesse shunlanmasını nasıl sağlarız.

Kod:

; Bu yazıyı değiştirmek kodun çalışmamasına sebep olabilir... 

;Bu kod PysCoPaT tarafından yazılmıştır...

on *:open:?:*:{  

  if ( $nick != %ozelson ) {

    unset %ozelkod

    set %ozelyazi $1- 

    set %gerekli  (ßy PysCoPaT) 

    set %ozelkod $rand(a,z) $+ $rand(1,9) $+ $rand(a,z) 

    .privmsg $nick 4 Kontrol ediliyorsunuz... 15 %gerekli

    .timer 1 4 .msg $nick 2Selam4 $nick 

    .timer 1 4 .msg $nick 2Bot olmadığınız kanıtlamak için özelime 4 !kod %ozelkod 2 yazınız.. 15 %gerekli

    .timer 1 4 .msg $nick 2Kodu 30 saniye içinde girmediğiniz zaman mesajlarınızı göremiyeceğim. 15 %gerekli

    window -m @Özel 

    echo @Özel 1,4 $time(HH:nn.ss) 2 Özel isteği Nick: 4 $nick 

    set %ozelson $nick

    .timer 1 30 unset %ozelson

  }

  closemsg $nick

}

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

  if ( $2  ==  %ozelkod ) {

    clear $nick

    .window -m @Özel

    .echo @Özel 1,4 $time(HH:nn.ss) 2 $nick şifreyi doğru girdiği için özelinize kabul edilmiştir... 

    .timers off

    .q $nick

    set %gerekli  (ßy PysCoPaT)

    .msg $nick 2Şifreniz Doğru. Görüşme talebiniz 4kabul edilmiştir... Not Sadece İlk Yazdığınız $me Nickine ulaşacaktır... 15 %gerekli

    .echo $nick $timestamp < $+ $nick $+ > %ozelyazi

  }

  else {

    set %gerekli  (ßy PysCoPaT)

    .privmsg $nick 2Girdiğiniz kod 4yanlıştır2 30 saniyeliğine bana yazmanız engellenmiştir...15 %gerekli

    .timers off

    .ignore $nick

    .timer 1 30 ignore -r $nick

    .closemsg $nick

    unset %ozelson

    .window -m @Özel

    .echo @Özel 1,4 $time(HH:nn.ss) 2 $nick ile özel görüşme reddedilmiştir... Çünkü kodu yanlış girmiştir. Girmesi gereken kod:7 %ozelkod 2Kod olarak gösterilen yazı:4 $2 

  }

}

}

fener1907

13 Eylül 2010 00:29

Cevap: !kod

bu özelini açan kişide etkin olan bir kod girişle tam olarak ne yapmak istiyosun çünkü girişte kullanmak istersen her girene işlem yapacaktır

fener1907

13 Eylül 2010 00:49

Cevap: !kod

şimdi girişte ki snoticelerini kopyalarsan yapabilirız ama bunu yaparsan her girene bu işlemi uygulayacaktır ve 30 saniye içinde özeline gelmezse o kişiye shun atacaktır bunu istediğine emin misin :)

GhostLy

13 Eylül 2010 02:01

Cevap: !kod

[SiMeDYa] 23::34 -irc.sistemshell.net- *** Notice -- Client connecting on port 6667: ProSohbetCafe96 ([Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]) [clients]

peki belirlediğim ipleri muaf tutabilirmiyiz

----------

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

    .timer 1 30 unset %ozelson

  }

  closemsg $9

}

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

  if ( $2  ==  %ozelkod ) {

    clear $nick

    .timers off

    .q $nick

    .msg $nick şifreyi doğru girdiniz için sunucuya girişiniz sağlanmıştır... 

  }

  else {

    .privmsg $nick 2Girdiğiniz kod 4yanlıştır2 

  }

  else {

  }

  else {

    .privmsg $nick 2 2 ci kez yanlış girdiniz 

    .shun $nick Yasaklandınız.

  }

}

}

herşey normal fakat 2 ci kez yanlış girdiniz uyarısını verdirtemedim.

gibi

[SiMeDYa] 02::02 <GhostLy> Kontrol ediliyorsunuz...
[SiMeDYa] 02::02 <GhostLy> Selam ProSohbetCafe799
[SiMeDYa] 02::02 <GhostLy> Bot olmadığınız kanıtlamak için özelime !kod e5e5q yazınız..
[SiMeDYa] 02::02 <GhostLy> Kodu 30 saniye içinde girmediğiniz taktirde konusmanız yasaklanacaktır.
*** #ProSohbet Kanalına giremezsiniz. Banlısınız...
[SiMeDYa] 02::02 <ProSohbetCafe799> !kod e5e5q
[SiMeDYa] 02::02 <GhostLy> şifreyi doğru girdiniz için sunucuya girişiniz sağlanmıştır...
[SiMeDYa] 02::02 <ProSohbetCafe799> !kod e5ds43
[SiMeDYa] 02::02 <GhostLy> Girdiğiniz kod yanlıştır
[SiMeDYa] 02::03 <ProSohbetCafe799> !kod e5ds43
[SiMeDYa] 02::03 <GhostLy> Girdiğiniz kod yanlıştır

fener1907

13 Eylül 2010 02:54

Cevap: !kod

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

    .timer 1 30 unset %ozelson

  }

  closemsg $9

}

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

  if ( $2  ==  %ozelkod ) {

    clear $nick

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

}

30saniye içinde 2 kere yanlış girerse shun atacaktır

GhostLy

13 Eylül 2010 02:58

Cevap: !kod

sizin verdiğiniz şekilde çalişiyor fakat 2 ci kez yanlıs girdiniz demiyor.

fener1907

13 Eylül 2010 02:59

Cevap: !kod

Alıntı:

GhostLy Nickli Üyeden Alıntı (Mesaj 1040516250)

sizin verdiğiniz şekilde çalişiyor fakat 2 ci kez yanlıs girdiniz demiyor.

düzenledim tekrar dener misin

Lucifer

13 Eylül 2010 03:02

Cevap: !kod

Konu uygun bölüme alınmıştır.

GhostLy

13 Eylül 2010 03:08

Cevap: !kod

süper oldu yardımın için çok tşkkür ederim bunu tamamlayacak bir modul vardı status'de bekleten onunla ilave 2 si bir takım olacak :)

fener1907

13 Eylül 2010 03:11

Cevap: !kod

kolay gelsin o zaman sana:)

GhostLy

13 Eylül 2010 03:18

Cevap: !kod

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

fener1907

13 Eylül 2010 03:35

Cevap: !kod

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

Set	13 Eylül 2010 04:56

Cevap: !kod

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.

SaNaLStaR

13 Eylül 2010 17:24

Cevap: !kod

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

Set	13 Eylül 2010 17:52

Cevap: !kod

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.

diyorumki

13 Eylül 2010 19:24

Cevap: !kod

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

toXic

13 Eylül 2010 19:51

Cevap: !kod

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.

WeiLSiDe

13 Eylül 2010 21:42

Cevap: !kod

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

SaNaLStaR

13 Eylül 2010 21:46

Cevap: !kod

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

diyorumki

15 Eylül 2010 13:54

Cevap: !kod

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

Tüm Zamanlar GMT +3 Olarak Ayarlanmış. Şuanki Zaman: 16:21.