[AppleScript] 右クリックから文字数を数える

すげー久しぶりとか気にしない、世の中空気読んだら負けです。
とても簡単なサービスですが、せっかく作ったんで置いておきます。

選択している文字数をカウントするスクリプトです。
テキストを選択して右クリックから実行できる、サービス形式になっています。

本体はこちら。

文字数を数える.zip

サービスはAutomatorから作るのでちと面倒ですが、右クリックから使える分お手軽。
ブラウザでもテキストエディタでもどこでも使えるので、そこそこ使えます。

階層は
/Users/ユーザー名/Library/Services
です。直置きでお願いします。

余談ですけど、最近OS Lionに変えたけどユーザーフォルダ内のLibraryフォルダが不可視対象になったんですね。
イチイチ表示させるのすげーめんどくって辟易です。
はあ。スノレパに戻したい・・・

コードはこちら。

tell application "System Events"
	keystroke "c" using {command down}
	set a to (the clipboard)
	set b to count item of a
	get b
end tell