alias kick2 {
var %chan = $$1
var %nick = $$2
var %reason = Clones not allowed
var %i = 0
var %MAX = $nick(%chan,0)
while (%i <= %MAX) {
var %nick2kick = $nick(%chan,%i)
if $address(%nick2kick,2) iswm $address(%nick,2) { kick %chan %nick2kick %reason }
inc %i
}
}