« 2014年5月 | トップページ | 2014年7月 »

CUPS-PDF


ドイツ産?
CUPS-PDF
最新は3.0のβです
http://www.cups-pdf.de/

Website_image00260630_233610


Mac版のパッケージは
こちら
https://bitbucket.org/codepoet/cups-pdf-for-mac-os-x/downloads

Website_image00260630_233248


インストールは普通に
追加で
PPDはお好みで

Website_image00260630_233445

ちなみに
ACROBAT9のPPDはこちら

Website_image00260630_234610


/Applications/Adobe\ Acrobat 9 Pro/Adobe Acrobat Pro.app/Contents/MacOS/SelfHealFiles/AdobePDFPrinter/PPDs/Contents/Resources/ja.lproj/ADPDF9J.PPD

Acrobat9が無い人は
こちら
http://helpx.adobe.com/acrobat/kb/acrobat-8-9-product-downloads.html
からインストールする…

Website_image00260630_234921


|

[AppleScript]com.apple.print.custompapersにカスタム用紙サイズを登録する

defaults write com.apple.print.custompapers で
カスタム用紙サイズを作成します

手順は以下

1:エクセルで用紙サイズリストを作成します
2:タブ区切りテキストで保存します
3:スクリプトを実行します


こんな感じのエクセルの表を

Comappleprintcustompapers002


タブ区切りテキストでかき出して

Comappleprintcustompapers003


スクリプトを実行すると
カスタム用紙サイズをババっと登録できます

Comappleprintcustompapers001


(*
タブ区切りテキスト内の
用紙サイズを「カスタム用紙」として登録します

【重要】インチサイズ専用
mm用を作成する場合は文中の換算部を変更すれば使えます
----inchpt換算部
set theHeight to (theHeight * 72) as text
set theWidth to (theWidth * 72) as text
----mmpt換算の場合

set theHeight to (theHeight * 2.8346456693) as text
set theWidth to (theWidth * 2.8346456693) as text


ユーザーの「preferences」フォルダに
com.apple.print.custompapers.backup フォルダを作ります
そこにカスタム用紙サイズファイルのバックアップを作成します
*)



on run

-----まずはバックアップを作成
-----初期設定までのパスを取得
set theUserPrefDirName to (path to preferences folder from user domain) as text
-----バックアップフォルダを作成
tell application "Finder"
try
make new folder at theUserPrefDirName with properties {name:"com.apple.print.custompapers.backup"}
end try
end tell
-----ファイル名やらディレクトリ名やら
set thePrefFile to (theUserPrefDirName & "com.apple.print.custompapers.plist") as text
set theBackupDir to (theUserPrefDirName & "com.apple.print.custompapers.backup") as text
set theBackupFileName to (theBackupDir & ":com.apple.print.custompapers.plist") as text
set theTime to do shell script "date '+%Y%m%d_%k%M%S'"
set theNewFileName to ("com.apple.print.custompapers.plist." & theTime) as text
----ファイルをコピーしてからファイル名を変更する
tell application "Finder"
try
copy file thePrefFile to folder theBackupDir
delay 1
set the name of file theBackupFileName to theNewFileName
end try
end tell

----本処理スタート

------------プロンプトの文言改行が使えます\nを入れます
set theWithPrompt to "用紙サイズタブテキストからカスタム用紙サイズを作成します\n"
------------ファイル選択ダイアログのデフォルトのディレクトリ
tell application "Finder"
set theDefaultLocation to (container of (path to me)) as alias
end tell
------------Uniform Type Identifier指定
set theFileTypeList to "public.plain-text,com.apple.traditional-mac-plain-text" as text
------------のファイルタイプをリスト形式に整形する
set AppleScript's text item delimiters to {","}
set theFileTypeList to every text item of theFileTypeList
------------ダイアログを出して選択されたファイルは「open」に渡す
open (choose file default location theDefaultLocation ¬
with prompt theWithPrompt ¬
of type theFileTypeList ¬
invisibles true ¬
with multiple selections allowed without showing package contents)
end run

on open objOpen
------元々エイリアスだけどお約束で
set theFileAlias to objOpen as alias
------選択したファイルのUNIXパスを取得
set theUnixPass to POSIX path of theFileAlias as text
-----選んだファイルを読み込む
set theData to (do shell script "cat '" & theUnixPass & "'") as «class utf8»


------改行毎にリストにする
set AppleScript's text item delimiters to {"\r"}
set retListData to (every text item of theData) as list
------リストに変更した後で項目数を数える
set numListLine to (count of retListData) as number
set numListLine to numListLine - 1 as number
---2行目から読み込むための初期化
set numLine to 2 as number

repeat numListLine times
-----初期化
set theBottom to "" as text
set theLeft to "" as text
set theRight to "" as text
set theTop to "" as text
set theId to "" as text
set theName to "" as text
set theId to "" as text
-----1行読み込む
set theDataListLine to (item numLine of retListData) as text
-----カンマがあれば取り除く
set theDataListLine to doReplace(theDataListLine, ",", "")
set AppleScript's text item delimiters to {"\t"}
-----タブ毎にリスト項目にする
set retListDataOfLine to (every text item of theDataListLine) as list
set AppleScript's text item delimiters to {""}
-----各項目を取り出す
set theName to (item 1 of retListDataOfLine) as text
set theWidth to (item 2 of retListDataOfLine) as number
set theHeight to (item 3 of retListDataOfLine) as number
set theTop to (item 4 of retListDataOfLine) as text
set theBottom to (item 5 of retListDataOfLine) as text
set theLeft to (item 6 of retListDataOfLine) as text
set theRight to (item 7 of retListDataOfLine) as text
-----固定項目 プリンターとカスタム用紙サイズ
set thePrinter to " " as text
set theCustom to "TRUE" as text
----inchpt換算部
set theHeight to (theHeight * 72) as text
set theWidth to (theWidth * 72) as text
----mmpt換算の場合
(*
set theHeight to (theHeight * 2.8346456693) as text
set theWidth to (theWidth * 2.8346456693) as text
*)
-----項目の値が空だった場合の処理
if theId is "" then
set theId to theName as text
else
set theId to theId as text
end if
if theTop is "" then
set theTop to "0" as text
else
set theTop to theTop as text
end if
if theBottom is "" then
set theBottom to "0" as text
else
set theBottom to theBottom as text
end if
if theLeft is "" then
set theLeft to "0" as text
else
set theLeft to theLeft as text
end if
if theRight is "" then
set theRight to "0" as text
else
set theRight to theRight as text
end if

--------defaults write com.apple.print.custompapers
-----theName
set theNameCom to "defaults write com.apple.print.custompapers \"" & theName & "\" -dict-add name -string \"" & theName & "\"" as text
set theNameCom to doReplace(theNameCom, "\"\"", "\"")
do shell script theNameCom

-----theId
set theIdCom to "defaults write com.apple.print.custompapers \"" & theName & "\" -dict-add id -string \"" & theId & "\"" as text
set theIdCom to doReplace(theIdCom, "\"\"", "\"")
do shell script theIdCom

-----Printer
set thePrinterCom to "defaults write com.apple.print.custompapers \"" & theName & "\" -dict-add printer -string \"" & thePrinter & "\"" as text
set thePrinterCom to doReplace(thePrinterCom, "\"\"", "\"")
do shell script thePrinterCom

-----Custom
set theCustomCom to "defaults write com.apple.print.custompapers \"" & theName & "\" -dict-add custom -bool " & theCustom & "" as text
set theCustomCom to doReplace(theCustomCom, "\"\"", "\"")
do shell script theCustomCom

-----height
set theHeightCom to "defaults write com.apple.print.custompapers \"" & theName & "\" -dict-add height -float " & theHeight & "" as text
set theHeightCom to doReplace(theHeightCom, "\"\"", "\"")
do shell script theHeightCom

-----width
set theWidthCom to "defaults write com.apple.print.custompapers \"" & theName & "\" -dict-add width -float " & theWidth & "" as text
set theWidthCom to doReplace(theWidthCom, "\"\"", "\"")
do shell script theWidthCom

-----top
set theTopCom to "defaults write com.apple.print.custompapers \"" & theName & "\" -dict-add top -float " & theTop & "" as text
set theTopCom to doReplace(theTopCom, "\"\"", "\"")
do shell script theTopCom

-----bottom
set theBottomCom to "defaults write com.apple.print.custompapers \"" & theName & "\" -dict-add bottom -float " & theBottom & "" as text
set theBottomCom to doReplace(theBottomCom, "\"\"", "\"")
do shell script theBottomCom

-----left
set theLeftCom to "defaults write com.apple.print.custompapers \"" & theName & "\" -dict-add left -float " & theLeft & "" as text
set theLeftCom to doReplace(theLeftCom, "\"\"", "\"")
do shell script theLeftCom

-----right
set theRightCom to "defaults write com.apple.print.custompapers \"" & theName & "\" -dict-add right -float " & theRight & "" as text
set theRightCom to doReplace(theRightCom, "\"\"", "\"")
do shell script theRightCom


-----カウントアップ
set numLine to numLine + 1 as number
end repeat




end open




--------------文字の置き換えサブルーチン
to doReplace(theText, theOrgStr, theNewStr)
set theOldDelim to AppleScript's text item delimiters
set AppleScript's text item delimiters to theOrgStr
set theTmpList to every text item of theText
set AppleScript's text item delimiters to theNewStr
set theReplaceStr to theTmpList as text
set AppleScript's text item delimiters to theOldDelim
return theReplaceStr
end doReplace


「Na_custompapers.rtf」をダウンロード

「Na_custompapers.zip」をダウンロード

|

1ページに3頁分面付けしたPDFを作る

A4サイズの表示変更についてLINK
答えてみました。

1:PDFを全ての頁に分割する
2:ブリッジで面付け〜PDF化する

本当はCUPS-PDFLINK
カスタム用紙サイズ作って印刷するのが
最も簡単と思いますが
「カスタム用紙サイズ」が解りにくいかな?と…

まぁAdobe InDesignでやった方が奇麗に出来ますが
Adobe InDesignは一般な人には敷居が高く感じるようですので
(Bridgeの方がややこしいか?…汗)

設定は以下のようにすれば
1頁に3頁を面付けしたPDFが出来ます


Adobe_bridge_cs6


------------------------------

CUPS-PDFなら
こんな設定で

カスタム用紙サイズ
Papersize



CUPS-PDFでPDF化
Cupspdf

この方法だと
CUPS-PDFとAdobe Readerで作れますから
ぶっちゃけコストパフォーマンスは良いですね


|

[Component]Flip4Mac WMVComponent 有料化かぁ

Website_image00260614_233255

もう、数年前から友人の古い携帯ムービー以外では
使う事は無くなっていたが
いつのまにか?
「無料」のオプションが無くなったのね

まだ
ダウンロードファイルはあるようなので
使う事があるかも?な人はダウンロードしておくと良いでしょう
https://force4u.cocolog-nifty.com/skywalker/windowsmedia/index.html

自分的には
以下のバージョンを一応保存したが
使わないだろうなぁ…もう

http://www.telestream.net/download-files/flip4mac-wmv/Flip4Mac-WMV-2.2.3.7.dmg

http://www.telestream.net/download-files/flip4mac-wmv/Flip4Mac-WMV-2.1.3.10.dmg

http://www.telestream.net/download-files/flip4mac-wmv/Flip4Mac-WMV-2.3.8.1.dmg

http://www.telestream.net/download-files/flip4mac-wmv/Flip4Mac-WMV-2.3.4.1.dmg

http://www.telestream.net/download-files/flip4mac-wmv/Flip4Mac-WMV-2.2.1.11.dmg

http://www.telestream.net/download-files/flip4mac-wmv/Flip4Mac-WMV-2.3.4.1.dmg

http://www.telestream.net/download-files/flip4mac-wmv/Flip4Mac-WMV-2.4.0.11.dmg

http://www.telestream.net/download-files/flip4mac-wmv/Flip4Mac-WMV-2.4.4.2.dmg

http://www.telestream.net/download-files/flip4mac/3-3/Flip4Mac-3.3.dmg


http://www.telestream.net/download-files/flip4mac/3-3/Flip4Mac-3.3.4.dmg

|

XPS Viewer Pro for Mac

Xps_1024


XPS Viewer Pro for Mac
http://www.lawbox.com/xps-osx/

|

[Dubious permissions]俺が悪いのか〜♪Adobeの間違いか〜♪

launchctl launchd

どうも、思ったようなパフォーマンスが出ないCS6
(いまさらCS6環境へ…って遅いわな…汗)

色々見ていると
ログに以下のような行を発見した
10.9x
com.adobe.PDApp.setup[0]: launchctl: Dubious permissions on file (skipping): /Library/LaunchDaemons/com.adobe.SwitchBoard.plist
com.apple.launchctl.LoginWindow[97]: launchctl: Dubious permissions on file (skipping): /Library/LaunchAgents/com.adobe.AAM.Updater-1.0.plist


10.6x
com.apple.launchctl.Aqua[125]: launchctl: Dubious permissions on file (skipping): /etc/mach_init_per_user.d/com.adobe.SwitchBoard.monitor.plist
com.apple.launchctl.Aqua[129]: launchctl: Dubious permissions on file (skipping): /etc/mach_init_per_user.d/com.adobe.versioncueCS4.monitor.plist

launchctlがエラーを出していた

パーミッションが不正なので読み込まないよぉん♪ですと

内容は以下のパーミッションが不正だと

Website_image00260610_225727


Website_image00260610_225721


Website_image00260610_225733


「rw」の「6」ではダメで
「r」の「4」にしないとエラーになりますね.


(*
Adobe関連(とは限らないけど汗)の
launchctl用の設定ファイルのアクセス権を修正
要管理者権限
以下の内容のパーミッションを444に変更します
/Library/LaunchAgents
/Library/LaunchDaemons
~/Library/LaunchAgents
~/Library/LaunchDaemons
/private/etc/mach_init_per_user.d

*)

-----ユーザー名を取得
tell application "Finder"
set theUserName to short user name of (system info) as text
end tell

------ユーザーのホームディレクトリ内の修正
try
do shell script "sudo chmod 444 /Users/" & theUserName & "/Library/LaunchAgents/*" with administrator privileges
end try
try
do shell script "sudo chmod 444 /Users/" & theUserName & "/Library/LaunchDaemons/*" with administrator privileges
end try

------ローカルドメインのディレクトリ内の修正
try
do shell script "sudo chmod 444 /Library/LaunchAgents/*" with administrator privileges
end try
try
do shell script "sudo chmod 444 /Library/LaunchDaemons/*" with administrator privileges
end try
------etcinit.d内の修正
try
do shell script "sudo chmod 444 /private/etc/mach_init_per_user.d/*" with administrator privileges
end try


「Fix_Dubious_permissions.rtf」をダウンロード

「Fix_Dubious_permissions.scpt.zip」をダウンロード



パフォーマンスの方は…気分の問題ね…気分の…汗

ただ
この修正をしてから『SwitchBoard』がハングしなくなった…ような気がする…気の問題ね

|

海外の人からPDFが文字化けと言われた時用

Website_image00260607_233050

まぁ
ちゃんと埋め込まれていれば良いワケだけどね

Adobe以外のアプリでも利用できるから…

|

ふ〜ん(Toggle_fixBadPluginGlobalObjectNames.jsx )

Website_image00260604_232551


コピー&ペースト処理が遅くなるかファイルサイズが増加する(Illustrator CS/CS2/CS3/CS4/CS5.x/CS6/CC)

|

Differences Examiner

Screenshot

その他にも
ダウンロードコーナーにお役立ちツール多数ありLINK

|

« 2014年5月 | トップページ | 2014年7月 »