helpful applescript(s)