Clone tespit addonu
Cuma, Şubat 12th, 2010n *:join:*: {
%clones = $ialchan($wildsite,#,0)
if ( %clones > 1 ) {
var %count = 1
set %clone.nicks -->
while (%count < = %clones) {
%clone.nicks = %clone.nicks $ial($wildsite,%count).nick
inc %count }
/echo $chan 0,7 0,14 0,4 • cLone • 0,14 0,7 4: $remove(%clone.nicks,-->) 2 %clones Tane }
if (%change == $null) {
haltdef
halt
}
}
mirc indir!
