Audio Streaming - Live Radio

To assist the customers in listening to the radio stations from anywhere at any time, Xtend IVR provides a sample script for configuring Live Radio through Internet. Whenever the subscriber calls the automated IVR, it enhances the user experience by directly connecting it to live radio using the media player.

Download the evaluation version of Xtend IVR and install the telephony application in your system. Run the sample script from the Script Editor. Click here to refer the code.

The automated attendant will work as given below :

• Initially, IVR identifies the multi-port license to run the scripts
• IVR accepts the call and locates the multi-media channel
• Caller is connected to the Internet and he/she is able to listen to real-time audio streams
• IVR plays the radio channels using the media player

	

********************************************************************
* Script : LiveRadio.dt
*
* IVR script for hearing live radio from internet.
* Open the link given below
* http://www.bbc.co.uk/mediaselector/check/worldservice/meta/tx/
  live_infent?size=au&bgc=003399&lang=en-ws&nbram=1&nbwm=1
* start playing radio using media player
* in the same computer where IVR is running.
*
* If you are connecting a MIC / LineIN,  please select the
* appropriate "recording control" instead of selecting the "MIXER"
* Caution: This is only a sample to demonstrate how the scripting language can be
* used to listen to audio streams from your sound card. Actual use of this script
* will require you to obtain the necessary permission from the website owner.
********************************************************************

***IMPORTANT**
* Please ensure that the "Stereo Mixer" control of the "Recording Control" 
* of your sound card is enabled and the volume settings are OK.
* See the image "RecordingControl.JPG" for conformation				

if ActivePorts() <= 1
	MsgBox("You need multi-port license to run this script")
	return
endif

// locate the multimedia channel
if find($drivername,"Multimedia") <> -1
	atomicset(1,"$soundcard",$deviceid)
endif
sleep 3000


MAIN:
	if atomicget(1,"$soundcard") = $deviceid
		// start multimedia channel
		answer 0
		while true
			sleepevent
		endwhile	
		goto MAIN
	else
		// waiting for all
		answer
		
		// connect to sound-card
		softlisten(atomicget(1,"$soundcard"),2)
		
		// infinite loop doing nothing
		while true
			sleepevent
		endwhile
		goto MAIN
	endif
	goto MAIN
	
ONHANGUP:
	softunlisten(atomicget(1,"$soundcard"))
	hangup
	goto MAIN
	
ONSYSTEMERROR:
	log $error
	hangup
	goto MAIN
	
*End of Script