ForumTEK.Net - IRC Forumu

ForumTEK.Net - IRC Forumu (http://www.forumtek.net/index.php)
-   Hazır Kodlar (http://www.forumtek.net/forumdisplay.php?f=51)
-   -   Mass Repeat & Repeat | Kollektif Tekrar ve Tekrar koruması. (http://www.forumtek.net/showthread.php?t=3333)

Code 24 Mart 2016 22:13

Mass Repeat & Repeat | Kollektif Tekrar ve Tekrar koruması.
 
Adından da anlaşılacağı gibi.. Toplu tekrar ve tekrar koruması..
olayımız şu..
birden fazla nick'in aynı metni tekrar etmesi durumundan korur..
ayrıca bir nick içinde yine aynı durum geçerlidir..
farklı nick'lerin tekrar taşkınlıkların da banlar tek,tek degil +bbb şeklinde atılır.. böylece zaten tekrar durumlarında kirlenen kanalı ban ve kick notlarıyla işgal etmez..
kırmızı alan ne kadar süre içinde; mavi alan kaç tekrara izin verildiğini gösterir.. musahamanıza göre ayalarını yapabilirsiniz..

Çalışma örneği:

[Üye Olmadan Linkleri Göremezsiniz. Üye Olmak için TIKLAYIN...]

Kod:

on *:text:*:#: mul $chan $nick $1-
alias -l mul {
  ;<#chan> <nick> <text>
  hinc -mu10 $+(f:,$1) $md5($3-) | hadd -mu10 $+(n:,$1) $2 $1
  if $hget($+(f:,$1),1).data >= 2 && $hget($+(n:,$1),0).item  {
    var %i $v1 | while (%i) { var %b´ $addtok(%b´,$hget($+(n:,$1),%i).item,32) | dec %i }
    var %r´ /((\w+\s|\w+){ $+ $modespl $+ })/g,%b~ $regsubex(%b´,%r`,&\1)),%i 1,%c´ $1
    while %i <= $token(%b~,0,38) {
      mode $1 $+(+,$str(b,$token($token(%b~,%i,38),0,32))) $regsubex($token(%b~,%i,38),/(\S+)/g,$address(\t,2))
      tokenize 32 $token(%b~,%i,38)
      kick $chan $* Stop $iif($token(%b~,0,32) > 1,Mass Repeat,Repeat)
      inc %i
    } 
  }
}



ALINTI


All times are GMT +3. The time now is 11:41.

Powered by vBulletin®
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.