URL_LIST=(
„Webradio Troisdorf”
„http://www.webradiotroisdorf.de/wrt/WebRadio128.pls”
„Petofi Radio”
„http://stream001.radio.hu/mr2.m3u”
)

PLAYER_LIST=(
„mplayer -playlist %URL”
„kaffine %URL”
)

PLAYER=”.”

play_url() {
if [ „${PLAYER}” == „.” ]; then
for player in „${PLAYER_LIST[@]}”; do
PLAYER_P=${player/%%URL/${URL_LIST[$1]}}
`${PLAYER_P}`
if [ „$?” -eq „0” ]; then
PLAYER=player
return 0
    fi
done
else
PLAYER_P=${PLAYER/%%URL/${URL_LIST[$1]}}
`${PLAYER_P}`
fi
}

playlist_dialog() {
while [ 1 ]; do
items=””
list_index=0
item_index=0

while [ „$list_index” -lt „${#URL_LIST[@]}” ]; do
item=”${URL_LIST[$list_index]}”
item=`echo ${item} | sed ‘s/ /_/g’`
items=”${items} $item_index ${item}”
$((item_index+=1))
$((list_index+=2))
done

tempfile=`tempfile 2>/dev/null` || tempfile=/tmp/test$$
trap „rm -f $tempfile” 0 1 2 5 15

dialog –clear –title „Playlist” –menu „” 22 78 20 ${items} 2> $tempfile
retval=$?
choice=`cat $tempfile`
choice=$((choice*2+1))

case $retval in
0) play_url $choice ;;
1) exit 0 ;;
255) exit 0 ;;
esac
done
}

playlist_dialog