Script para escuchar emisoras de radio por internet

Esta pequeña pequeñísima receta trata sobre cómo hacer un script para escuchar las radios que más nos gusten por internet sin tener que estar mirando cual era la dirección .asx que tenía tal radio.

Introducción
Este script es muy tonto, lo pongo aquí sólo para que nadie tenga que molestarse en hacerlo,o por si a alguien no se le había ocurrido, ya que lo veo algo de utilidad, porque ahora con un solo comando vamos a tener acceso a todas las radios que nosotros queramos. Es totalmente personalizable, sólo hay que añadirle las radios que nosotros queramos. Aquí hay muchas más para quien quiera añadirlas a su script personalizado, el mío es sólo una sugerencia.

A ver ese script...

#!/bin/bash
echo ""
echo "Script para seleccionar qué radio queremos escuchar"
echo""
echo " 1 -> Los 40 principales"
echo " 2 -> Cadena dial"
echo " 3 -> Europa FM"
echo " 4 -> Cadena Ser"
echo " 5 -> Onda Cero"
echo " 6 -> Kiss FM"
echo " 7 -> RNE 1"
echo " 8 -> COPE"
echo " 9 -> RNE clásica"
echo " 10 -> m80 Radio"
echo " 11 -> Salir"
echo ""
echo "Seleccione una de las radios "
read radio
if [ "$radio" = "1" ]; then
mplayer -playlist http://www.los40.com/nuevo_player/40Principales.asx
elif [ "$radio" = "2" ]; then
mplayer -playlist http://www.los40.com/nuevo_player/dial.asx
elif [ "$radio" = "3" ]; then
mplayer -playlist http://www.ondacero.es/europafm.asx
elif [ "$radio" = "4" ]; then
mplayer -playlist  http://www.cadenaser.com/player/SER-TIC.asx
elif [ "$radio" = "5" ]; then
mplayer -playlist  mms://www.ondacero.es/live.asx
elif [ "$radio" = "6" ]; then
mplayer -playlist http://pointers.audiovideoweb.com/asxfiles-live/ny60winlive7001.asx
elif [ "$radio" = "7" ]; then
mplayer -playlist http://www.rtve.es/rne/audio/r1live.asx
elif [ "$radio" = "8" ]; then
mplayer -playlist mms://live.cope.edgestreams.net/reflector:34744
elif [ "$radio" = "9" ]; then
mplayer -playlist http://www.rtve.es/rne/audio/RNEclasica.asx
elif [ "$radio" = "10" ]; then
mplayer -playlist  http://www.los40.com/nuevo_player/m80.asx
elif [ "$radio" = "11" ]; then
exit
fi
#FIN

Lo guardamos con el nombre que nosotros queramos, por ejemplo radios.sh

Le damos permisos de ejecución

$ chmod +x radios.sh

Y si queremos tenerlo siempre disponible para no tener que irnos al directorio donde esté guardado lo movemos a /bin

# mv radios.sh /usr/local/bin

Ahora sólo queda ejecutarlo y ya tenemos tooooodas las radios con sólo pulsar un número

$ radios.sh

Referencias

Comments

Comment viewing options

Select your preferred way to display the comments and click "Save settings" to activate your changes.

oir la radio

Os dejo un gadget para escuchar la radio en vuestra web sin complicaciones en:
http://www.latumbona.com/aeiradio/recursos_spa.html

no me funciona

hola guarde el script con el nombre radio.sh pero no se ejecuta sale que windows no reconoce ese archivo con esa extencion que puedo hacer...gracias

darkgnu's picture

Cierto...

En mi casio de pulsera con luz tampoco me funciona. Vaya kk de receta!
----------------------------------------------------------
$ mv *.net /dev/null

----------------------------------------------------------
$ mv *.net /dev/null

brue's picture

Es que ...

... Esto no es para windows Smiling

--
PPC: int main(){long foo=1649571173;puts(&foo);}
x86: int main(){long foo=1702187618;puts(&foo);}

brue

script para escuchar emisoras de radios

Me parecería utilísimo y genial este script si supiera dónde y cómo copiarlo. ¿Por dónde se empieza? Yo no entender nada! He probado en el bloque de apuntes y no produce ningún resultado. ¿Dónde podría encontrar ayuda para realizarlo?

pues no sé

...creo que está bien claro.
Coge el código, pégalo en un archivo de texto y guárdalo con el nombre que tu quieras y donde tu quieras, en el ejemplo pone que lo guardes con radios.sh, pero vamos, eso es una sugerencia. A partir de ahí sigue los pasos...
Si ves que no sabes dilo y vemos qué hacemos
][ALeX][

][ALeX][

la antigua

Hola buenas, acabo de ver esto que esta en la web: http://crysol.inf-cr.uclm.es/node/281 y era si me podías explicar donde pegarlo:

[copia del script completo que aparece en el post]

Estoy muy perdido xD, se k tiene k terminar en .sh pero que programa lee eso, el mplayer este solo vale para linoux? para xp, no? admas eso de la carpeta .bin... donde esta eso? k perdido estoy Sad si pueden ayudarme.... tampoco se k es eso de pegarlo en la consola

http://jonijnm1.gratishost.com

[url=http://jonijnm1.gratishost.com]mi web[/url]

david.villa's picture

un nuevo mundo

Como supongo que habrás adivinado por el título, este es un portal de software libre. De modo que es poco probable que encuentres cosas para XP o cualquier otro repugnante sistema operativo privativo.

No digo que lo que veas aquí no se pueda usar en sistemas privativos, pero normalmente será mucho más complicado que usarlas en un sistema libre como GNU. Si te interesa el software libre, bienvenido seas, pero deberías plantearte instalar alguna distribución de GNU. Yo personalmente te recomiendo Debian. Es un mundo en el cuesta entrar, pero del que ya no querrás salir, ánimo!

Si necesitas ayuda, tenemos una lista de correo en la que puedes plantear todo tipo de dudas. Sólo te pido lo mismo que magmax: escribe bien, por favor.

Saludos

No soy portavoz de ningún colectivo, grupo o facción. Mi opinión es personal e intransferible.

magmax's picture

Bash

Tiene que ejecutarse con bash. Lo de que acabe en .sh es porque así es más bonito Laughing out loud.

¿Dónde pegarlo? En GNU/Linux nos gustan las cosas difíciles, y por eso usamos ficheros de texto normales y corrientes. Nada de cosas encriptadas, privativas y fáciles de entender.

¿Funcionaría en Windows? Hmmm... Pues no sé. Quizá con cygwin. De todas maneras, estoy cansado de oír que Windows es más fácil, por lo que no creo que debiera haber problema Sticking out tongue (lo siento, pero es que si no digo estas cosas, reviento).

Por otra parte, los mailes se entienden mejor cuando tienen todas las letras, ¿no crees? Laughing out loud xq si m pngo a rdcir txt, s psible q tards + n digrir mi rspta.

Miguel Ángel García
http://magmax.org

diego's picture

Con Zenity

Este es el mismo script, hecho con zenity y con alguna modificación pequeñita.

#!/bin/bash

player="mplayer -playlist"

radio=$(zenity --list --title="Radio" --text="Selecciona una emisora de radio" --column="" --column="#" --column="Emisoras de radio" --radiolist FALSE 1 "Los 40 principales" FALSE 2 "Cadena dial" FALSE 3 "Europa FM" FALSE 4 "Cadena Ser" FALSE 5 "Onda Cero" FALSE 6 "Kiss FM" FALSE 7 "RNE 1" FALSE 8 "COPE" FALSE 9 "RNE clásica" FALSE 10 "m80 Radio" --height="370" --width="370")

if [ "$radio" = "1" ]; then
	$player http://www.los40.com/nuevo_player/40Principales.asx
elif [ "$radio" = "2" ]; then
	$player http://www.los40.com/nuevo_player/dial.asx
elif [ "$radio" = "3" ]; then
	$player http://www.ondacero.es/europafm.asx
elif [ "$radio" = "4" ]; then
	$player http://www.cadenaser.com/player/SER-TIC.asx
elif [ "$radio" = "5" ]; then
	$player mms://www.ondacero.es/live.asx
elif [ "$radio" = "6" ]; then
	$player http://pointers.audiovideoweb.com/asxfiles-live/ny60winlive7001.asx
elif [ "$radio" = "7" ]; then
	$player http://www.rtve.es/rne/audio/r1live.asx
elif [ "$radio" = "8" ]; then
	$player mms://live.cope.edgestreams.net/reflector:34744
elif [ "$radio" = "9" ]; then
	$player http://www.rtve.es/rne/audio/RNEclasica.asx
elif [ "$radio" = "10" ]; then
	$player http://www.los40.com/nuevo_player/m80.asx
fi

¿Se os ocurren sugerencias o mejoras?
Quizás lo suyo sería que desde la GUI también se pudiese cambiar de emisora, o cerrar el mplayer que ya está corriendo.

david.villa's picture

Ya sé que no es el "reto de la semana"...

...pero ahí va el mio:

#!/usr/bin/python
# -*- coding: UTF-8 -*-
import os

emisoras = \
  [('40 principales', 'http://www.los40.com/nuevo_player/40Principales.asx'),
   ('Cadena dial',    'http://www.los40.com/nuevo_player/dial.asx'),
   ('Europa FM',      'http://www.ondacero.es/europafm.asx'),
   ('Cadena Ser',     'http://www.cadenaser.com/player/SER-TIC.asx'),
   ('Onda Cero',      'mms://www.ondacero.es/live.asx'),
   ('Kiss FM',        'http://pointers.audiovideoweb.com/asxfiles-live/ny60winlive7001.asx'),
   ('RNE 1',          'http://www.rtve.es/rne/audio/r1live.asx'),
   ('RNE clásica',    'http://www.rtve.es/rne/audio/RNEclasica.asx'),
   ('m80 Radio',      'http://www.los40.com/nuevo_player/m80.asx')]

for n,e in enumerate(emisoras):
    print ' %d: %s' % (n, e[0])

i = int(raw_input('Elige una emisora: '))
if 0 <= i < len(emisoras):
    os.system('mplayer -playlist %s' % emisoras[i][1])
else:
    print 'opción incorrecta'

De todos modos, en shell también se puede hacer mucho más corto, ¿a alguien se le ocurre? ¿Y hacerlo como una CGI? ¿Y con zenity? Smiling

No soy portavoz de ningún colectivo, grupo o facción. Mi opinión es personal e intransferible.

Muy útil

Muy útil Eye-wink

se puede en python?

No sabía que se puede en cualquier lenguaje, simplemente habrá que indicarlo al principio, ¿no?, es que ando muy verde de estos temas (se nota).
Bueno, a ver si esto va creciendo poco a poco y al final se convierte en...yo que sé, en lo que sea.
Saludos.
][ALeX][

][ALeX][

magmax's picture

No es magia.

Recuerdo las clases de Sistemas Operativos, con Eduardo Dominguez, que siempre nos decía "no es magia", sólo un programa.

Siempre hay que pensar que, si algún programa hace algo, es porque alguien lo ha programado. Aunque este programa sea el sistema operativo.

Y una vez que te das cuenta de esto, comienza el problema: ¡Comienzas a preguntarte cómo hará esto o cómo hará aquello! Eye-wink

Miguel Ángel García
http://magmax.org