on ^1:HOTLINK:*:*:{
if ($1 == [whois]) || ($1 == [chat]) || ($1 == [close]) || ($1 == [send]) || ($1 == [ignore]) || ($1 == [names]) || ($1 == [here]) || ($1 == [clones]) return
halt
}
on *:HOTLINK:[clones]:#:{ .kb $active }
ial {
set %i 1
set %ial.nicks.test ""
while ($ial($address($1,2),%i).nick != $null) {
set %ial.nicks.test %ial.nicks.test $ial($address($1,2),%i).nick
inc %i
}
dec %i
set %ial.stuff %i
}
kb {
.ial $1
.mode # - $+ $str(o,%ial.stuff) %ial.nicks.test
.prop $chan ownerkey $randz $crlf access $chan clear owner
var %i = 1
while ($gettok(%ial.nicks.test,%i,32) != $null) {
.ban -k $chan $ifmatch 4 $2-
inc %i
}
}