Massjoin Detecter

#massjoin.detect on
on @1:join:#: {
if (($gettok(%c.idents,%i,32) iswm $address) || ($address iswm $gettok(%c.idents,%i,32))) { halt }
%currentaddr = $mask($fulladdress,4)
%cur_ca_var = $chr(37) $+ mj $+ $chan $+ %currentaddr
%cur_ca_nicks = %cur_ca_var $+ nicks
if ( [ [ %cur_ca_var ] $+ massjoin ] == go ) {  echo -a $side alert!! clones detected in $chan ( ip: $replace(%currentaddr,@,@) ) 
.raw -q kick $chan $nick Cleaning Session - $+ $replace(%currentaddr,@,@ $+ )
halt
}
.inc -u5 [ [ %cur_ca_var ] ]
.set -u5 [ [ %cur_ca_nicks ] ] [ [ %cur_ca_nicks ] ] $+ $cr $+ kick $chan $nick Clone !
if ( [ [ %cur_ca_var ] ]  < 5 ) { halt }
.set [ [ %cur_ca_var ] $+ ban ] $mask($fulladdress, 2)
.raw -q mode $chan +b  [ [ %cur_ca_var ] $+ ban ]
{  .raw -q [ [ %cur_ca_nicks ] ]  }
.timer 1 1 { .raw -q mode $chan -b  [ [ %cur_ca_var ] $+ ban ] | .unset [ %cur_ca_var ] $+ ban }
.set -u5  [ [ %cur_ca_var ] $+ massjoin ] go
%plusk [ $+ [ $chan ] ] = $rand(A,Z) $+ $rand(a,z) $+ $rand(A,Z) $+ $rand(0,9) $+ $rand(a,z) $+ $rand(A,Z) $+ $rand(0,9) $+ $rand(a,z)
.raw -q mode # +mR
.timer 1 25 { .raw -q mode # -mR }
}
#massjoin.detect end