24 lines
973 B
AppleScript
24 lines
973 B
AppleScript
activate application "SystemUIServer"
|
|
tell application "System Events"
|
|
tell process "SystemUIServer"
|
|
-- Working CONNECT Script. Goes through the following:
|
|
-- Clicks on Bluetooth Menu (OSX Top Menu Bar)
|
|
-- => Clicks on device Item
|
|
-- => Clicks on Connect Item
|
|
set btMenu to (menu bar item 1 of menu bar 1 whose description contains "bluetooth")
|
|
tell btMenu
|
|
click
|
|
tell (menu item "Souris de Morgan" of menu 1)
|
|
click
|
|
if exists menu item "Connecter" of menu 1 then
|
|
click menu item "Connecter" of menu 1
|
|
return "Connecting to Bluetooth device..."
|
|
else
|
|
key code 53 -- Close main BT drop down if Connect wasn't present
|
|
return "Connect menu was not found, are you already connected?"
|
|
end if
|
|
end tell
|
|
end tell
|
|
end tell
|
|
end tell
|