Разделка тунца

Как я могу использовать AppleScript для сохранения .PNG-файлы от начала и конца .mp4 файлы с QuickTime? Это то, что я делаю большое и хорошо бы автоматизировать. У меня есть некоторый опыт написания сценариев, но не много.

Я с помощью QuickTime Pro 7 для версии 7.6.6. Я с помощью команды "экспорт", чтобы получить кадры, которые имеют тот же размер, как мой видео файл.

 (* 
Отказ от ответственности: важно: это программное обеспечение Apple, предоставляются вам компанией Apple. ("Яблоко"), в соответствии с условиями данного соглашения, и использование, установка, модификация или распространение данного программного обеспечения Apple, вы соглашаетесь с этими условиями. Если вы не согласны с этими условиями, пожалуйста, не использовать, устанавливать, изменять или распространять это программное обеспечение Apple.

Учитывая ваше согласие соблюдать следующие условия, и в соответствии с настоящими Условиями, компания Apple предоставляет вам персональную, неисключительную лицензию, в компании Apple авторских прав на программное обеспечение компании apple ("яблоко программное обеспечение" ), использовать, воспроизводить, модифицировать и распространять программное обеспечение Apple, с или без изменений в исходный и / или двоичного кода, при условии, что если вы распространяете программное обеспечение Apple в полном объеме и без изменений, вы должны сохранить это уведомление и сообщение отказы во всех таких перераспределения программного обеспечения Apple. Ни название, товарные знаки, знаки обслуживания или логотипы компании Apple. могут быть использованы для одобрения или рекламы продуктов, производных от программного обеспечения Apple, без специального предварительного письменного разрешения от компании Apple. За исключением случаев, оговоренных в настоящем уведомлении, никаких других прав или лицензий, явных или подразумеваемых, не предоставляется компанией Apple в данном документе, включая, но не ограничиваясь, любые патентные права, которые могут быть нарушены ваши производных работ или других работ, в которых компании Apple программное обеспечение могут быть включены.

Программы для Apple в компании Apple по принципу "как есть". КОМПАНИЯ APPLE НЕ ДАЕТ НИКАКИХ ГАРАНТИЙ, ЯВНЫХ ИЛИ ПОДРАЗУМЕВАЕМЫХ, ВКЛЮЧАЯ, БЕЗ ОГРАНИЧЕНИЙ, ПОДРАЗУМЕВАЕМЫЕ ГАРАНТИИ НЕНАРУШЕНИЯ ПРАВ, ПРИГОДНОСТИ ДЛЯ ПРОДАЖИ И ПРИГОДНОСТИ ДЛЯ КОНКРЕТНОЙ ЦЕЛИ, В ОТНОШЕНИИ ПРОГРАММНОГО ОБЕСПЕЧЕНИЯ КОМПАНИЯ APPLE ИЛИ ЕЕ ИСПОЛЬЗОВАНИЯ САМОСТОЯТЕЛЬНО ИЛИ В СОЧЕТАНИИ С ВАШЕЙ ПРОДУКЦИЕЙ.

В ЛЮБОМ СЛУЧАЕ, APPLE НЕ НЕСЕТ ОТВЕТСТВЕННОСТИ ЗА ЛЮБЫЕ СПЕЦИАЛЬНЫЕ, КОСВЕННЫЕ, СЛУЧАЙНЫЕ ИЛИ КОСВЕННЫЕ УБЫТКИ ( ВКЛЮЧАЯ, НО НЕ ОГРАНИЧИВАЯСЬ, ПРИОБРЕТЕНИЕ ЗАМЕНЯЮЩИХ ТОВАРОВ ИЛИ УСЛУГ; ПОТЕРЯ ИСПОЛЬЗОВАНИЯ, ДАННЫХ, ИЛИ ПРИБЫЛЕЙ; ИЛИ ПРЕРЫВАНИЕ ДЕЯТЕЛЬНОСТИ ), ВОЗНИКАЮЩИЕ В ЛЮБОМ СЛУЧАЕ ИЗ ИСПОЛЬЗОВАНИЕ, ВОСПРОИЗВЕДЕНИЕ, ИЗМЕНЕНИЕ И / ИЛИ РАСПРОСТРАНЕНИЕ ПРОГРАММНОГО ОБЕСПЕЧЕНИЯ APPLE, ОДНАКО ВЫЗВАНЫ И МОГУТ ЛИ СОГЛАСНО ТЕОРИИ ДОГОВОРА, ГРАЖДАНСКОГО ПРАВОНАРУШЕНИЯ ( ВКЛЮЧАЯ ХАЛАТНОСТЬ ), СТРОГОЙ ОТВЕТСТВЕННОСТИ ИЛИ ИНАЧЕ, ДАЖЕ ЕСЛИ КОМПАНИИ APPLE БЫЛО ИЗВЕСТНО О ВОЗМОЖНОСТИ ТАКОГО УЩЕРБА.

Авторское Право ( C ) 2011 Компании Apple. Все Права Защищены.
*)

(* Инструкция
Это капли предназначен для обработки одного или нескольких файлов или папок, содержащих файлы, чьи иконки перетаскивать на иконку капельки.
Капелька процессов рекурсивно, и проверять содержимое каждого приплели-на папку и все подпапки в этих папках, находить и обрабатывать любые файлы, который соответствует указанному виду.
Вы можете установить капелька обрабатывать только файлы определенного типа, такие как изображения, путем добавления соответствующих типов данных, Расширения имен и идентификаторов типов значений свойств, указанных в верхней части скрипта.
Разместите код скрипта для обработки файлов, в process_file() подпрограммы в нижней части этого сценария.
*)


(* ФИЛЬТР ДЛЯ КОНКРЕТНЫХ ФАЙЛОВ, ВВЕДИТЕ СООТВЕТСТВУЮЩИЕ ДАННЫЕ В СЛЕДУЮЩИЕ СПИСКИ: *)
type_list собственность : {"М4В ", "mpg4"}, например: {"пикт", "качество JPEG", "размолвка", "в giff"} 
extension_list собственность : {"МР4", "м4в", "миль на галлон"}, например: {"тхт", "текст", "формат JPG", "качество JPEG"}, нет: {".в формате txt", ".текст", ".в JPG", ".в формате JPEG"}
собственность typeIDs_list : {"общественности.формат MPEG-4"}, например: {"public.jpeg", "общественные.Тифф", "общественные.в PNG"}

(* ФИЛЬТРАЦИЯ ИЗОБРАЖЕНИЯ *)
(*
-- В QuickTime поддерживаемые форматы изображения 
type_list собственность : {"качество JPEG", "размолвка", "PNGf", "8bps по", "BMPf", "в giff", "ПДФ ", "пикт"}
собственность extension_list : {"формат JPG", "JPEG", на "тиф", "размолвка", "ПНГ", "СДП", "БМП", "рисунок", "файлы jp2", "ПДФ", "пикт", "РСТ", "гхи", "ТГА"}
собственность typeIDs_list : {"public.jpeg", "общественные.Тифф", "общественные.ПНГ", "ком.компании Adobe.фотошоп-образ", "ком.Майкрософт.БМП", "com.compuserve.gif", "общественные.в формате JPEG-2000", "ком.компании Adobe.формат PDF", "ком.яблоко.пикт", "ком.СГИ.СГИ-образ", "ком.truevision.ТГА-изображения"}
*)

(* ФИЛЬТРАЦИЯ КИНО *)
(*
-- idvd выступает поддерживаемые форматы видео 
type_list собственность : {"опа!", "МООВ", "М4В ", "mpg4"}
extension_list собственность : {"мова", "MP4" или "ДВ", "м4в","миль на галлон"}
собственность typeIDs_list : {"общественности.в формате MPEG-4", "ком.яблоко.программа QuickTime-фильма"}
*)

-- Это капля обрабатывает файлы за на апплет 
на открытых these_items
 повторять с I от 1 до количества these_items
 набор this_item в пункте I these_items
 установить item_info информация для this_item
 если папку item_info это правда
process_folder(this_item)
еще
попробовать
 набор this_extension для расширения имени item_info
 на ошибки
 набор this_extension к ""
 постараюсь
попробовать
 набор this_filetype тип файла item_info
 на ошибки
 набор this_filetype к ""
 постараюсь
попробовать
 набор this_typeID на идентификатор типа item_info
 на ошибки
 набор this_typeID к ""
 постараюсь
 если (папка item_info имеет значение false) и (пакет папку item_info имеет значение false) и (псевдоним item_info имеет значение false) и ((this_filetype в type_list) или (this_extension в extension_list) или (this_typeID в typeIDs_list)) тогда
process_file(this_item)
 конец если
 конец если
 конца повторять
открытым концом

- эта подпрограмма папки процессы 
на process_folder(this_folder)

 рассказать приложения "Finder" для набора F, чтобы имя this_folder
 папку службы обработки журналов": "& Ф

 набор these_items в список this_folder папку без минипуты
 повторять с I от 1 до количества these_items
 набор this_item псевдоним ((this_folder как текст в кодировке Unicode) & (пункт these_items))
 установить item_info информация для this_item
 если папку item_info это правда
process_folder(this_item)
еще
попробовать
 набор this_extension для расширения имени item_info
 на ошибки
 набор this_extension к ""
 постараюсь
попробовать
 набор this_filetype тип файла item_info
 на ошибки
 набор this_filetype к ""
 постараюсь
попробовать
 набор this_typeID на идентификатор типа item_info
 на ошибки
 набор this_typeID к ""
 постараюсь
 если (папка item_info имеет значение false) и (пакет папку item_info имеет значение false) и (псевдоним item_info имеет значение false) и ((this_filetype в type_list) или (this_extension в extension_list) или (this_typeID в typeIDs_list)) тогда
process_file(this_item)
 конец если
 конец если
 конца повторять
конец process_folder

- эта подпрограмма файлов процессов 
на process_file(this_item)
 -- Обратите внимание, что во время выполнения переменной this_item содержится ссылка на файл в формате псевдоним пункта прошло в эту подпрограмму
 -- ОПЕРАТОРЫ ОБРАБОТКИ ФАЙЛА ИДУТ СЮДА
 сказать приложение "QuickTime-плеер 7"
 игровой фильм от начала при открытии в false

 открыть this_item

 скажите перед документом

 # Удалить расширение из имени файла
 набор N к (this_item как строку)
 комплект N к тексту 1 через ((смещение "." в N) - 1) из N

 # Использовать .ПНГ, поскольку оно будет перезаписано позже...
 набор xFileStart до n & "_start.ПНГ"
 набор xFileEnd до n & "_end.ПНГ"

 # Позиции (в секундах) в видео, чтобы остановить и забрать рамки
 набор охрана Для 0
 набор эпос до 0

 # Перемещение на кадр 
 установка текущего времени (шкала времени * сскс)
 экспорт в xFileStart как bmp, используя настройки по умолчанию с заменой

 # Перемещение на конце рамы
 установить текущее время (продолжительность (шкала времени * эпос))
 экспорт в xFileEnd как bmp, используя настройки по умолчанию с заменой

рядом
 конец сказать

 # Делай фактическое преобразование в PNG
 сказать приложение "события изображения"
 набор bmpFile открыть файл xFileStart
 bmpFile сохранить как png
 набор bmpFileEnd открыть xFileEnd файл 
 bmpFile сохранить как png
 конец сказать

 конец сказать
конец process_file