on *:TEXT:!av on*:#:{ 
set %av [ $+ [ $chan ] ] on 
} 
on *:TEXT:!av off*:#:{ 
unset %av [ $+ [ $chan ] ] 
} 
on *:JOIN:#:{ 
if (%av [ $+ [ $chan ] ] == $null) { 
halt 
} 
else { 
mode $chan +v $nick 
} 
}