alias scanv {
	if ([$0]) {@ chan = [$0]}{@ chan = [$C]}
    	@ voc = 0
        fe ($chanusers($chan)) nick {
		if (isvoice($chan $nick) == 1) {
			@ push(nicks.voc +$nick)
			@ voc = voc + 1
		}
            }
            @ nicks = nicks.voc
            echo $G ${h0}[${lc0}voiced users on ${hw}$chan${h0}:${hw} ${hc0}${voc}${h0}]${x}
            sc.head
            fe ($nicks) n1 n2 n3 n4 n5 {
              sc.echo $n1 $n2 $n3 $n4 $n5
            }
            sc.foot
            ^assign -nicks;^assign -nicks.ops;^assign -nicks.voc;^assign -nicks.non
            ^assign -ops;^assign -voc;^assign -non;^assign -chan
           }
