Switch iOS Simulators

set_simulator.applescript

set selectedDevices to {"iPhone (Retina 3.5-inch)"}
if selectedDevices is not false then
	set selectedDevice to item 1 of selectedDevices as string
	set thePListFolderPath to path to preferences folder from user domain as string
	set thePListPath to thePListFolderPath & "com.apple.iphonesimulator.plist"
	
	tell application "System Events"
		tell property list file thePListPath
			tell contents
				set value of property list item "SimulateDevice" to selectedDevice
			end tell
		end tell
	end tell
end if