AppleScript to use Display Audio as input & output devices

gistfile1.scpt

tell application "System Preferences" to activate
tell application "System Events"
	tell process "System Preferences"
		click menu item "Sound" of menu "View" of menu bar 1
		-- set output
		click radio button "Output" of tab group 1 of window "Sound"
		set theRows to every row of table 1 of scroll area 1 of ¬
			tab group 1 of window "Sound"
		repeat with aRow in theRows
			if (value of text field 1 of aRow as text) ¬
				is equal to "Display Audio" then
				set selected of aRow to true
				exit repeat
			end if
		end repeat
		-- set input
		click radio button "Input" of tab group 1 of window "Sound"
		set theRows to every row of table 1 of scroll area 1 of ¬
			tab group 1 of window "Sound"
		repeat with aRow in theRows
			if (value of text field 1 of aRow as text) ¬
				is equal to "Display Audio" then
				set selected of aRow to true
				exit repeat
			end if
		end repeat
	end tell
end tell
tell application "System Preferences" to quit