(*
$Id: play-npr.scpt,v 1.1 2006/06/20 18:24:04 jmates Exp $

Plays NPR under RealPlayer.
*)

-- TODO only stop iTunes if already open...
tell application "iTunes" to stop

tell application "RealPlayer"
	open
	activate
end tell

tell application "System Events"
	get properties
	get every process
	
	set visible of first process whose name is "iTunes" to false
	-- set visible of first process whose name is "RealPlayer" to false
	if UI elements enabled then
		tell process "RealPlayer"
			tell menu bar 1
				pick menu item "NPR" of menu "Favorites"
			end tell
		end tell
	end if
end tell

tell application "RealPlayer" to play