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

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

- - Nick Takip (https://www.ircforumlari.net/mirc-scripting-sorunlari/435859-nick-takip.html)

Cevap: Nick Takip

bunu toplayıp hepsini birden versenizde tek tek ugraşmsak :) tek tek zor oluyor eklemesi bir zahmet toparlarsanız sevinirim @[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Cevap: Nick Takip

Kod:

on 1:connect:{ .IAL On | takip + 300 } 

alias takip { 

  if $1 == + { 

    $iif($hget(Takip),hfree Takip) | .enable #Takip | $iif(!$hget(Takip),hmake Takip 1000) | set %cSj $iif($2,$2,300) | echo -ta 4Takip Modu Devrede!.. $+([,%cSj,sn.,]) 

  } 

  else { .disable #Takip | unset %cSj | echo -ta 14Takip Modu DevreDışı !  

  } 

} 
 

#takip on
 

on *:snotice:*: { 

  if (*Client*exiting* iswm $1-) { var %ip $gettok($8,2,64),%nick = $gettok($8,1,33) | hadd $iif(%ip,$+(-u,%cSj),$+(-u1)) Takip %ip $iif($istok($hget(Takip,%ip),%nick,32),$hget(Takip,%ip),$iif($hget(Takip ,%ip),$hget(Takip,%ip) /!\ %nick,%nick)) }  

  if (*Client*connecting* iswm $1-) { 

    var %ip $remove($gettok($9,2,64),$chr(41)) 

    if ($hget(Takip,%ip) && $hget(Takip,%ip) != $8) {

      echo -t $chan 14,1 Takip Raporu: 3 $8 14nickinin3 %cSj 14saniye içinde kullandığı nickler 4:3 $hget(Takip,%ip) 14 İp: $+(4[,%ip,4]) 

    } 

  }

}
 

menu channel,query {

  Nick Takip

  .Aç:$iif($group(#takip) == on,echo -a 4Takip Modu Zaten Devrede.,takip + 300)

  .Kapat:$iif($group(#takip) == off,echo -a 14Takip Modu Zaten Devre Dışı,takip)

}

Serverlerde,Giriş/Çıkış Snoticeleri Farklılık Gösterebiliyor,Oyuzden Çalışmama/Hatalı Gösterme İhtimalleri mevcuttur. Bilginize.

Cevap: Nick Takip

Arkadaslar Bu nick Takip Kodunu Ban Atması İçin NasıL tasarlayabiliriz. ? Mesela 300 Saniye İçerisinde Arzu - Aysun - Fatma - Hatice Diye Nicklerle Girdiği tespit Edildi kanal'a 300 Saniye içerisinde 4 ve üzeri nick Değiştirdiyse. 300 Saniye İçerisinde (Arzy + Aysun + Fatma - Hatice Nickleri ile giriş Yaptığınız Tespit Edildi.))) Şeklinde IP Ban Atsın İstiyorum

Cevap: Nick Takip

Kod:

on 1:connect:{ .IAL On | takip + 300 } 

alias takip { 

  if $1 == + { 

    $iif($hget(Takip),hfree Takip) | .enable #Takip | $iif(!$hget(Takip),hmake Takip 1000) | set %cSj $iif($2,$2,300) | echo -ta 4Takip Modu Devrede!.. $+([,%cSj,sn.,]) 

  } 

  else { .disable #Takip | unset %cSj | echo -ta 14Takip Modu DevreDışı !  

  } 

} 
 

#takip on
 

on ^*:QUIT:{ hadd $iif($address($nick,2),$+(-u,%cSj),$+(-u1)) Takip $address($nick,2) $iif($istok($hget(Takip,$address($nick,2)),$nick,32),$hget(Takip,$address($nick,2)),$iif($hget(Takip ,$address($nick,2)),$hget(Takip,$address($nick,2)) & $nick,$nick)) } 

on ^*:part:#: { hadd $iif($address($nick,2),$+(-u,%cSj),$+(-u1)) Takip $address($nick,2) $iif($istok($hget(Takip,$address($nick,2)),$nick,32),$hget(Takip,$address($nick,2)),$iif($hget(Takip ,$address($nick,2)),$hget(Takip,$address($nick,2)) & $nick,$nick)) } 

on !^*:JOIN:#:{ 

  if ($hget(Takip,$address($nick,2)) && $hget(Takip,$address($nick,2)) != $nick) {

    echo -t $chan 14,1 Takip Raporu: 3 $nick 14nickinin3 %cSj 14saniye içinde kullandığı nickler 4:3 $hget(Takip,$address($nick,2))

    if (4 <= $numtok($hget(Takip,$address($nick,2)),38)) { ban -k # $address($nick,2) %cSj Saniyede Kullandığın Nickler: $hget(Takip,$address($nick,2))) }

  } 

}

#takip end
 

menu channel,query {

  Nick Takip

  .Aç:$iif($group(#takip) == on,echo -a 4Takip Modu Zaten Devrede.,takip + 300)

  .Kapat:$iif($group(#takip) == off,echo -a 14Takip Modu Zaten Devre Dışı,takip)

}

İstenilen Son şekli,Takip + süre İle belirtilen Süre içerisinde 4 veya 4 den fazla Değişik Nickle Girerse Nick, Kick sebebine Kullandıgı Nicklerde Eklenerek Kanaldan Atılır.

Edit:Banlar direk İP'e Atılacaktır. Kick mesajı Kırmızı Renktedir. Girdiği Nickleri Gösteren Kısım Mavidir.

Cevap: Nick Takip

Alıntı:

SiLuet Nickli Üyeden Alıntı (Mesaj 1040967233)

Kod:

on 1:connect:{ .IAL On | takip + 300 } 

alias takip { 

  if $1 == + { 

    $iif($hget(Takip),hfree Takip) | .enable #Takip | $iif(!$hget(Takip),hmake Takip 1000) | set %cSj $iif($2,$2,300) | echo -ta 4Takip Modu Devrede!.. $+([,%cSj,sn.,]) 

  } 

  else { .disable #Takip | unset %cSj | echo -ta 14Takip Modu DevreDışı !  

  } 

} 

 

#takip on

 

on ^*:QUIT:{ hadd $iif($address($nick,2),$+(-u,%cSj),$+(-u1)) Takip $address($nick,2) $iif($istok($hget(Takip,$address($nick,2)),$nick,32),$hget(Takip,$address($nick,2)),$iif($hget(Takip ,$address($nick,2)),$hget(Takip,$address($nick,2)) & $nick,$nick)) } 

on ^*:part:#: { hadd $iif($address($nick,2),$+(-u,%cSj),$+(-u1)) Takip $address($nick,2) $iif($istok($hget(Takip,$address($nick,2)),$nick,32),$hget(Takip,$address($nick,2)),$iif($hget(Takip ,$address($nick,2)),$hget(Takip,$address($nick,2)) & $nick,$nick)) } 

on !^*:JOIN:#:{ 

  if ($hget(Takip,$address($nick,2)) && $hget(Takip,$address($nick,2)) != $nick) {

    echo -t $chan 14,1 Takip Raporu: 3 $nick 14nickinin3 %cSj 14saniye içinde kullandığı nickler 4:3 $hget(Takip,$address($nick,2))

    if (4 <= $numtok($hget(Takip,$address($nick,2)),38)) { ban -k # $nick %cSj Saniyede Kullandığın Nickler: $hget(Takip,$address($nick,2))) }

  } 

}

#takip end

 

menu channel,query {

  Nick Takip

  .Aç:$iif($group(#takip) == on,echo -a 4Takip Modu Zaten Devrede.,takip + 300)

  .Kapat:$iif($group(#takip) == off,echo -a 14Takip Modu Zaten Devre Dışı,takip)

}

Merhaba.. Kick değiLde IP Ban Şeklinde nasıl yapabiliriz ? Birde Ben Ban Mesajında Değişiklik Yapmak Istıyorum O kısım neresi Acaba Renkli olarak Belirtebilir misin ?