Text veartion of AppleScript Calce.scpt