Code:
alias wkick {
  var %n = 1
  while ( $nick(#,%n) ) {
    if ( $$1 isin $nick(#,%n) ) {
      kick # $nick(#,%n)
    }
    inc %n
  }
}