看板関係
レーザー加工 | 斬 | レーザーウォータージェットによる金属、樹脂、木工、特殊加工ならおまかせください。株式会社アルク
投稿
入手先をSpotlightコメントへ
ダウンロード先をSpotlightコメントに入力してくれるApple Script « tybx
on adding folder items tothisFolderafter receivingsomeItems
if (count items of someItems) ≠ 1 then return
set itemAlias to (item 1 of someItems) as alias
do shell script "mdls " & (quoted form of (POSIX path of itemAlias))
set urls to the result
set oldDelimiters to AppleScript's text item delimiters
set AppleScript's text item delimiters to {"kMDItemWhereFroms"}
try
set urls to (text item 2 of urls)
set AppleScript's text item delimiters to {quote}
if (count urls's text items) ≤ 3 then
set urls to (text item 2 of urls)
else
set urls to (text item 4 of urls)
end if
set myFile to itemAlias as string
tell application "Finder"
set the comment of file myFile to urls
end tell
on error
set AppleScript's text item delimiters to oldDelimiters
return -- urls don't exist
end try
end adding folder items to
AppleScriptの結果を、Safariで表示するサンプルスクリプト
AppleScriptのダイアログでは表示しきれない情報をSafariに表示するサンプルスクリプト
-- 結果の表示はSfafariを利用します。
仮想ドキュメント参照方法
-- 存在しないファイルを参照すると、Safariは「ページを開けませんでした」を返す。
-- このキュメントをJavascript（DOM）で書き換えます。
実在ドキュメント参照方法
-- HTMLドキュメントを、一時ファイルとして毎回新規作成します。
-- このキュメントをSafariで参照し、Javascript（DOM）で書き換えます。
-- 新規作成されたHTMLドキュメントはスクリプト終了時に削除されます。
ファインダーでファイルを選択し、スクリプトを実行します。
複数のファイルを選択した場合は、タブで開く。
--設定項目
set whichDialog to 0 --結果表示用HTMLドキュメント 0：仮想 1：実在
--以上設定
tell application "Finder"
set theFiles to selection
if theFiles = {} then
display dialog "Finder上で何もファイルが選択されていません"
return
end if
end tell
(*結果表示用HTMLの設定*)
tell application "Finder"
(*テンプレート*)
set plainHtml to "<!DOCTYPE html><html lang=\"ja\"><head><meta charset=\"UTF-8\" /><title>ファイル情報:ファイル名</title></head><body></body></html>"
(*結果HTMLドキュメントの参照パスの定義*)
set p to POSIX path of ((path to me)'s folder as Unicode text) --スクリプトファイルが置かれた場所
set n to do shell script "echo " & quoted form of ((path to me)'s name as Unicode text) & " | perl -pe 's/(.*)\\..*?$/$1.html/'" --ファイル名：スクリプト名.html
(*結果の仮想時と実在時の分岐設定*)
if whichDialog is 0 then --0:仮想
set theURL to "file://.." & p & n --参照階層の定義
else --1:実在
set theURL to "file://" & p & n --参照階層の定義
do shell script "echo " & "" & " > " & quoted form of (p & n) --実在ファイルの書き出し
end if
(*解像度を取得：Safariの結果ウインドウ位置設定のためディスプレイ解像度を取得*)
set displayBounds to bounds of the window of the desktop
end tell
(*ファイル情報の取得*)
repeat with idx from 1 to (length of theFiles)
log "--------------- タブ " & idx & " ---------------"
set aFile to itemidx of theFiles
logaFile
set aPath to aFile as Unicode text
logaPath
--ファイル情報の取得
tell application "Finder"
(*ファイル名を取得*)
set aName to name of aFile
logaName
(*Spotlightコメントを取得*)
set aComment to comment of aFile as text
(*SpotlightコメントをHTML用に編集*)
logaComment
if (length of the aComment) is not 0 then --ある時
set aComment to do shell script "echo " & quoted form of aComment & " | sed -e 's/
/<br>/g'" --行区切り=ラインブレークを置換set aComment to do shell script "echo " & quoted form of aComment & " | sed -e 's/" & return & "/<br>/g'" --改行=パラグラフブレークを置換
else --ない時
set aComment to ""
end if
logaComment
(*ファイルの入手先を取得*)
set ItemWhereFroms to do shell script "mdls -name kMDItemWhereFroms " & quoted form of POSIX path of aPath
logItemWhereFroms
if ItemWhereFroms contains "(null)" then --ない時：kMDItemWhereFroms = (null)
set ItemWhereFroms to ""
else --ある時
set ItemWhereFroms to do shell script "echo " & quoted form of ItemWhereFroms & " | perl -pe 's/^.*?\"(.*?)\".*?$/\\1/g'"
end if
logItemWhereFroms
end tell
(*ファイル情報をセット*)
set aFileInfo to "<h1>" & aName & "のファイル情報</h1>ファイルパス：<br>" & aPath & "<br><br>Spotlight コメント: <br>" & aComment & "<br><br>入手先: <br>" & ItemWhereFroms
--結果の表示
(*結果を開く*)
tell application "Safari"
if idx is 1 then --一番目のファイル
(*新規ウインドウを開く*)
makenewdocument
set bounds of window 1 to {0, 0, (item 3 of displayBounds) / 2, (item 4 of displayBounds)} --ウインドウの位置と大きさを指定
(*URLのエンコード*)
set theURL to (do JavaScript "encodeURI(\"" & theURL & "\")" in document 1) as text
set properties of document 1 to {URL:theURL}
delay 0.2
(*DOM操作で情報をページに表示*)
my dom(document 1, plainHtml, aName, aFileInfo)
delay 0.2
else --二番目以降のファイル
(*タブでを開く*)
makenewtab of window 1
set properties of tab idx of window 1 to {URL:theURL}
delay 0.2
(*DOM操作で情報をページに表示*)
my dom(tabidx of window 1, plainHtml, aName, aFileInfo)
delay 0.2
end if
end tell
end repeat
(*結果表示用HTMLドキュメントの削除*)
if whichDialog is 1 then
do shell script "rm " & quoted form of (p & n)
end if
--以下ユーザー関数サブルーチン
(*DOM操作*)
on dom(target, plainHtml, aName, aFileInfo)
tell application "Safari"
do JavaScript ("
//htmlテンプレート
document.write('" & plainHtml & "');
//ページタイトルの変更
document.title='" & aName & "のファイル情報';
//bodyにファイル情報
var element = document.createElement('pre');
element.id = 'info';
element.innerHTML = '" & aFileInfo & "';
element.style.backgroundColor = '';
var objBody = document.getElementsByTagName('body').item(0);
objBody.appendChild(element);
") intarget
end tell
end dom
VMware Fusion 4 に Mac OS X v10.6 Snow Leopard をインストール 仮想化
今更だが、
Mac OS X v10.7 Lion と VMware Fusion 4.1.3 の環境で、Mac OS X v10.6 Snow Leopardを仮想化するメモ
用意するもの
- Mac OS X v10.6 Snow Leopardのリテール版のDVDインストールディスク
インストール（仮想化）手順
- 新規仮想マシンの作成
- 新規仮想マシンの設定ファイルの編集
- VMWare Fusionの設定ファイルの編集
- 仮想マシンにMac OS X v10.6 Snow Leopardをインストール
- 仮想マシンのセットアップ
- 仮想マシンのスタートアップ
- サウンドとキーボードとマウスについて
- ソフトウェア・アップデートについて
新規仮想マシンの作成
- インストールディスクをマウント
- VMWare Fusion>メニュー>新規
- 新規仮想マシン アシスタントでインストールディスクが認識されれば続ける
- インストール メディア、Mac OS X Install DVDを確認し続ける
- オペレーティング システムでApple Mac OS X選択して、バージョンでMac OS X Server 10.6を選択し続ける
- 仮想マシンの構成（デフォルトで問題はない）を確認し終了
- 名前： Mac OS X Server 10.6.vmwarevm 保存
- 自動でインストールが始まるが、VMWare Fusion>メニュー>仮想マシン>シャットダウンする
新規仮想マシンの設定ファイルの編集
- Finderで新規仮想マシン（Mac OS X Server 10.6.vmwarevm）を選択
- cntrolキー マウスクリックして、コンテキストメニュー>パッケージの内容を表示
- Mac OS X Server 10.6.vmxをテキストエディットで開き、「firmware = “efi”」を「firmware = “bios”」に変更
- 保存（commandキー Sキー）
VMWare Fusionの設定ファイルの編集
- ターミナルから編集
sudo bash
cd "/Applications/VMware Fusion.app/Contents/Library/isoimages"
mkdir original
mv darwin.iso tools-key.pub *.sig original
perl -n -p -e 's/ServerVersion.plist/SystemVersion.plist/g' < original/darwin.iso > darwin.iso
openssl genrsa -out tools-priv.pem 2048
openssl rsa -in tools-priv.pem -pubout -out tools-key.pub
openssl dgst -sha1 -sign tools-priv.pem < darwin.iso > darwin.iso.sig
for A in *.iso ; do openssl dgst -sha1 -sign tools-priv.pem < $A > $A.sig ; done
exit編集するファイルのオリジナルはoriginalフォルダにバックアップされるが、不安であればVMware Fusion.appをコピーするか、VMware Fusion.appのパッケージ内容を表示してContents/Library/のisoimagesフォルダをコピーする。
仮想マシンにMac OS X v10.6 Snow Leopardをインストール
- VMWare Fusion>メニュー>ウインドウ>仮想マシンのライブラリでMac OS X v10.6 Snow Leopardをインストールする仮想マシンを選択
- VMWare Fusion>メニュー>仮想マシン>CD/DVD (SCSI)>ディスクまたはディスク イメージを選択...
- commandキー shiftキー Gキーを押して、フォルダの場所を入力：
- /Applications/VMware Fusion.app/Contents/Library/isoimages
- 移動
- darwin.isoを選択して開く
- VMWare Fusion>メニュー>仮想マシン>スタートアップ
- 黒い画面が表示され
- Mac OS ゲストはこの CD-ROM デバイスを使用しています。というダイアログが表示されれば、キャンセルする
- 黒い画面内では、Please wait for the DVD to load… となっているので
- VMWare Fusion>メニュー>仮想マシン>CD/DVD (SCSI)>ディスクまたはディスク イメージを選択…
- Mac OS X Install DVDを選択して開く
- Mac OS ゲストはこの CD-ROM デバイスを使用しています。というダイアログが表示されれば、OKする
- 黒い画面に文字が走り、林檎マークが表示されMac OS Xのインストールが始まる
- インストールする項目を変更するにはカスタマイズ。カスタマイズで不要なプリンタや言語、フォント等は除き、ロゼッタのみ追加
仮想マシンのセットアップ
- インストールが完了したMac OS X v10.6 Snow Leopardが起動する時
- OS が見つかりませんでした。というダイアログが表示されるがOKする
- Mac OS ゲストはこの CD-ROM デバイスを使用しています。というダイアログが表示されれば、キャンセルする
- VMWare Fusion>メニュー>仮想マシン>シャットダウンする
- VMWare Fusion>メニュー>仮想マシン>CD/DVD (SCSI)>ディスクまたはディスク イメージを選択...
- commandキー shiftキー Gキーを押して、フォルダの場所を入力：
- /Applications/VMware Fusion.app/Contents/Library/isoimages
- 移動
- darwin.isoを選択して開く
- VMWare Fusion>メニュー>仮想マシン>スタートアップ
- Mac OS ゲストはこの CD-ROM デバイスを使用しています。というダイアログが表示されれば、キャンセルする
- 黒い画面に文字が走り、Mac OS X v10.6 Snow Leopardが起動、ようこそのダイアログが表示される
- 入力方法をことえりにしても日本語キーボードとして認識されず、USキーボードとなるので、かなキー、英数キーでの入力の切り替えができないので、commandキー shiftキー で入力を切り替える。デフォルトでの英数入力は大文字となっていたので、必要があればcapsキーで小文字になるよう切り替える。
- デスクトップが表示されてセットアップが完了する
- デスクトップ上にあるVMware Toolsをインストールする
- 再起動
仮想マシンのスタートアップ
- 仮想マシンMac OS X v10.6 Snow Leopardを選択してスタートアップ
- 黒い画面で文字が走る
- OS が見つかりませんでした。というダイアログが表示されればOKする
- Mac OS ゲストはこの CD-ROM デバイスを使用しています。というダイアログが表示されれば、キャンセルする
- return
- Mac OS X v10.6 Snow Leopardが起動
- Mac OS X v10.6 Snow Leopardが起動しない場合
- VMWare Fusion>メニュー>仮想マシン>シャットダウンする
- VMWare Fusion>メニュー>仮想マシン>CD/DVD (SCSI)>ディスクまたはディスク イメージを選択...
- commandキー shiftキー Gキーを押して、フォルダの場所を入力：
- /Applications/VMware Fusion.app/Contents/Library/isoimages
- 移動
- darwin.isoを選択して開く
- VMWare Fusion>メニュー>仮想マシン>スタートアップ
サウンドとキーボードとマウスについて
- サウンドに関して、参考にしたサイトでは、VMWare Fusion>メニュー>仮想マシン>設定からデバイスの追加でサンドカードを追加し有効化し、ネットからEnsoniqAudioPCI 1.0.1 for Leopard.mpkg.tar.gzをダウンロード、仮想マシンMac OS X v10.6 Snow Leopardにインストールしすれば音が出るようになるらしいが、今回は試していない。
- 日本語キーボードの認識に関しては、ネットを検索して色々と試してみたが解決策には辿りつかなかった。
USキーボードの配列を確認する為にソフトウェアキーボードを表示することで入力回避策とする。 - アップルメニュー>システム環境設定>キーボード>メニューバーにキーボードビューアと文字ビューアを表示にチェックし、メニューバーの入力メニューからキーボードビューアを表示する
- デフォルトドライバではマウスクリックはシングルにできない。
- 日本語キーボードの認識に関して追記 (2-Aug-13)
VMware Fusionの設定ファイルに、JISキーボードとして認識させる文字列を追記する。
VMware Fusion 4、5 に MacOS をゲスト OS としてインストールすると、JIS キーボードが US キーボードとして認識されてしまう- FAQ | act2.com
ただし、JISキーボードとして全てキーが認識される訳ではないので、私的にはUSキーボードのまま使う方が実用的と考える。
ソフトウェア・アップデートについて
- ソフトウェア・アップデートから問題なくアップデートされた。
Exiftoolについて
Exiftool
タグ名
オプション値
Exifに関する
Read IPTC data fields: ExifTool -IPTC:Keywords test.jpg...
初めてでも解り易い説明
用途の広い説明があり理解が深まる
記事とは関係ないがExif関係の参考資料として記録
写真/画像とメタデータ -- EXIFを利用したJPEGとRDFの連動 (Image-metadata integration with Exif)
AppleScript メモ
Finder
（新規作成）
Finder 最前面ウインドウのフォルダにテキストファイルを作成する
tell application "Finder"
if exists folder of the front window then
set i to folder of the front window
else
set i to desktop
end if
set p to quoted form of (POSIX path of (i as Unicode text))
set n to do shell script "date +%Y%m%d-%H%M%S.txt"
do shell script "touch " & p & n
end tell
サービスとして登録して、キーボードショートカット（cmd+ctrl+shift+N）を割り当ててみた。
削除の場合赤字touchをrmにする。
do shell script "touch " & p & n
（追記,追加,編集）
[ AppleScript ] 変数の内容をテキストファイルに書き出すサンプル
デスクトップに「test.txt」と言う名前のファイルが存在しない場合、新規作成します。ファイルが既に存在していれば追記。
tell application "Finder"
set aText to ("日本語のサンプル文字列" & return)
set aTextFile to open for access ((desktop as text) & "test.txt") with write permission
set aEOF to get eof of aTextFile
try
writeaTextstarting at (aEOF + 1) toaTextFile
on error aErrorText
display dialogaErrorText
end try
close accessaTextFile
end tell
日本語を書き出す時、文字コードはどうなるんだろう？
Path
（ファイルパス,ファイル名,ディレクトリ,変換）
ファイルパスからファイル名や拡張子を自由に取り出す
AppleScript
自分自身のファイルパスを取得
path to me
--alias "Macintosh HD:Users:zari:Library:Scripts:test_path_to.me.scpt"
ファイル名を取得
tell application "Finder" to (path to me)'s name
--"test_path_to.me.scpt"
ディレクトリを取得
tell application "Finder" to (path to me)'s folder as text
--"Macintosh HD:Users:zari:Library:Scripts:"
UNIX形式のパスに変換
(path to me)'s POSIX path
--"/Users/zari/Library/Scripts/test_path_to.me.scpt"
AppleScript形式のパスに変換
POSIX file "/Users/zari/Library/Scripts/test_path_to.me.scpt"
--file "Macintosh HD:Users:zari:Library:Scripts:test_path_to.me.scpt"
application
（TextEdit）
新規文書 (ウィンドウ) を作成
set theText to "* " & ((current date) as string) & return -- 新規文書に書き込む文字列（ここでは日時）
tell application "TextEdit"
activate
if not (exists front document) then makenewdocument
if text of front document is "" then
set theDoc to front document
else
set theDoc to makenewdocument
end if
set text of theDoc to theText -- 文字列を書き込む
set properties of text of theDoc to {color:{65535, 0, 0}, size:12, font:"Osaka-Mono"} -- 文字のサイズなどを指定できる（この指定は維持されない）
end tell
Finderで選択中の画像ファイルを、新規文書 (ウィンドウ) を作成して貼付ける
tell application "Finder"
set theFiles to selection
end tell
set aFile to theFiles
set aPath to aFile as Unicode text
tell application "TextEdit"
activate
set NewDoc to (makenewdocument)
set name of front window to fname_ext
set text of NewDoc to return & return & return & aExif
makenewattachmentwith properties {file name:(aPath as alias)} at after the first character of document 1
end tell
サンプル集
Mac OSX メモ
vmfusion osx をインストール
Mac OS X でクリップボードをコマンドライン (ターミナル) から使用するコマンド
Windows では clip というコマンドで標準出力をクリップボードに転送できますが、Mac OS X には pbcopy, pbpaste というコマンドがあります。使用例は以下。
コマンドの出力をクリップボードにコピー
cat /var/log/kernel.log | pbcopyコマンドの出力をクリップボードにコピー (エラーメッセージも一緒に)
cat /non-existent-file 2>&1 | pbcopyクリップボードの内容をクリア
echo -n | pbcopyクリップボードの内容を表示
pbpasteクリップボードの中から System を含む行を表示
pbpaste | grep System検索クリップボード(Safari など Cocoa アプリケーションで検索した最後の文字列)の内容を表示
pbpaste -pboard find
などなど、色々応用ができそうです。
AppleScript 結果をSafariで表示する
参考になる
Safari 開く
結果をファイルとして出力
# コマンドの出力を file へ上書きする
command >file
# コマンドの出力を file へ追記する
command >>file
エンコード デコード
Javascript
URLを非表示のWebViewで表示してJavaScriptを実行して結果を返す。
-- theURLを非表示のWebViewで表示してページ表示theRunJSDelay秒後theJavaScriptを実行して結果を返す
-- theTimeoutSec経つと読み込み中でも待つのを終了してJavaScriptを実行して結果を返す。その際最初にtimeoutと出力する
結果を入れるファイルの作成
参考
その他
Mac OS X Exif 削除
Automator / AppleScript を使い削除する方法
Perlで書かれたコマンドラインツール、ExifToolが必要
- ExifToolからMac OS X Packageをダウンロードしてインストールする。
方法は下記のリンクを参照
SpotlightコメントをExifとして記録する
SpotlightコメントをExifへ
Spotlightコメントを書き込んだ画像ファイルをiPhotoライブラリに移す時、iPhotoライブラリにコピーされた画像からSpotlightコメントは削除されてしまうので、iPhotoに取り込む前にSpotlightコメントをExifにコピーする方法。
検索すると"Spotlight コメントをIPTCキーワードに.app"というアップルスクリプトを発見
使い方は、対象の画像をSpotlight コメントをIPTCキーワードに.appにドロップする。
スクリプト動作は、Spotlightコメントを取得して、do shell scriptからexiftoolを呼んでExifのXMPのSubjectタグと結合する。というもの。
これで、iPhotoに取り込んだ画像のキーワード欄に反映する。
自分の環境ではエラーが出るのでスクリプトを修正した
<<script>> uniqueList メッセージを認識できません。とエラーが出るので、"Spotlight コメントをIPTCキーワードに.app"をAppleScriptエディタで開き、下の方にある関数（ユーザー定義関数=ハンドラ=サブルーチン）を編集した。赤字部分の変数名 uniqueList を rUniqueList に変更。
(*リストから重複を削除*)
on uniqueList(theList)set uniqueList to {}repeat with aItem in theListif not (aItem is in uniqueList) thenset uniqueList to uniqueList & aItemend ifend repeatreturn uniqueListend uniqueList
"Spotlight コメントをIPTCキーワードに.app"を動作させるには、Perlで書かれたコマンドラインツールが必要
ExifToolからMac OS X Packageをダウンロードしてインストールする。
SpotlightコメントをExifへ.app
Spotlightコメント、ファイルの入手先、Exifを、
まとめてExifIPTCへ書き込むAppleScript
iPhoto: キーワード、説明として反映
ライブラリに登録した画像の、Spotlightコメント、ファイルの入手先は消されるが、Exif情報として保持された、Spotlightコメント、ファイルの入手先は、iPhoto上で編集できるキーワード、説明として引き継がれ、Spotlightでの検索の対象となり、iPhotoから書き出した画像のIPTC（Exif情報）にも反映される。
Google ドライブ: コメントや入手先の内容はExifとして保持
ダウンロード（準備中）
SpotlightコメントをExifへ.app （ドロップレット）
動作条件
Perlで書かれたコマンドラインツールが必要です。
Exiftoolから、Mac OS X Packageをダウンロードしてインストールしてください。
（開発環境: Mac OS X Lion 10.7.5）
使い方
ファイルをSpotlightコメントをExifへ.appにドロップしてください。
注：フォルダごとドロップすると上手く動作しません。
設定項目
Applescriptエディタで開き次の項目等を指定（デフォルト設定はiPhoto向けに最適化）
(*書き込みタグの設定、デフォルトはIPTCのみ*)
set Tag1 to "-exif:ImageDescription="
set Tag2 to " -iptc:Caption-Abstract=" & quoted form of aDescription
set Tag3 to " -xmp:Description="
set Tag4 to " -sep ',' -xmp:Subject="
set Tag5 to " -sep ',' -iptc:Keywords=" & quoted form of aKeywords
--保存タグを指定
set Tags to Tag1 & Tag2 & Tag3 & Tag4 & Tag5
(*保存形式*)
set outFile1 to "-overwrite_original" --上書き保存
set outFile2 to "" --複製保存。元ファイルは[ファイル名.拡張子]_originalとてし元の場所にバックアップされる。
set outFile3 to " -o %dMerge\\ Exif/%f%+c.%e " --別名で保存。[同じ場所]/merge exif/[ファイル名][連番].[拡張子]
--保存形式を指定
set outFile to outFile3
参考にしたサイトとスクリプト
Twishort / _a_q_: @tanuki_hirotta 返事書くよりtanuki_hir…よりダウンロードできる
AppleScript 改行 コード 置換
改行を置換
returnキーはLF、ASCII character (10)と\nはLF、ASCII character (13)と\rはCR、controlキー + returnキーはラインブレーク
(*テスト文字列を変数にセット*)
set str to "1LINE(LF)" & (ASCII character (10)) & "2LINE(CR)" & (ASCII character (13)) & "3LINE(LineBrake)
3LINE_2"
log "★生str: " & str & "★"
(*★生str: 1LINE(LF)
2LINE(CR)
3LINE(LineBrake)
3LINE_2★*)
(*LF置換*)
set LFstr to do shell script "echo " & quoted form of str & " | perl -pe 's/\\n//g'"
log "★LF置換str: " & LFstr & "★"
(*★LF置換str: 1LINE(LF)2LINE(CR)
3LINE(LineBrake)
3LINE_2★*)
(*CR置換*)
set CRstr to do shell script "echo " & quoted form of str & " | perl -pe 's/\\r//g'"
log "★CR置換str: " & CRstr & "★"
(*★CR置換str: 1LINE(LF)
2LINE(CR)3LINE(LineBrake)
3LINE_2★*)
(*ラインブレーク置換*)
set LAINBLAKEstr to do shell script "echo " & quoted form of str & " | perl -pe 's/
//g'"
log "★ラインブレーク置換str: " & LAINBLAKEstr & "★"
(*★ラインブレーク置換str: 1LINE(LF)
2LINE(CR)
3LINE(LineBrake)3LINE_2★*)
(*LF、CR、ラインブレークをまとめて置換*)
set str to do shell script "echo " & quoted form of str & " | perl -pe 's/\\n|\\r|
//g'"
log "★改行置換str: " & str & "★"
(*★改行置換str: 1LINE(LF)2LINE(CR)3LINE(LineBrake)3LINE_2★*)
アップルスクリプトでの改行の取り扱いメモ
不可視文字の取り扱い
SPC 半角スペース 0x0020 英数+space space ASCII character (32)
非改行スペース 0x00A0 英数+option+space ASCII character (160)
全角スペース 0x3000 かな+space
HT タブ 0x0009 tab tab ASCII character (9)
ラインブレーク 0x2028 英数+control+return 行区切りで改行ではない
LF パラグラフブレーク 0x000a return return / option+return ASCII character (10) \\n
CR キャリッジリターン 0x000d option+control+return ASCII character (13) \\r
FF 改ページ 0x000c command+return ASCII character (12)
改行を再認識
3/3 箇条書きで［Enter］と［Shift］+［Enter］の使い分け [ワード（Word）の使い方] All About
アップルスクリプトの改行に関するサイト
それぞれの改行コードの10進数と16進数表示
10進数 16進数 文字 10 0x0a LF 13 0x0d CR
returnキーはLF、\nはLF、\rはCRだった。
アップルスクリプトの改行の置換に関するサイト
クリップボードに入っている情報の改行を外してクリップボードに書き戻す
tryset a to the clipboardset b to a as stringset c to repChar(b, ASCII character 10, "") of meset c to repChar(c, ASCII character 13, "") of meset the clipboard to cend try–文字置換ルーチンon repChar(origText, targStr, repStr)set {txdl, AppleScript’s text item delimiters} to {AppleScript’s text item delimiters, targStr}set temp to text items of origTextset AppleScript’s text item delimiters to repStrset res to temp as textset AppleScript’s text item delimiters to txdlreturn resend repChar
on replaceTxt(myText, searchTxt, replaceTxt) --置換専用
set oldDel to AppleScript's text item delimiters --デリミタを保存しておく
set AppleScript's text item delimiters to searchTxt --渡されたサーチワードをデリミタにする
set myText to every text item of myText --分解して
set AppleScript's text item delimiters to replaceTxt --渡された置換ワードをデリミタにする
set myText to myText as string --つなぐ
set AppleScript's text item delimiters to oldDel --デリミタを元に戻す
return myText
end replaceTxt
▲上のルーチンを使って改行コードを変換したりとか。文字列aaaを変換する例。--まずは改行コードをセットして置いて
set cr to ASCII character(13)--CR
set lf to ASCII character(10)--LF
set crlf to cr & lf--CR+LFset aaa to my replaceTxt(aaa, cr , lf) --CRをLFに変換/MAC→UNIX
set aaa to my replaceTxt(aaa, lf , cr) --LFをCRに変換/UNIX→MAC
set aaa to my replaceTxt(aaa, crlf , cr) --CR+LFをCRに変換/Windows→MAC
資料
[TIPs]不可視文字の入力: [FORCE]
鳶嶋工房 / AppleScript / Tips / 文字コード
ASCIIコード表
HTML Codes - Table of ascii characters and symbols
ASCII and Binary Characters (The Characters)