on *:join:#: { 
if $me isop # || $me ishelp # {
var %= $lines(voice.txt)
while (0 <= %=) { 
if $read(voice.txt,%=) iswm $nick {
mode # +v $nick | msg # $nick voice listemdesiniz.
} 
dec %= 
} 
}
}