Something

; filtering kick
alias fkicka {
  var %n = $numtok($snicks,44) 
  while (%n) { 
    %snicks = $addtok(%snicks,$gettok($snicks,%n,44),44) 
    inc %snicks.limit
    if (%snicks.limit == 4) { kick # %snicks $1- | if ($1 == ban) .raw -q mode # + [ $+ [ $str(b,$numtok(%snicks,44)) ] ] $replace(%snicks,$chr(44),$chr(32)) | unset %snicks* }
    dec %n
  }
  if (%snicks) { kick # %snicks $1- | if ($1 == ban) .raw -q mode # + [ $+ [ $str(b,$numtok(%snicks,44)) ] ] $replace(%snicks,$chr(44),$chr(32)) | unset %snicks*  }
}
;to use it put the following into your nicklist popups... Uses: select nicks you want to kick than click it
;$iif($me isop #,Kick): fkicka             <-- for kick only
;$iif($me isop #,K/ban) : fkicka ban     <-- for kick + ban

;masskick -> syntax : /kickall # reason
alias kickall {
 if ($me isop $1) {
    var %x = $nick($1,0)
    while (%x >= 1) {
      if ($nick($1,%x) != $me) { set %mkicklist $addtok(%mkicklist,$nick($1,%x),44) }
      inc %mkicklimit 
      if (%mkicklimit == 4) { kick $1 %mkicklist $2- | unset %mkick* }
      dec %x 
    }
    if (%mkicklist) { kick $1 %mkicklist $2- | unset %mkick* }
    raw -q mode $1 +bmRip *
  }
}

;Mass deop -> syntax : /dopall # 
alias dopall {
  if ($me isop $1) {
    var %x = $nick($1,0,o,vr) 
    while (%x >= 1) {
      if ($nick($1,%x,o) != $me) { set %dopall.list $addtok(%dopall.list,$nick($1,%x,o),32) }
      inc %dopall.limit 
      if (%dopall.limit == 6) { raw -q mode $1 - [ $+ [ $str(o,6) ] ] %dopall.list | unset %dopall.*  }
      dec %x 
    }
    if (%dopall.list) { raw -q mode # - [ $+ [ $str(o,$numtok(%dopall.list,32)) ] ] %dopall.list | unset %dopall.*  }
  }
}

;Mass op -> syntax : /mop 
alias mop {
  if ($me isop #) {
    var %n = $numtok($snicks,44) 
    while (%n) { 
      %snicks = $addtok(%snicks,$gettok($snicks,%n,44),32) 
      inc %snicks.limit
      if (%snicks.limit == 6) { raw -q mode # + [ $+ [ $str(o,6) ] ] %snicks | unset %snicks* }
      dec %n
    }
    if (%snicks) { raw -q mode # + [ $+ [ $str(o,$numtok(%snicks,32)) ] ] %snicks | unset %snicks*  }
  }
}
;Mass deop -> syntax : /mdop 
alias mdop {
  if ($me isop #) {
    var %n = $numtok($snicks,44) 
    while (%n) { 
      %snicks = $addtok(%snicks,$gettok($snicks,%n,44),32) 
      inc %snicks.limit
      if (%snicks.limit == 6) { raw -q mode # - [ $+ [ $str(o,6) ] ] %snicks | unset %snicks* }
      dec %n
    }
    if (%snicks) { raw -q mode # - [ $+ [ $str(o,$numtok(%snicks,32)) ] ] %snicks | unset %snicks*  }
  }
}
;Mass voice -> syntax : /mvo
alias mvo {
  if ($me isop #) {
    var %n = $numtok($snicks,44) 
    while (%n) { 
      %snicks = $addtok(%snicks,$gettok($snicks,%n,44),32) 
      inc %snicks.limit
      if (%snicks.limit == 6) { raw -q mode # + [ $+ [ $str(v,6) ] ] %snicks | unset %snicks* }
      dec %n
    }
    if (%snicks) { raw -q mode # + [ $+ [ $str(v,$numtok(%snicks,32)) ] ] %snicks | unset %snicks*  }
  }
}

;Mass devoice -> syntax : /mdvo
alias mdvo {
  if ($me isop #) {
    var %n = $numtok($snicks,44) 
    while (%n) { 
      %snicks = $addtok(%snicks,$gettok($snicks,%n,44),32) 
      inc %snicks.limit
      if (%snicks.limit == 6) { raw -q mode # - [ $+ [ $str(v,6) ] ] %snicks | unset %snicks* }
      dec %n
    }
    if (%snicks) { raw -q mode # - [ $+ [ $str(v,$numtok(%snicks,32)) ] ] %snicks | unset %snicks*  }
  }
}