Ok, here's what I did (in case anybody else was wondering):

Code:
/moding {
  var %mode.nix = $nick(#,0,r)
  while (%mode.nix > 0) {
    if ($address($nick(#,%mode.nix,r),9) isavoice #) { var %llcc.m-voice = %llcc.m-voice $nick(#,%mode.nix,r) }
    dec %mode.nix
  }
  :1
  if (%llcc.m-voice) { //mode # $+(+,$str(v,$modespl)) $gettok(%llcc.m-voice,1- $modespl,32) | //var %llcc.m-voice = $deltok(%llcc.m-voice,1- $modespl,32) | goto 1 }
}

Those who fail history are doomed to repeat it