watermint.org

Takayuki Okazaki's blog

Premiere ProではMotion-JPEGを読み込みできないようなので、仕方なくあらかじめPremiereで読み込めるようにQuickTime形式に変換することにしました。でもたくさんファイルがあると一つずつ変換するのは面倒くさいので、AppleScriptを作ることにしました。用途は違えど、だいたい同じような需要はあるもので、検索したらすぐ出てきました。今回は「ムービーをQuickTime形式へ変換するAppleScript (影羽連盟)」を参考にさせていただきました。ファイル名の変換のところで、ウチでは動かないところがあったのでその部分を修正しています。

on run
	activate
	set itemList to choose file with prompt "ムービーを選択してください" default location (path to home folder) with multiple selections allowed without invisibles
	my saveAsQuickTimeMovie(itemList)
end run

on open inputList
	my saveAsQuickTimeMovie(inputList)
end open

on saveAsQuickTimeMovie(movieList)
	activate
	tell application "QuickTime Player"
		launch
		activate
		stop every document
		close every document saving no
		repeat with aMovie in movieList
			open aMovie
			set new_file to (aMovie & ".mov") as string
			save self contained document 1 in new_file -- 独立再生形式で保存
			close document 1 saving no
		end repeat
		quit
	end tell
end saveAsQuickTimeMovie

オリジナルのソースでは独立形式にするか、参照形式にするかを選択しますが、ウチではとりあえず独立形式にしたかったのでダイアログを無くしました。あと、ファイル名を拡張子だけ変更するためにQuickTimeのドキュメント名からファイル名を取得していたのですが、Ricoh GX100のムービーだとドキュメント名が空になってしまい、うまく動作しませんでした。このため、新規ファイル名は強引に元ファイル名に “.mov”を追加するだけにしました。元スクリプトでは “.” ドットを探して拡張子を変えていましたが、このあたりでどうもディレクトリ名に “.”が入ってるとダメなケースがあるようでしたので、その問題も回避できるようになりました。