Microsoft Officeを使ってみて、非常に不便に感じたことがありました。それは“^”（control）キーを使ったいくつかのキーボードショートカットが効かないことです。これはMacのアプリケーションの多くで共通して使える大変便利なショートカットで、文章を編集するときに使うものです。矢印キーなどのホームポジションから離れたキーを使わなくてもよくなるスグレモノなのです。これが使えずに困っていたんですけど、いろいろ検索していたら以下の記事を見つけました。

Mac Office 2008 で Emacs キーバインド (Ctrl+H とか) – yt の日記

これは大変ありがたい！少し本物と違う挙動もありますが、まあ許容範囲です。もうちょっと色々やってみて、以下のような設定にしてみました。

CharLeft

^ + B

CharRight

^ + F

DeleteBackWord

^ + H

DeleteWord

^ + D

EndOfLine

^ + E

LineUp

^ + P

LineDown

^ + N

StartOfLine

^ + A

DeleteBackWordやDeleteWordは単語単位で消えるし、EndOfLineやStartOfLineは行の頭とか終わりとかになってしまうけど、まあ十分使いやすくなりました。ちゃんとしたいなら元の記事に書いてあるKeyRemap4MacBookが良いのかもしれませんが、とりあえずOfficeの設定だけでもこれだけできました。

ということで、Microsoftに限らず、こういうOSごとのお作法は大切にしていきたいものですね。

「スクリプトエディタ」の「ライブラリ」から、「System Events」を開いてみます。この中には実に多くの「Suites」が存在していますが、今回用いるのはもちろん「Desktop Suite」です。色々と書いてありますが、今回はデスクトップピクチャに指定のパスにある画像を設定、また現在の画像があるパスを取得できれば良いとします。

デスクトップピクチャを設定する

tell application "System Events"
    set picture of current desktop to "/Library/Desktop Pictures/Nature/Aurora.jpg"
end tell

まずは上記のスクリプトを実行してみましょう。デスクトップピクチャが Leopard 標準のものになったと思います。見ていただければ分かるように、適当なパスを指定するだけでデスクトップピクチャが変更されます。簡単ですね。

デスクトップピクチャを取得する

tell application "System Events"
    set theFile to picture of current desktop as alias
    get POSIX path of theFile
end tell

次のこちらを実行してみましょう。現在のデスクトップピクチャへのパスが返ってくることと思います。今設定しているデスクトップピクチャがどこにあるのか分からなくなったときに便利ですね。

それで本来ならば仕組みなどをご説明したいところですが、全然分からないので割愛します。AppleScript は予想以上に深くてよく分かりませんでした。誰か分かる方がいたら教えてください。

そもそも何故こんなものを作ったかといいますと、アプリケーションからデスクトップピクチャを操作する方法を探していて、Apple Event を送るのに割と手軽だったからです。NSAppleScript クラスをうまく使えば簡単ですね。

ということで、ImageUp にデスクトップピクチャ変更機能を組み込むなどしていますが、思ったよりも微妙な感じで残念です。デスクトップピクチャは頻繁に変更されるようには出来てないみたいですね。そりゃそうか。

余談ですが、AppleScript のシンタックスハイライトに「ザリガニが見ていた…。」さんの AppleScript を使用させていただきました。これはおそろしく便利です。この場を借りてお礼申し上げます。

ImageUp

さて、入力モードの視認性を Mac の UI の枠組みの中で向上させるための、僕なりのソリューションは Dock にアイコンを表示することでした。Dock は Mac OS X の UI で最も目立つパーツですから、メニューバーよりはずっと見易いのではないかと思います。

もちろん、バージョンナンバーを 0.1 としたように、これからもどんどん改良を続けたいと思っています。最初に挙げたブログの「カラーバー」のような仕組みも実装していきたいです。そして、ほかにもっと良いアイデアや、きれいなアイコンなどを提供してくださる奇特な方がいらっしゃいましたら、コメント欄でもメールフォームからでも構いませんので、連絡をくだされば幸いです。それともう一つ、ATOK など、ことえり以外の IM ではテストできていません。もしことえり以外の IM をお持ちで、テストに協力してくださる方がいらっしゃいましたら、合わせてご連絡ください。