Automator Workflow make_aliases
Ich will mal kurz einen Automator Workflow veröffentlichen, den wir relativ häufig benutzen. Der Workflow erleichtert uns die Arbeit mit digitalen Fotos. Die Digitalkamera ist so eingestellt, dass immer ein RAW und ein JPG Bild erzeugt werden, importiert man dann die Bilder von der CF-Karte hat man einen Ordner in dem sich ein Haufen Bilder befinden, jeweils zwei mit selbem Namen, einmal RAW einmal JPG. Der Automator Workflow, angewendet auf den Ordner mit den Fotos, erstellt im Ordner einen neuen Ordner in dem alle JPGs als Alias verlinkt werden. So kann man diesen Preview-Ordner in seinem lieblings Bildbetrachter öffnen, ohne dass immer die sehr großen RAW Bilder geladen werden.
Der Workflow besteht aus einer "Ausgewählte Finder Objekte Abfragen" Aktion deren Ergebnis an eine "AppleScript ausführen" Aktion mit folgendem Inhalt weitergeleitet wird:
on run {input, parameters}
if isAFolder(item 1 of input) then
tell application "Finder"
set toplevelfolder to ((item 1 of input) as string)
set aliasfolder to ((item 1 of input) as string) & "01_Preview"
if not (exists folder aliasfolder) then
-- create folder
try
make new folder at (item 1 of input) with properties {name:"01_Preview"}
--display dialog "folder c"
on error
display dialog "error 2"
end try
-- create aliases
end if
--try
set file_list to list folder toplevelfolder without invisibles
--display dialog file_list
--display dialog (item 1 of file_list) as string
repeat with i from 1 to count file_list
--display dialog "item i of file_list:" & (item i of file_list) as string
set file_path to toplevelfolder & ((item i of file_list) as string) as string
--display dialog "file_path:" & file_path
--set this_file to ((item 1 of input) & ((item i of file_list) as string)) as string
set this_file to file file_path as alias
--set file_info to get info for this_file
if not ((this_file as alias) is equal to (aliasfolder as alias)) then
--display dialog (this_file as string) & " is not a folder"
set file_info to get info for this_file
set file_type to get kind of file_info
try
--set file_type to get type of file_info
--if not isAFolder(file_path) then
if file_type is in {"JPEG-Bild"} then
--display dialog toplevelfolder
make alias to this_file at (aliasfolder as alias)
end if
on error
display dialog "error 3"
end try
end if
end repeat
--on error
-- display dialog "error 1"
--end try
end tell
end if
end run
on isAFolder(TheObject)
set object_info to get info for TheObject as alias
set is_a_folder to folder of object_info
if is_a_folder then
return true
else
return false
end if
end isAFolder
Runterladen könnt ihr den Automator Workflow hier.
Sicherlich gibt es andere Methoden das Problem anzugehen, z.B. einen Bildbetrachter, der garnicht erst versucht, die RAW Bilder zu laden, aber für unseren Workflow hat sich dieses Vorgehen sehr gut bewährt.
Daher habe ich keine Ahnung davon, viel zu kompliziert, klingt aber sehr arbeitserleichternd!
Gruß Mirko
Geschrieben von Mirko 19 Stunden, 12 Minuten nach Veröffentlichung des Blog-Eintrags am 4. Dez. 2006, 12:05. Antworten