如何编写AppleScript实现Mac显示underscan自动调整至第二档？

完整补全后的代码 #

activate application "System Preferences"
tell application "System Events"
    tell process "System Preferences"
        click button "显示器" of scroll area 1 of window "系统偏好设置"
        delay 0.5
        
        tell tab group 1 of window "42PFD5519/30"
            -- 切换到缩放模式才会显示过扫描调节选项
            click radio button "缩放"
            delay 0.3
            
            -- 定位过扫描滑块
            set underscanSlider to slider "过扫描" of group 1
            click underscanSlider
            -- 按一次右方向键切换到第二档，需要更高档位可以重复该行代码
            key code 124
            delay 0.2
        end tell
    end tell
    delay 0.5
    quit application "System Preferences"
end tell

注意事项 #

• 运行前需要给脚本编辑器开启辅助功能权限：打开「系统偏好设置」→「安全性与隐私」→「隐私」选项卡→左侧列表选择「辅助功能」→右侧勾选「脚本编辑器」，否则会触发无权限操作UI的报错
• 如果你使用的是英文系统，需要把代码里的中文控件名替换为对应英文：显示器改为Displays、系统偏好设置改为System Preferences、缩放改为Scaled、过扫描改为Underscan
• 代码中的窗口名42PFD5519/30为当前外接显示器的设备名，更换显示器后需要修改为对应设备的名称

内容的提问来源于stack exchange，提问作者Terence Mak