Mass HL Ban

on *:TEXT:*:#: {
  var %text $replace($replace($1-,$chr(32),$chr(44)),$chr(44) $+ $chr(44),$chr(44))
  if ($higherrank($me,$nick,$chan) == true) {
    var %i 1,%hl
    while ($gettok(%text,%i,44)) {
      if ($v1 ison $chan) var %hl $addtok(%hl,$v1,44)
      if ($numtok(%hl,44) == 5) {
        timermasshlban $+ $chan 1 0 $!iif($input("Mass HL by $nick on $chan -- Kickban? $crlf $crlf $+(<,$nick,>) $1- ",yqdk20,Mass Highlight),MassHlBan $chan $nick ,noop)
        break
      }
      inc %i
    }
  }
}