RagTime Faxfunktion

Früher hatte RagTime eine wunderbare integrierte Faxfunktion, seit OS X gibts die nicht mehr. Ein guter Freund hat mir jetzt eine Lösung mit Hilfe von AppleScript gestrickt. Die Faxnummer wird mit Hilfe der Adressbuchfunktion von RagTime in das Rechenblatt (hier Zelle A1 von Rechenblatt 8) eingelesen, von AppleScript übernommen und an die interne Pantherfaxfunktion weitergeleitet:

tell application "RagTime 5"
activate
set faxnr to cell "A1" of table "Rechenblatt 8" of document 1
set logAusgabe to ("1: " & faxnr)
log the result
end tell
tell application "RagTime 5" to activate
set myfaxnum to faxnr --"222-3333" as text
tell application "System Events"
tell application process "RagTime"
keystroke "p" using {command down} -- spricht Apfel+p-Taste an
delay 2
click button "Fax…" of UI element 4 of window "Drucken" --spricht entspr. Taste an
delay 2
keystroke myfaxnum as text
delay 1
end tell
end tell