| KivanC |
25 Kasım 2022 22:25 |
FLood Korumasına ~T:block Eklemek
Kod:
on *:text:*:#: mul $chan $nick $1-
alias -l mul {
;<#chan>
hinc -mu10 $+(f:,$1) $+($md5($3-),:,$encode($3-,m)) | 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))
mode $1 +b $+(~T:block:,$regsubex($decode($gettok($hget($+(f:,$chan),1).item,2,$asc(:)),m),/(^|\s|$)/gi,*))
tokenize 32 $token(%b~,%i,38)
kick $chan $* Stop $iif($token(%b~,0,32) > 1,Mass Repeat,Repeat)
inc %i
}
}
}
CODED: CoCoRiCo |
