on !@*:join:*: {
.ial on
if (Sableye isin $nick) { return }
if ($ialchan($wildsite,#,0) > 1) {
var %x 1
while $ialchan($wildsite,#,0) >= %x {
if ($ialchan($wildsite,#,%x) isop #) { return }
ban -u600 $chan $wildsite
kick $chan $ialchan($wildsite,#,%x).nick No CLoneS!
write clones.txt $ialchan($wildsite,#,%x).nick
inc %x
}
return
}
if ($read(clones.txt,w,$nick)) { ban -ku600 $chan $wildsite CLone Nick }
}