Clone Detector

By Gummo on Sep 08, 2007

Simple, fast clone detector (requested by Metal-Maniac-Mat). When 2 people join with the same IP, it notices you in your active window.

Put this in your remotes (alt+r) as a new file (File->New).

EDIT: Added a timestamp.
EDIT: Changed method to use a variable in the loop, rather than evaluating an identifier each time. This makes it faster on big searches.

on *:JOIN:*: {
  var %ii $ialchan($wildsite,$chan,0)
  if (%ii > 1) {
    var %i 1
    while (%i <= %ii) {
      tokenize 32 $1- $ialchan($wildsite,$chan,%i).nick
      inc %i
    }
    echo -a 12 $+ $timestamp 4Clones12 detected in4 $chan $+ :12 $1- (4 $+ $wildsite $+ 12)
  }
}

Comments

Sign in to comment.
Bullet_Dodger   -  Nov 05, 2008

[size=8]>_>[/Size]

 Respond  
TheImrac   -  Nov 05, 2008

Yes there is, maybe you should try coding it, I'll give you a hint, var %x = $nick(#,0) & $address($nick(#,%x),2).

 Respond  
Bullet_Dodger   -  Nov 05, 2008

is there a way to make this into a !clonescan command for the room?

 Respond  
Recoding   -  Nov 13, 2007

Very nice Gummo, had to remove the colours as hard to read on my version, and added commas so its a bit nicer on the eyes, overall thankyou for a good script :)

 Respond  
Gummo   -  Oct 23, 2007

If you\'d like to send a message to the channel the clone(s) enter(s), rather than echoing it to yourself, use this code:

on *:JOIN:*: {
  if ($ialchan($wildsite,$chan,0) > 1) {
    var %i 1
    while ($ialchan($wildsite,$chan,%i)) {
      tokenize 32 $1- $ialchan($wildsite,$chan,%i).nick
      inc %i
    }
    msg $chan 4Clones12 detected!12 $1- (4 $+ $wildsite $+ 12)
  }
}
 Respond  
Gummo   -  Oct 08, 2007

Joshuaxiong1, I didn\'t make that type of clone detector. This was a requested script, which was then not used as the person I made it for couldn\'t work it.

Also, I only made this an on-join check as it is fast, being very useful in a room I was in, having > 17000 users in it (idling).

 Respond  
Joshuaxiong1   -  Oct 08, 2007

Cool but I just thought while I left and join again nothing telling me there\'s clones.

 Respond  
Zeroodemon   -  Sep 12, 2007

nice

 Respond  
Are you sure you want to unfollow this person?
Are you sure you want to delete this?
Click "Unsubscribe" to stop receiving notices pertaining to this post.
Click "Subscribe" to resume notices pertaining to this post.