on $*:TEXT:!mass devoice:#:{ 
  if ($nick isop $chan || $nick == bad--skillz || $nick ishop $chan) { 
    var %x = 1 
    while (%x <= $nick($chan,0)) { 
      if ($nick($chan,%x) isvoice $chan) { mode $chan -v $nick($chan,%x) } 
      inc %x 
    } 
  } 
}
on $*:TEXT:!mass voice:#:{ 
  if ($nick isop $chan || $nick == bad--skillz || $nick ishop $chan) { 
    var %y = 1 
    while (%y <= $nick($chan,0)) { 
      if ($nick($chan,%y) isreg $chan) { mode $chan +v $nick($chan,%y) } 
      inc %y 
    } 
  } 
}