Quartzfilter (PDF manipulations) on 10.6 and higher

Hi,
i wrote a simple Applescript for Automator to manipulate single and multiple Pdf files on the fly. My script acts on duplicates, so don’t worry about your original files. The manipulated Pdf will be created in a folder on your desktop.

Install instructions:
1) Create a service in Automator
2) add an -applescript-step- and put the applescript below inside
3) Open Color Sync, go on tab “Filter”, create a duplicate of the “Reduce file size” filter, clicking on the arrow on the right, adjust (in the first submenu) the Picture size to 80%, Quality High , and (in the second submenu) Mode Jpeg, compression quality: 50%
4) return to Automator, add an -apply quartz filter- and select your custom Color-sync filter you made before

Note: try playing around with the other options Color Sync offers, to get what you need. (Reducing File size is only an example)

on run {input, parameters}
	try
		#tell application "Finder" to set input to (get the selection)#debug
		set shrink_it to ((path to desktop folder as text) & "PDF - Syc:" as text)
		do shell script "mkdir -p '" & POSIX path of shrink_it & "'"
		
		set lg to length of (input as list)
		if lg = 1 then
			tell application "Finder" to set nm to name of alias (input as text)
			set trg to POSIX path of (shrink_it & nm as text)
			try
				do shell script "cp -R '" & POSIX path of (input as text) & "' '" & trg & "'"
			end try
			return trg
			
		else
			set ls to {}
			repeat with a in input
				tell application "Finder" to set nm to name of alias (a as text)
				set trg to POSIX path of (shrink_it & nm as text)
				try
					do shell script "cp -R '" & POSIX path of (a as text) & "' '" & trg & "'"
				end try
				copy trg to end of ls
			end repeat
			
			return ls
		end if
	on error err
		quit
	end try
	
end run