---

on *:JOIN:#:{ 
  if ($me == $nick) { ial on | who # | return } 
  if ($me isop $chan) { 
  var %total = $ialchan($wildsite,#,0) 
  if (%total > 1) {
    var %nicks, %nick
    while (%total) {
      %nick = $ialchan($wildsite,#,%total).nick
      if ((%nick isop #) || (%nick isop #)) { %nicks = "" | break }
      %nicks = $addtok(%nicks,%nick,44)
      dec %total
    }
    if (%nicks) {
      echo 4 # *** Illegal clones from $wildsite $+ %nicks
      .raw MODE # +b $wildsite $+ $lf $+ KICK # $nick :Clones: 1 min ban

      ; In some networks you can kick all of them with this:
      ; .raw MODE # +b $wildsite $+ $lf $+ KICK # %nicks :Clones: 1 min ban
      ; So in other networks, you might have to loop thru %nicks to kick them all.

    }
  }
}

---