Мне было интересно, если кто-нибудь может сказать мне, как заставить этот скрипт работать.Я пытался часами, и я не могу понять, почему это не удается.
Этот скрипт говорит Quicktime, чтобы перейти в QuickTime фильм / презентация (сгенерированный с помощью ключевой заметки) и экспортировать изображение для каждого последнего кадра каждой главы вэтот фильм.
property Main_folder : missing value
set Main_folder to choose folder
tell application "QuickTime Player 7"
if not (exists document 1) then error "No movies are open."
stop movies
tell front document to set {currMovie, T_name, duration_list, current time} to ¬
{it, text 1 thru -5 of (get name), duration of chapters of (get first track whose kind is "Sprite"), 0}
set T_target to my makeFolder(T_name)
repeat with i from 1 to (count duration_list)
tell currMovie
set current time to current time + (item i of duration_list)
export to (T_target & T_name & " Chapter " & i) as picture using settings preset "Photo-JPEG" -- or "Uncommpressed", or "PNG"
end tell
end repeat
end tell
on makeFolder(n)
tell application "Finder" to return (make new folder at Main_folder with properties
Моя проблема здесь в том, что он сохраняет изображения в формате PICT вместо PNG.Соответствующая часть сценария находится здесь:
export to (T_target & T_name & " Chapter " & i) as picture using settings preset "Photo-JPEG" -- or "Uncommpressed", or "PNG"
Я пробовал его только с PNG и Photo-JPEG, но он по-прежнему генерирует изображения только в формате PICT
Кто-нибудь знает, каксделай это?Я не могу найти никаких ошибок в сценарии ... он должен работать.
Любой совет приветствуется!Спасибо заранее.
С наилучшими пожеланиями,
zhengtonic
обновление
Если кому-то интересно, я нашел причину:
Quicktime 7 не может захватить неподвижное изображение из mov и экспортировать его как png / jpeg.Я нашел обходной путь, конвертировав видео в mp4 и извлекая определенные кадры.