alias kickall {
  if ($isid) return;

  if ($nick isop $1) {
    if ($me isop $1) {
      mode # +i
      mode # +b *!*@*
      var %k = 1
      while (%k <= $nick($1,0)) {
        if ($nick($1,%k) != $me) && ($nick($1,%k) != $nick) {
          kick $chan $nick($1,%k) Mass kick command by $nick
          inc %k
        }
        else inc %k
      }
    }
  }
}
on *@:text:!kickall:#:{ 
      kickall #
}