Try this (works well for me): http://hints.macworld.com/article.php?story=20120629091437274
So, just copy these 3 files to: /Library/Filters/
Save as Reduce File Size Best Quality.qfilter to /Library/Filters/
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
<key>Domains</key>
<dict>
<key>Applications</key>
<true/>
<key>Printing</key>
<true/>
</dict>
<key>FilterData</key>
<dict>
<key>ColorSettings</key>
<dict>
<key>DocumentColorSettings</key>
<dict>
<key>CustomLHSCorrection</key>
<array>
<integer>8</integer>
<integer>8</integer>
<integer>8</integer>
</array>
</dict>
<key>ImageSettings</key>
<dict>
<key>Compression Quality</key>
<real>0.75</real>
<key>ImageCompression</key>
<string>ImageJPEGCompress</string>
<key>ImageScaleSettings</key>
<dict>
<key>ImageScaleFactor</key>
<real>0.5</real>
<key>ImageScaleInterpolate</key>
<true/>
<key>ImageSizeMax</key>
<integer>3508</integer>
<key>ImageSizeMin</key>
<integer>128</integer>
</dict>
</dict>
</dict>
</dict>
<key>FilterType</key>
<integer>1</integer>
<key>Name</key>
<string>Reduce File Size Best Quality</string>
</dict>
</plist>
Save as Reduce File Size Better Quality.qfilter to /Library/Filters/
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
<key>Domains</key>
<dict>
<key>Applications</key>
<true/>
<key>Printing</key>
<true/>
</dict>
<key>FilterData</key>
<dict>
<key>ColorSettings</key>
<dict>
<key>DocumentColorSettings</key>
<dict>
<key>CustomLHSCorrection</key>
<array>
<integer>8</integer>
<integer>8</integer>
<integer>8</integer>
</array>
</dict>
<key>ImageSettings</key>
<dict>
<key>Compression Quality</key>
<real>0.5</real>
<key>ImageCompression</key>
<string>ImageJPEGCompress</string>
<key>ImageScaleSettings</key>
<dict>
<key>ImageScaleFactor</key>
<real>0.5</real>
<key>ImageScaleInterpolate</key>
<true/>
<key>ImageSizeMax</key>
<integer>1684</integer>
<key>ImageSizeMin</key>
<integer>128</integer>
</dict>
</dict>
</dict>
</dict>
<key>FilterType</key>
<integer>1</integer>
<key>Name</key>
<string>Reduce File Size Better Quality</string>
</dict>
</plist>
Save as Reduce File Size Good Quality.qfilter to /Library/Filters/
<?xml version="1.0" encoding="UTF-8"?>
<!DOCTYPE plist PUBLIC "-//Apple Computer//DTD PLIST 1.0//EN" "http://www.apple.com/DTDs/PropertyList-1.0.dtd">
<plist version="1.0">
<dict>
<key>Domains</key>
<dict>
<key>Applications</key>
<true/>
<key>Printing</key>
<true/>
</dict>
<key>FilterData</key>
<dict>
<key>ColorSettings</key>
<dict>
<key>DocumentColorSettings</key>
<dict>
<key>CustomLHSCorrection</key>
<array>
<integer>8</integer>
<integer>8</integer>
<integer>8</integer>
</array>
</dict>
<key>ImageSettings</key>
<dict>
<key>Compression Quality</key>
<real>0.25</real>
<key>ImageCompression</key>
<string>ImageJPEGCompress</string>
<key>ImageScaleSettings</key>
<dict>
<key>ImageScaleFactor</key>
<real>0.5</real>
<key>ImageScaleInterpolate</key>
<true/>
<key>ImageSizeMax</key>
<integer>842</integer>
<key>ImageSizeMin</key>
<integer>128</integer>
</dict>
</dict>
</dict>
</dict>
<key>FilterType</key>
<integer>1</integer>
<key>Name</key>
<string>Reduce File Size Good Quality</string>
</dict>
</plist>