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/)

- - clone protection.. (https://www.ircforumlari.net/mirc-scripting-sorunlari/2404-clone-protection.html)

MaeLStrOm

21 Nisan 2005 20:16

clone protection..

arkadaşlar şimdi clone koruması arıyorum.kanalıma aynı ip den mesela 6 kişi girdiğinde ip ye ban atıp 6 ki$iyide clone protection ve ip lerini gostererek kicklesin.aşağıdaki code üzerinde oynama yaparak bana kodu verirseniz cok sevinirim.

on ^!*:JOIN:#:{ if ($ialchan($address($nick,2),#,0) > 1) { var %_match = - $+ $ialchan($address($nick,2),#,0) $+ Clones; | var %x = $ialchan($address($nick,2),#,0) , %nicks | if (%x > 1) { while (%x) { %nicks = %nicks $ialchan($address($nick,2),#,%x).nick | dec %x } } | echo $colour(join) $target $timestamp * $nick ( $+ $address $+ ) has joined $chan %_match $iif($ialchan($address($nick,2),#,0) > 1 , %nicks ) | haltdef } }

UOnur

21 Nisan 2005 20:28

Kod:

on ^!*:JOIN:#:{ 

  if ($ialchan($address($nick,2),#,0) > 1) { 

    var %_match = - $+ $ialchan($address($nick,2),#,0) $+ Clones; 

    var %x = $ialchan($address($nick,2),#,0) , %nicks 

    if (%x > 1) { 

      while (%x) { 

        %nicks = %nicks $ialchan($address($nick,2),#,%x).nick 

        dec %x 

      } 

    } 

    echo $colour(join) $target $timestamp * $nick ( $+ $address $+ ) has joined $chan %_match $iif($ialchan($address($nick,2),#,0) > 1 , %nicks ) 

    .Salla $chan %nicks 

    haltdef 

  } 

}

alias Salla { 

  var %y 1

  while $gettok($2-,%y,32) {

    .ban $1 $ifmatch

    .kick $1 $ifmatch Clone!!! 

    inc %y

  }

}

Denemedim Çalışırmı Bilmiyorum Ama Çalışması Gerek...
Çalışmak Zorunda :)

MephisTo

21 Nisan 2005 21:45

Alıntı:

UOnur Nickli Üyeden Alıntı

alias Salla {
var %y 1
while $gettok($2-,%y,32) {
.ban $1 $ifmatch
.kick $1 $ifmatch Clone!!!
inc %y
}
}

Arkadaşın verdiği kodla bunun arasında fark yok, hatta çalışmaz da while'da 2 tane parametre kullanman gerekeceği için, kick mesajında Ip adresini de göstermez. Çok moralim bozuk, kendimi yüksek bir binadan atmazsam bir ara cevap yazarım.... :smack:

el33t

21 Nisan 2005 22:18

6 veya daha fazla clone girdiğinde hepsi kanaldan atılır, 300 saniyeliğine. Eğer süresiz atmak istiyorsan -u300 parametresini kaldırırsın ban -ku300 den. Denemedim ama çalışır sanırım.

on @*:join:#:{ if $ialchan($wildsite,#,0) >= 6 { var %_ $v1 | while %_ { ban -ku300 $chan $gettok($ialchan($wildsite,#,%_),1,33) 2 clone | dec %_ } } }

UOnur

22 Nisan 2005 15:15

Alıntı:

MephisTo Nickli Üyeden Alıntı

IP'sini Göstereceksin Demiş Arkadaş Ben Onu Görmedim.Kod Çalışıyormu Bilmiyorum Ama İki Kod Arasındaki Fark Şu.
1. Kod Sadece Clone'ları Gösterir (yani /echo)
2. Kod İse Atar (tabi Çalışırsa...)

bLackStar

26 Nisan 2005 15:13

el33t yazdığı kod, kısa ve öz çok iyi. bide 20 saniye içinde bu olaylar olursa, işlem yapılmasını sağlayacak bir hale getirilirse kod dört dörtlük olacaktır.

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