在 Monterey (12.0.1) 中,我们可以使用以下的 AppleScript 代码来连接蓝牙设备:
tell application "System Events"
tell process "SystemUIServer"
repeat until exists ¬
menu bar item "Bluetooth" of menu bar 1
delay 0.5
end repeat
click menu bar item "Bluetooth" of menu bar 1
tell menu 1 of menu bar item "Bluetooth" of menu bar 1
if exists menu item "Turn Bluetooth On" then
click menu item "Turn Bluetooth On"
end if
click menu item "Open Bluetooth Preferences..."
end tell
end tell
tell application "System Preferences"
repeat until exists window "Bluetooth"
delay 0.5
end repeat
tell tab group 1 of window "Bluetooth"
click radio button "Devices"
repeat until exists button "Connect" of scroll area 1
delay 0.5
end repeat
click button "Connect" of scroll area 1
repeat until exists sheet 1
delay 0.5
end repeat
set deviceFound to false
set buttonList to buttons of sheet 1
repeat with currentButton in buttonList
if title of currentButton is "Connect" then
set deviceFound to true
click currentButton
exit repeat
end if
end repeat
if not deviceFound then
display alert "Bluetooth Device Not Found" message "Make sure your Bluetooth device is turned on and in range, then try again."
end if
repeat until not exists sheet 1
delay 0.5
end repeat
end tell
quit
end tell
end tell
以上代码将使用 AppleScript 和 System Events 和 System Preferences 应用程序来连接蓝牙设备。借助 System Events 应用程序,我们可以获取蓝牙菜单栏并在其中模拟点击操作。通过 System Preferences app,我们可以在