Dont Cry GhosT :P

on *:join:#:{
  if ($nick != $me)  {
    if ($ial($address($nick,2),0) > 1) { 
      set %clone.count [ $+ [ $nick ] ] $ial($address($nick,2),0) 
      :cloop
      if (%clone.count [ $+ [ $nick ] ] < 1) { goto clend }
      set %clecho %clecho 7 $+ $ial($address($nick,2), %clone.count [ $+ [ $nick ] ] ).nick
      dec %clone.count [ $+ [ $nick ] ]
      goto cloop
      :clend
      echo $chan 4.:Clones Detected:. (01 $+ %clecho 7-01 $address($nick,2) $+ 7)
    }
    unset %clecho*
    unset %clone.count*
  }  
}