alias kickall {
  if ($isid) return;

  if (!$1) set %target $active
  else set %target $1

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