Mass Voice User

alias massvoice {
  if ($hget($+(massvoice.,$cid))) {
    .hfree $+(massvoice.,$cid)
  }
  var %m.v = 1
  while (%m.v <= $iif($1,$snick($active,0),$nick($active,0,a))) {
    .hadd -m $+(massvoice.,$cid) massvoice $addtokcs($hget($+(massvoice.,$cid),massvoice),$iif($1,$snick($active,%m.v),$nick($active,%m.v,a)),32)
    inc %m.v
  }
  var %mv = 1,%mv2 = 0
  while (%mv <= $ceil($calc($numtok($hget($+(massvoice.,$cid),massvoice),32) / $modespl))) {
    var %tot.mv = $numtok($gettok($hget($+(massvoice.,$cid),massvoice),$+($calc(%mv2 + 1),-,$calc(%mv2 + $modespl)),32),32)
    .timermassvoice $+ %mv $+ $active -mc 1 $iif(%mv == 1,0,$+($calc(%mv * 2),500)) mode $active $+(+,$str(v,%tot.mv)) $gettok($hget($+(massvoice.,$cid),massvoice),$+($calc(%mv2 + 1),-,$calc(%mv2 + $modespl)),32))
    inc %mv
    inc %mv2 $modespl
  }
}

http://irc.facebookirc.org:9090/