addons/SampleRateConverter/samples/mp3netstream.io

   1 #!/usr/bin/env io
   2
   3
   4 AudioDevice open
   5
   6 mp2Decoder := AVCodec clone do(
   7         setCodecName("mp2")
   8         setStreamDestination(AudioDevice)
   9         @@startAudioDecoding
  10 )
  11
  12 s := URL with("http://www.somafm.com/groovesalad.pls") fetch betweenSeq("File1=", "\n")
  13 s := "http://www.dekorte.com/Library/cowboy.mp3"
  14 URL with(s) setStreamDestination(mp2Decoder) startStreaming
  15 writeln("done streaming")
  16 while(1, yield)
  17