[mIRC Addon] Clone Kicker

[centos]

On !^*:JOIN:#: {
  if ($nick(#,$me,@&~%)) {
    IF ($ial == $false) { .ial on }
    IF ($chan(#).ial == $false) { who # | RETURN }
    VAR %total = $ialchan($wildsite,#,0)
    IF (%total >= 3) {
      if (%modechanWQ != $true) {
        raw mode  # +MRb $address($nick,2)
        set -u5 %modechanWQ $true
        .timerclones-XS 1 10 mode $chan -MR
      }
      VAR %i = 0
      WHILE (%i < %total) {
        INC %i
        VAR %nick = $ialchan($wildsite,#,%i).nick
        VAR %all.nicks = $addtok(%all.nicks,%nick,44)
        if (!$nick(#,$nick,@&~%)) {
          if  (!$regex($address($nick,2),/(irccloud)/i)) { kick # %nick Clone flood detected from $wildsite ( $+ %total users) }
        }
      }
      echo -c notice # *** Clone flood detected from $wildsite $+ : %all.nicks
}
  }
}