使用AppleScript进行听写设置

tell application "System Preferences"
    activate
    set current pane to pane "com.apple.preference.speech"
end tell

tell application "System Events"
    tell process "System Preferences"
        click button "Dictation" of scroll area 1 of window "Speech"
        delay 1
        tell radio group 1 of tab group 1 of window "Dictation & Speech"
            if value of radio button "On" is 0 then
                click radio button "On"
                delay 1
                if exists sheet 1 of window "Dictation & Speech" then
                    click button "Enable Dictation" of sheet 1 of window "Dictation & Speech"
                end if
            end if
        end tell
    end tell
end tell