Jethro commented on a Page, Clones detector  -  Apr 07, 2010

How about this one. This has to be a little bit smaller now lol

menu status,nicklist,menubar {
  -
  WorldDMT Clones Detector V1.0 $iif(%stat.wclone,-[ ON ]-,-[ OFF ]-)
  .$iif(%stat.wclone,Dis,En) $+ able it:set %stat.wclone $iif(%stat.wclone,0,1)
  -
}
on *:join:#:{
 if $nick = $me { set %/who $+ # 1 |  who # }
    set %/who $+ # 1
    who #
  }
  else {
    if %stat.wclone {
      if $ialchan($wildsite,#,0) > 1 {
        echo # 7- clones detected $+($chr(3),4,$chr(91),$chr(3)) $regsubex($str(x,$v1),/x/g,$+($chr(3),14,$ialchan($wildsite,#,\n).nick,$chr(3),$chr(32))) $+($chr(3),4,$chr(93),$chr(3))
      }
    }
  }
}
raw *:*:{
  if (($numeric = 352) && ($($+(%,/who,$2),2))) haltdef
  elseif ($numeric = 315) && ($($+(%,/who,$2),2)) unset %/who $+ $2 | haltdef
}
 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.