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
}