Applescript implementation