Of course, an access to this via OSC would be cool as well

Code: Select all
set origAppl to (path to frontmost application) as text
tell application "LXConsole" to activate
tell application "System Events"
tell process "LXConsole"
keystroke "k" using {command down, option down}
end tell
end tell
tell application origAppl to activate
Code: Select all
set origAppl to (path to frontmost application) as text
tell application "LXConsole" to activate
tell application "System Events"
tell process "LXConsole"
tell menu bar 1
tell menu bar item "Cue"
tell menu "Cue"
tell menu item "Live"
tell menu "Live"
tell menu item "Quick Mode"
set qM_enabled to value of attribute "AXEnabled"
end tell
end tell
end tell
end tell
end tell
end tell
end tell
if not qM_enabled then
keystroke "l" using {option down, command down}
delay 0.1
end if
tell process "LXConsole"
tell menu bar 1
tell menu bar item "Cue"
tell menu "Cue"
tell menu item "Live"
tell menu "Live"
tell menu item "Quick Mode"
set qM_selectedText to value of attribute "AXMenuItemMarkChar"
try
if qM_selectedText is missing value then
set qM_selected to false
else
set qM_selected to true
end if
on error
set qM_selected to false
end try
end tell
end tell
end tell
end tell
end tell
end tell
end tell
if not qM_selected then
keystroke "k" using {command down, option down}
end if
end tell
tell application origAppl to activate