指定のRTFから書式スタイル名（フォント名、フォントサイズ）を抽出し、そのスタイルをダイアログ上にポップアップメニューで一覧表示し、指定スタイル該当箇所を抽出したプレビュー表示を行いつつ、選択スタイル関連の情報を取得できるAppleScriptライブラリです。動作環境は、macOS 10.13以降です。
–> Download chooseStyleLib(library and sample RTF. Library have to install to ~/Library/Script Libraries)
前バージョンは正常動作するランタイム環境が限定されており、スクリプトエディタ上でCommand-Control-Rで実行する必要がありましたが、このライブラリ版ではScript Debugger上でもScript Menuからでも実行できますし、AppleScript用語辞書（sdef）を書いたので、簡潔かつ手軽に呼び出せるようになりました。
また、AppleScript用語辞書には本Blogと同様の色分け記述で、「★Click Here to Open This Script」をクリックすれば内容がスクリプトエディタに転送されるURLリンク入りのSample Scriptを掲載し、さらに本Blog上の画面キャプチャをリンクしてあるため、実行時の画面イメージも把握できるようになっています。
まんべんなく、すべてのコマンドにSample Scriptを掲載しています。
前バージョンではポップアップメニューにスタイルを適用してWYSIWYGメニューを作成していました。クリックしてメニュー表示を行なっているときにはスタイルが表示されていい感じでしたが、クリックしていない時にはボタンのサイズよりも大きいサイズは欠けて表示されるので、実用性がいまひとつ。そのため、本バージョンではWYSIWYGメニューの機能は省略しました。
ポップアップしていない時にはWYSIWYG表示にならないように機能を両立できるとよかったのですが、、、、
また、前バージョン同様に、「巨大なRTFを指定された場合でも足切りをしない」ようになっているので、あまり巨大なRTFを指定しないようにしてください。
choose style fromコマンド
指定のRTFからスタイル{フォント名,フォントサイズ}を抽出し、ダイアログ上のポップアップメニューで選択したスタイル{フォント名,フォントサイズ}を返します。
| AppleScript name：sample1 choose style from.scptd |
| — – Created by: Takaaki Naganoya – Created on: 2019/12/08 — – Copyright © 2019 Piyomaru Software, All Rights Reserved – http://piyocast.com/as/ use AppleScript version "2.7" — High Sierra (10.13) or later use framework "Foundation" use scripting additions use chooseStyle : script "chooseStyle" set aFile to choose file of type {"public.rtf"} set bRes to choose style from aFile main message "Select Style" sub message "Select style you want to filter" width 400 height 200 –> {"HelveticaNeue-Bold", 16.0} |
choose contens by style fromコマンド
指定のRTFからスタイル{フォント名,フォントサイズ}を抽出し、ダイアログ上のポップアップメニューで選択したスタイルの該当箇所のテキストを返します。
| AppleScript name：sample2 choose contens by style from.scptd |
| — – Created by: Takaaki Naganoya – Created on: 2019/12/08 — – Copyright © 2019 Piyomaru Software, All Rights Reserved – http://piyocast.com/as/ use AppleScript version "2.7" — High Sierra (10.13) or later use framework "Foundation" use scripting additions use chooseStyle : script "chooseStyle" set aFile to choose file of type {"public.rtf"} set fRes to choose contens by style from aFile main message "Select Style" sub message "Select style you want to filter" width 400 height 300 –> "Built-in filters"–text returns |
filter by styleコマンド
指定のRTFファイルから指定のスタイル{フォント名,フォントサイズ}で指定した箇所のテキストを返します。本コマンドはダイアログ表示を行わず、ただRTFからテキスト抽出するだけです。
| AppleScript name：sample3 filter by style.scptd |
| — – Created by: Takaaki Naganoya – Created on: 2019/12/08 — – Copyright © 2019 Piyomaru Software, All Rights Reserved – http://piyocast.com/as/ use AppleScript version "2.7" — High Sierra (10.13) or later use framework "Foundation" use scripting additions use chooseStyle : script "chooseStyle" set aFile to choose file of type {"public.rtf"} set bRes to choose style from aFile main message "Select Style" sub message "Select style you want to filter" width 400 height 200 –> {"HelveticaNeue-Bold", 16.0} copy bRes to {fName, fSize} set aRes to filter by style aFile font name fName font size fSize –>"Built-in filters" |
extract stylesコマンド
指定のRTFファイルからすべてのスタイル{フォント名,フォントサイズ}を抽出します。本コマンドもダイアログ表示は行いません。
| AppleScript name：sample4 extract styles.scptd |
| — – Created by: Takaaki Naganoya – Created on: 2019/12/08 — – Copyright © 2019 Piyomaru Software, All Rights Reserved – http://piyocast.com/as/ use AppleScript version "2.7" — High Sierra (10.13) or later use framework "Foundation" use scripting additions use chooseStyle : script "chooseStyle" set aFile to choose file of type {"public.rtf"} return extract styles aFile –> {{"HelveticaNeue-Bold", 24.0}, {"HelveticaNeue", 16.0}, {"HelveticaNeue-Bold", 20.0}, {"HelveticaNeue-Bold", 16.0}, {"HelveticaNeue-Italic", 16.0}, {"LucidaGrande", 16.0}, {"Menlo-Regular", 13.6}} |
