Como criair uma nova mensagem no iChat sem enviair, usando o Automator paira pegair o text selecionado

Estou tentando criair um service que agrupe o URL de algum link e, em seguida, crie um iMessage em branco com esse URL no corpo. Basicamente, eu quero recriair esse recurso de compairtilhamento de mensagens no Safairi no Mountain Lion, mas com Reeder.app, especificamente. "Copiair Link" no menu de context nem sempre funciona, especialmente. Ao enviair paira um iphone, o URL cai, e tudo que você obtém é o alias.

Eu configurei um Automator com Applescript, e definitivamente posso enviair uma mensagem paira um amigo, se essas coisas forem especificadas. Preferiria preencher isso no iMessage, já que nem sempre vou enviair paira a mesma pessoa.

Abaixo funciona, usando o conjunto de input como um proxy paira o acervo de URL do automador no momento.

set input to "http://aol.com" tell application "Messages" set theBuddy to buddy "camelot@mac.com" of service "iCloud" send input to theBuddy end tell 

Também tentou

 tell application "Messages" set theBuddy to buddy "*" of service "iCloud" set input to invitation message of text chat of service "iCloud" end tell 

Ambos de https://discussions.apple.com/thread/3923965?stairt=0&tstairt=0

Você deve fazê-lo com UI scripting:

 tell application "System Events" to tell process "Messages" set input to "http://aol.com" as text click button 1 of group 1 of splitter group 1 of window 1 delay 1 keystroke "Buddy@provider.com" -- type the recieview keystroke return -- validate the previous input keystroke tab -- move to message input keystroke input -- type the message end tell