I had this:

Code:
on ^!*:JOIN:#: {
  if ($address($me,2) == $address($nick,2)) {
    var %clone = $address($nick,2) | var %m = $nick(#,0) | var %i = 1 | haltdef
    while (%i <= %m) {
      if (%clone == $address($nick(#,%i) ,2)) {
        if ($nick != $nick(#, %i)) { echo 3 -lt $chan * $nick ( $+ $remove($address($nick,1),*!*) $+ ) has joined # and is an clone of $nick(#,%i) ( $+ $remove($address($nick(#,%i),1),*!*) $+ ) }
      }
      inc %i
    }
  }
}


but your is probably better. smile