$pl = array();
<vlc id="rpn" param1="stream_length_H stream_length 3600 / store" />
<vlc id="rpn" param1="stream_length_M stream_length 3600 % 60 / store" />
<vlc id="rpn" param1="stream_length_S stream_length 60 % store" />

<vlc id="rpn" param1="stream_time_H stream_time 3600 / store" />
<vlc id="rpn" param1="stream_time_M stream_time 3600 % 60 / store" />
<vlc id="rpn" param1="stream_time_S stream_time 60 % store" />

<vlc id="rpn" param1="next 1 store" />
<vlc id="rpn" param1="nr_nodes 0 store" />
<vlc id="rpn" param1="nr_items 0 store" />
<vlc id="foreach" param1="pl" param2="playlist" />
	<vlc id="if" param1="pl.type value 'Node' strcmp" />

		  			
		  			if(in_array(strtolower(substr("<vlc id="value" param1="pl.uri"; />",strrpos("<vlc id="value" param1="pl.uri"; />",'.'))),$extv) OR (eregi("://","<vlc id="value" param1="pl.uri"; />") AND "<vlc id="if" param1="pl.current" />1<vlc id="end" />" == 1)){
          $pl[]= array(extract_name('<vlc id="value" param1="pl.name value addslashes"; />'),"<vlc id="if" param1="pl.current" />1<vlc id="else" />0<vlc id="end" />",'<vlc id="value" param1="pl.uri value addslashes" />', "<vlc id="value" param1="pl.index" />");
            <vlc id="if" param1="pl.current" /> 
            $urlcourante = '<vlc id="value" param1="pl.uri value addslashes" />';
            $nomcourant = extract_name('<vlc id="value" param1="pl.name value addslashes"; />');
            <vlc id="end" />
          }
       <vlc id="rpn" param1="nr_nodes nr_nodes 1 + store" />
	<vlc id="end" />
	<vlc id="rpn" param1="nr_items nr_items 1 + store" />
<vlc id="end" />
<vlc id="rpn" param1="prev_node_index current_node_index value 1 - store" />
<vlc id="rpn" param1="next_node_index current_node_index value 1 + store" />

			<vlc id="foreach" param1="cat" param2="information" />
				<vlc id="if" param1="cat.name value 'Méta-données' strcmp 0 =" />
					<vlc id="foreach" param1="info" param2="cat.info" />
						$info[$i]=array("<vlc id="value" param1="info.value" />","<vlc id="value" param1="info.name" />"); 
            $i++;
 					<vlc id="end" />
					<vlc id="end" />
					
									<vlc id="if" param1="cat.name value 'Commentaires Vorbis' strcmp 0 =" />
									unset($info);
					<vlc id="foreach" param1="info" param2="cat.info" />
						$info[$i]=array("<vlc id="value" param1="info.value" />","<vlc id="value" param1="info.name" />"); 
            $i++;
 					<vlc id="end" />
					<vlc id="end" />

			<vlc id="end" />
			  

			  
			  
			  
$timetogo ="<vlc id="if" param1="stream_time_H 10 <" />0<vlc id="end" /><vlc id="value" param1="stream_time_H" />:<vlc id="if" param1="stream_time_M 10 <" />0<vlc id="end" /><vlc id="value" param1="stream_time_M" />:<vlc id="if" param1="stream_time_S 10 <" />0<vlc id="end" /><vlc id="value" param1="stream_time_S" /> / <vlc id="if" param1="stream_length_H 10 <" />0<vlc id="end" /><vlc id="value" param1="stream_length_H" />:<vlc id="if" param1="stream_length_M 10 <" />0<vlc id="end" /><vlc id="value" param1="stream_length_M" />:<vlc id="if" param1="stream_length_S 10 <" />0<vlc id="end" /><vlc id="value" param1="stream_length_S" />";
$etat = "<vlc id="value" param1="stream_state" />";
	
	$stream_time[M] = "<vlc id="value" param1="stream_time_M" />";
	$stream_time[S] = "<vlc id="value" param1="stream_time_S" />";	
	$stream_length[M] = "<vlc id="value" param1="stream_length_M" />";
	$stream_length[S] = "<vlc id="value" param1="stream_length_S" />";

$statut['random'] = "<vlc id="value" param1="random 'VLC_OBJECT_PLAYLIST' vlc_var_get"/>";
$statut['loop'] = "<vlc id="value" param1="loop 'VLC_OBJECT_PLAYLIST' vlc_var_get"/>";
$statut['repeat'] = "<vlc id="value" param1="repeat 'VLC_OBJECT_PLAYLIST' vlc_var_get"/>";