HTMLCodeなどのタグ入力支援のAppleScript

←前のエントリ | ↑↑Blog | ↑Category | ↓Comment | 次のエントリ→

HTMLCodeなどのタグ入力支援のAppleScript

HTML（正確にはXHTMLか）タグをiBlogで入力する際にはHTMLCodeというタグを入力しますが、結構面倒なので入力支援のためのAppleScriptを作りました。

この種の作業は皆さん面倒だと思っているらしく、beowulf さんのiBlog AppleScripts やkaoru_ari さんのエントリなどで入力支援のAppleScriptが紹介されています。

わたしも本日エントリを書いていて面倒だなぁ、と思い上記の２つを参考に作ってみました。
お二方に感謝の意を表します。

特徴は、

・iBlogで入力済みのテキストのうち、タグで囲みたい部分を選択して、該当のAppleScriptを選択するだけ。アラ簡単。
・htmlでエスケープにも対応（<、>など全角にすることもできる）
・iBlog特有のaタグについても半角スペースを対応することも可能

といった感じです。

導入方法

1.iBlogScripts1.0.zip をダウンロードします。
2.適当な場所で解凍します。
3.~/Library/Scripts に置きます。
4.システム環境設定→ユニバーサルアクセスにおいて「補助装置にアクセスできるようにする」をオンにします。

使い方

1.iBlogにおいて、HTMLCodeなどで囲みたいテキストを入力します。
2.上記1にて入力したテキストを選択します（コピーする必要はありません！）。
3.画面一番上のメニューのヘルプの隣くらいにあるスクリプトメニューからiBlogScriptsを選択し、その中にある、HTMLCode、blockquote、preから該当するものを選択します。それぞれの意味は次の通りです。

　HTMLCode：　単純にHTMLCodeタグで囲みます。各行の末尾にはbrタグをつけます。
　blockquote：　HTMLCodeタグの下にblockquoteタグをつけて囲みます。各行の末尾にはbrタグをつけます。
　pre：　HTMLCodeタグの下にblockquoteタグをつけ更にその下にpreタグをつけて囲みます。各行の末尾にはbrタグをつけません。

カスタマイズ

各スクリプトはスクリプトエディタで開けます。先頭部分にカスタマイズ用の変数が以下のようにありますのでそちらをいじってください。（以下で解説します）

-- customize (start)

(*
 * "<", ">" -> ?
 *)
--   use html escape code to replace "<" or ">"
property less_than : "&lt;"
property greater_than : "&gt;"

-- use another word to replace "<" or ">"
--property less_than : "<"
--property greater_than : ">"


(*
 * "<a" -> "< a"
 *)
-- if you want to replace "<a" with "< a", then set 'true' to this variable.
property has_space_with_a_tag : true

-- custmize (end)

1."<"、">"の扱い

a) ＆lt；や>に置き換えたい

--   use html escape code to replace "<" or ">"
property less_than : "&lt;"
property greater_than : "&gt;"

-- use another word to replace "<" or ">"
--property less_than : "<"
--property greater_than : ">"

のように最初の部分をコメントアウトしないで、２つ目の部分をコメントアウトしてください。デフォルトはこの状態です。

b) 全角にしたい

--   use html escape code to replace "<" or ">"
--property less_than : "&lt;"
--property greater_than : "&gt;"

-- use another word to replace "<" or ">"
property less_than : "<"
property greater_than : ">"

のように最初の部分をコメントアウトし、２つ目の部分をコメントアウトしないでください。

c) 別の文字にしたい

--   use html escape code to replace "<" or ">"
--property less_than : "&lt;"
--property greater_than : "&gt;"

-- use another word to replace "<" or ">"
property less_than : "["
property greater_than : "]"

のように最初の部分をコメントアウトし、２つ目の部分をコメントアウトしないで、変数の値を変換したいものにしてください。ここでは、"["、"]"に変換するようにしています。

2. aタグをiBlogに認識させないために、<とaの間に半角スペースを入れるかどうか

a) スペースを入れたい

(*
 * "<a" -> "< a"
 *)
-- if you want to replace "<a" with "< a", then set 'true' to this variable.
property has_space_with_a_tag : true

のように true をセットしてください。デフォルトはこちらになっています。

b) スペースを入れたくない

(*
 * "<a" -> "< a"
 *)
-- if you want to replace "<a" with "< a", then set 'true' to this variable.
property has_space_with_a_tag : false

のように false をセットしてください。

(*
 * "<a" -> "< a"
 *)
-- if you want to replace "<a" with "< a", then set 'true' to this variable.
property has_space_with_a_tag : false

以上です。
個人的にはかなり便利に使っています。

一応試験はしておりますが、バグ等のご報告はこちらのコメントまでお願いします。
改変はご自由にどうぞ。トラックバックしてくれるとうれしいです。

なお、こちらのスクリプトを利用したことによるいかなる損害にも一切責任を負いませんので自己責任でお願いします。＃お約束。

投稿時間: 2004年10月17日 (日) at 18:02 Comments