Email: pacolinux arroba inicia punto es
Web: http://pagina.de/pacodebian
Con Linux Debian. En Valencia (España)
El documento tiene version .html, y .pdf, cambiando en el navegador la parte final podrás acceder a ambos.
Este documento es de libre reproducción siempre que se cite su fuente.
Realizado con: LATEX
Necesitaremos crear dos ficheros:
El fichero emisoras.txt es donde se guardar las emisoras q llamara emisoras.sh
Crear este fichero que contenga lo siguiente
#Por Paco Aldarias. #Fecha 19.04.2004 #Revision seR 10.6.07 #Revision seR 08.4.08 # v 1.0. 29.08.2008. #web de emisoras #http://ballfire.ath.cx/~alex/articulos/radio.php?ni=1&nivel=1http://ballfire.ath.cx/~alex/articulos/radio.php?ni=1&nivel=1 #id|Nombre|URL| #RADIOS ESPAÑOLAS #RNE id01|RNE Radio|http://a729.l830022151.c8300.e.lm.akamaistream.net/D/729/8300/v0001/reflector:22151| id02|RNE Radio Clasica|http://a1247.l910622804.c9106.e.lm.akamaistream.net/D/1247/9106/v0001/reflector:22804| id03|RNE Radio 3|http://a1830.l830120550.c8301.e.lm.akamaistream.net/D/1830/8301/v0001/reflector:20550| id04|RNE Radio 5|http://a1360.l910520572.c9105.e.lm.akamaistream.net/D/1360/9105/v0001/reflector:20572| id05|RNE Radio Exterior de España|http://a259.l773120483.c7731.e.lm.akamaistream.net/D/259/7731/v0001/reflector:20483| #NOTICIAS id06|Cadena SER|http://80.231.170.146:8006/live520| id07|Cope|http://live.cope.edgestreams.net/reflector:34744| id08|OndaCero|http://a536.l507220547.c5072.g.lm.akamaistream.net/D/536/5072/1006357674/reflector:20547| #MUSICA id09|Classic FM|http://audio.musicradio.com/classicfm.asx| id10|Los 40 Principales|mms://a877.l783938876.c7839.e.lm.akamaistream.net/D/877/7839/v0001/reflector:38876| id11|M80 Radio|mms://www.los40.com/nuevo_player/m80.asx| id12|Europa FM|http://www.ondacero.es/europafm.asx| id13|Cadena 100|http://www.cadena100.es/directo/directo.asx| id14|Kiss FM|http://pointers.audiovideoweb.com/asxfiles-live/njwinlive7524.asx| id15|Maxima FM|http://www.los40.com/nuevo_player/maxima.asx| id16|Cadena Dial|mms://www.los40.com/nuevo_player/dial.asx| id17|MqmDance|mplayer -cache 256 http://win20ca.audiovideoweb.com/avwebwinlive8161| #EMISORAS EXTRANJERAS #NOTICIAS #Talk Station id18|World Radio Network Talk Radio|http://www.wrn.org/audio/wrn1usa_usa.asx| id19|Bournemouth Internet Radio Station|http://birstradio.com/audio/aslive28.asx| id20|Talk Sport|http://www.talksport.net/audio/talksport.asx| id21|CHED Canada|http://acwt2.activate.net/radiostations/ched.asx| id22|Australian Broadcasting News|http://www.abc.net.au/streaming/newsradio.asx| id23|Bloomberg|http://www.bloomberg.com/streams/audio/delivery/radio_live.asx?synd=msoft| #MUSICALES id24|All Funky|http://www.comfm.com/live/radio/allfunky/allfunky.asx| id25|The Entertainment Authority|http://www.5fm.co.za/5fm2001/pages/media/5fm.asx| id26|Baja Radio|http://www.bajaradio.com/bajaradio.asx| id27|Choice Radio|http://release.theplatform.com/deliverable.select?pid=DTZfvHEmR4LaRtjVGPJvwhajRowpWS04&UserID=1radio| id28|Hawk FM|http://142.176.141.243:8080/Live.asx| id29|The Core|http://www.core.musicradio.com/audio.asx| id30|Radio Free Virgin Hot Country|http://www.radiofreevirgin.com/asx/hotcountry_56.asx| #COUNTRY id31|24 hour Bluegrass|http://www.warpradio.com/asx/bluegrass-in.asx| id32|Choice Radio Country|http://release.theplatform.com/deliverable.select?pid=v-HYoL_YCDdPjD4SNXMiGBk9GcUbFEKt&UserID=1radio| id33|88 Jazz Place|http://publicbroadcast.net/wdna/ppr/players/stations/wdna/wdna.asx| #JAZZ id34|blake Radio|http://www.blakeradio.com/media/musicmassage_high_02.asx| id35|City World Jazz|http://radio.sonicnet.com/playlists/rpmprof.asp?C=HIGH&B=136&X=X&playerID=24&Z=WMP.ASX| id36|Musicians.Net|http://www.musicians.net/media/MNetLive.asx| id37|Radio Free Virgin Avant Guardians|http://www.radiofreevirgin.com/asx/avantguardians_56.asx| id38|Jazz FM|http://www.jazzfm.com/JazzLive/JazzFMStreamAnnounce.asx| id381|The Internet's Original Smooth Jazz Radio Station|http://scfire-chi-aa05.stream.aol.com:80/stream/1005| #BLUES id39|British Blues Radio|http://www.radiocave.com/BritishBluesRadio.asx| id40|City World Blues|http://radio.sonicnet.com/playlists/rpmprof.asp?C=LOW&B=6&X=X&playerID=24&Z=WMP.ASX| id41|Electric Blues Radio|http://www.electricblues.com/ram/ebradio16.asx| id42|Radio Cave|http://www.radiocave.com/radiocave.asx| id43|Radio Free Virgin Blues|http://www.radiofreevirgin.com/asx/blues_56.asx| id44|House of Blues|http://release.theplatform.com/deliverable.select?pid=FFIGzO8LqLHJ8yiCaP9os3TNjXDo1FBq&UserName=Unknown| #ROCK id45|Heart FM (Soft Rock)|http://www.virtuetv.com/clients/crysallis/heart1007.asx| id46|Totally Radio Reggae|http://www.totallyradio.com/asx/live/reggae.asx| id47|Total Rock|http://windowsmedia.msn.com/radiotuner/findstations.asp?locale=809&genre=JZ| id48|All Hard FM|http://www.comfm.fr/live/radio/allhardfm/allhardfm.asx| id49|City Head Rock|http://radio.sonicnet.com/playlists/rpmprof.asp?C=HIGH&B=168&X=X&playerID=24&Z=WMP.ASX| id50|City Head Classic Rock|http://radio.sonicnet.com/playlists/rpmprof.asp?C=LOW&B=68&X=X&playerID=24&Z=WMP.ASX| #CLASICAL id51|2000 Classical.Com|http://www.2000classical.com/classical.asx| id52|ChoiceRadioClassical|http://release.theplatform.com/deliverable.select?pid=3T01k6rKbtSwo0MHyQLOTiorZU5Fq1cX&UserID=1radio| id53|Classic FM|http://audio.musicradio.com/classicfm.asx| id54|Colorado Public Radio|http://www.cpr.org/listen/listen_classical.asx| id55|Radio Antena 2|http://194.235.129.79/antena2.asx| id56|Radio 13.Net|http://www.radio13.net/windowsmedia/english/classical.asx| #OLD TIME id57|Brando Classics|http://www.brandoclassicotr.com/otr.asx| id58|Flix radio from the movies|http://www.infinity-media-ltd.com/flixradio/RSPlayer/Flix.asx| id59|Ragtime Radio Jukebox|http://nep1.net/asx/nep1ragtimejukebox.asx| id60|Rat Pack Live|http://www.ratpacklive.com/ratpack.asx| id61|Sorrento Live Radio|http://www.sorrentoradio.com/PROVA/SORRENTORADIO.ASX| #FOREING LANGUAGE id62|Asahi Broadcasting, Osaka|http://www.asahi.co.jp/webio/intro.asx| id63|NRK Norway|http://www6.nrk.no/nettradio/nrk_sami_lav.asx| id64|Red AM Mexico|http://radiocentro.com/asx/redam.asx| #RELIGIOUS id65|Bay Breeze|http://www.retrojukebox.com/baybreeze.asx| id66|Inspirational Broadcasting Network|http://ibnradio.com/broadcast/IBNRadio.asx| id67|The Gospel Station|http://www.warpradio.com/asx/ktgs-fm.asx| id68|The Heart of Religion Network|http://www.pmt.org.uk/horn.asx| id69|Worldwide Bible Radio|http://199.120.116.143/bibleradio/bibleradio.asx| id70|Family Life Network|http://12.39.237.2/network.asx| #DIGITAL MUSIC id72|Chillout|http://www.di.fm/wma/chillout.asx| id73|Deep House|http://www.di.fm/wma/deephouse.asx| #RADIOS PERUANAS id74|RPP RADIO|http://protv.ituner.com/rpp1-http|
#!/bin/bash
#Por Paco Aldarias.
#Fecha 19.04.2004
f="emisoras.txt"
function l()
{
cat $f
}
function e()
{
url=$(cat $f | grep $1 | cut -d "|" -f3)
echo $url
mplayer -prefer-ipv4 -af lavcresample=44100 -cache 32 $url
#mplayer -playlist $url
}
case "$1" in
l)
l
;;
e)
e "$2"
;;
h)
echo ******* Ayuda ***************************************************
echo Este fichero necesita de emisoras.txt
echo Para listar las emisoras: ./emisoras.sh l
echo Para escuchar la emisora con id02: ./emisoras.sh e id02
echo Por Paco Aldarias Raya. 19.04.2005. http://pagina.de/pacodebian/
;;
*) echo "Uso: emisoras.sh l | e id | h"
exit 1
;;
esac
#!/bin/sh #set -x export LANG=C # v 1.0. 29.08.2008 RUTA="/winf/emisoras1" # Directorio donde se guardan los archivos NLISTA="emisoras.txt" # Nombre de la lista de radios PLAYER="/usr/bin/gmplayer -prefer-ipv4 -af lavcresample=44100 -cache 32 " # Reproductor elegido VERSION=0.1 NOMBRE="$RUTA/$NLISTA" LISTA="`cat emisoras.txt | grep -v "\#" | grep "." | sed -e "s/^/<item>/" -e "s/$/<\/item>/"`" PIDXRADIO=$$ export ABOUT=" <vbox> <frame> <text><label> \"\" </label></text> <text use-markup=\"true\"> <label>\"<b><u><i><big>RadioxInternet</big></i></u></b>\"</label> </text> <text><label> \"\" </label></text> <text><label>Version $VERSION - Por Paco Aldarias</label></text> <text><label> \"\" </label></text> <text><label>Valencia. España (2008)</label></text> <text><label> \"\" </label></text> </frame> <hbox> <button> <label>Cerrar</label> <action>closewindow:ABOUT</action> </button> </hbox> </vbox> " export SMOOTH=" <vbox> <frame> <text><label> \"\" </label></text> <text use-markup=\"true\"> <label>\"<b><u><i><big></big></i></u></b>\"</label> </text> <text><label>Smooth Jazz</label></text> <text><label> \"\" </label></text> </frame> <hbox> <button> <label>Exchuchar</label> <action>sh smooth.sh </action> </button> <button> <label>Cerrar</label> <action>closewindow:ABOUT</action> </button> </hbox> </vbox> " MAIN_DIALOG=" <window title=\"X-Radio $VERSION\" icon-name=\"gtk-about\" resizable=\"true\"> <hbox spacing=\"10\"> <frame Lista de Radios> <table> <height>250</height><width>450</width> <variable>TABLE</variable> <label>Número|Nombre de la Emisora|Descripcion</label> $LISTA </table> </frame> <vbox spacing=\"50\" homogeneous=\"true\"> <vbox homogeneous=\"true\"> <frame> <button> <input file icon=\"gtk-ok\"></input> <label>Seleccionar</label> <action> '$RUTA/url.sh' '$PLAYER' \$TABLE && PIDMPLAYERr=$! </action> </button> <button> <input file icon=\"gtk-ok\"></input> <label>Smooth Jazz</label> <action>launch:SMOOTH</action> </button> <button> <input file icon=\"gtk-quit\"></input> <label>Salir</label> <action type=\" kill $PIDMPLAYER && kill $PIDXRADIO && exit \">Exit-now</action> </button> </frame> </vbox> <button> <input file icon=\"gtk-about\"></input> <label>Acerca de...</label> <action>launch:ABOUT</action> </button> </vbox> </hbox> </window> " export MAIN_DIALOG export LISTA #gtkdialog --debug --center --program MAIN_DIALOG gtkdialog --center --program MAIN_DIALOG #killall $(echo "$PLAYER" | cut -d " " -f1) &> /dev/null
Este script permite escuchar smoothjazz con linux:
#!/bin/sh # Por Paco Aldarias. # v 1.0. 29.08.2008 a="http://smoothjazz.com/streams/smoothjazz_128.pls" SCRIPT=$$ echo $SCRIPT > smooth.pid case "$1" in start) #Bucle infinito while true do wget $a -O /tmp/temp.pls sed -e "s/\r/\r\n/g" /tmp/temp.pls > /tmp/temp2.pls cat /tmp/temp2.pls killall -9 gmplayer gmplayer -prefer-ipv4 -playlist /tmp/temp2.pls done ;; stop) kill -9 $(cat smooth.pid) killall -9 gmplayer ;; *) echo "Uso: $0 start|stop " ;; esac
This document was generated using the LaTeX2HTML translator Version 2002-2-1 (1.71)
Copyright © 1993, 1994, 1995, 1996,
Nikos Drakos,
Computer Based Learning Unit, University of Leeds.
Copyright © 1997, 1998, 1999,
Ross Moore,
Mathematics Department, Macquarie University, Sydney.
The command line arguments were:
latex2html emisoras -split 0 -local_icons 1 -show_section_numbers -no_auto_link -no_navigation
The translation was initiated by Paco on 2008-08-29