alias kick5 {
var %nicksall = $nick(#,0)
var %i = 5
var %kicknicks
while (%i) {
var %nicknow = $nick(#,$r(%i,%nicksall))
if (%nicknow !isop $chan) {
if (%nicknow != $me) {
if (%nicknow !isin %kicknicks) {
var %kicknicks = %kicknicks %nicknow
}
}
}
dec %i
}
var %k = 1
while (%k <= 5) {
kick # $gettok(%kicknicks,%k,32)
inc %k
}
}