Launch Genius a través de AppleScript

2

Me gustaría iniciar una lista de reproducción Genius para la canción que se reproduce actualmente en iTunes a través de un AppleScript.

Un requisito previo sería que el script funcione cuando iTunes esté en pantalla completa.

E idealmente, no lo haría:

  • trae iTunes al frente
  • deja un mensaje de error cuando genius no está disponible para esa canción
  • depende del idioma del sistema

He encontrado este script , pero no funciona para mí cuando iTunes está en pantalla completa. Aún así, es un gran comienzo.

Tal vez sería posible usar el protocolo que usa la aplicación "Remota" de iOS, pero parece ser una exageración.

Cualquier ayuda sería apreciada.

(el objetivo es lanzar genio desde softwares como Keyboard Maestro o Alfred)

    
pregunta olivier 16.07.2012 - 10:53

1 respuesta

1

Prueba esto:

tell application "iTunes" to try
    activate
    with timeout of 10 seconds
        reveal current track -- error if no current track
        set tName to name of (first window whose its class is browser window or its class is playlist window)
    end timeout
on error
    return "Can't find track!"
end try

tell application "System Events"
    tell application process "iTunes"
        try
            set b to (first button of window tName whose value of attribute "AXDescription" is "Genius")
            if not (enabled of b) then return "Genius button disabled" -- (film, video clip,...)
            perform action "AXPress" of b
        on error -- no Genius button (radio, podcast, .....) playlist
            return "Can't create genius list from that track!"
        end try
        delay 2
        tell front window to if value of attribute "AXSubRole" is "AXDialog" then -- dialog opened.
            perform action "AXPress" of button "OK" -- close the dialog
            return "Can't create genius list from that track!"
        end if
    end tell
end tell
return "Done"
    
respondido por el jackjr300 17.07.2012 - 14:54

Lea otras preguntas en las etiquetas