clone hunting with kvirc

Set this script as an alias to list clone on an IRC chan:

%nicks=$chan.users;
for(%i=0; %i<$length(%nicks); %i++)
{
	%host=$hostname(%nicks[%i]);
	if(%hosts{%host}!="")
		echo %hosts{%host} "and" %nicks[%i] "are clones";
	%hosts{%host}=%nicks[%i];
}

#kvirc