Forums Scripts & Popups Voice Checking Problem

check {
  set -u0 %chan $1
  if ($me ison %chan) && (($me isop %chan) || ($me ishop %chan)) {
    if ($nick(%chan, 0, a, vo) > 0) {
      set -u0 %a 1
      while (%a <= $nick(%chan, 0, a, vo)) {
        set -u0 %nicks $addtok(%nicks, $nick(%chan, %a, a, vo), 32)
        if ($numtok(%nicks, 32) == $modespl) || (%a == $nick(%chan, 0, a, vo)) {
          mode %chan + [ $+ [ $str(v, $modespl) ] ] %nicks
          unset %nicks
        }
        inc -u0 %a
      }
    }
  }
}

check {
  set -u0 %chan $1
  if ($me ison %chan) && (($me isop %chan) || ($me ishop %chan)) && ($nick ison $chan) {
    if ($nick(%chan, 0, a, vo) > 0) {
      set -u0 %a 1
      while (%a <= $nick(%chan, 0, a, vo)) {
        set -u0 %nicks $addtok(%nicks, $nick(%chan, %a, a, vo), 32)
        if ($numtok(%nicks, 32) == $modespl) || (%a == $nick(%chan, 0, a, vo)) {
          mode %chan + [ $+ [ $str(v, $modespl) ] ] %nicks
          unset %nicks
        }
        inc -u0 %a
      }
    }
  }
}