SyntaxHighlighterなど誤作動させず文中にきれいにコードを反映してくれるプラグインが有ります。
そのプラグイン群ではAppleScriptをきれいに表現してくれるものがありません。
CrayonSyntaxHighlighterが表示してくれるのかなと期待しましたが、
残念ながら私の環境ではそれはかないませんでした。
しかし、preタグで囲えばなんとか表現できるようです。
──────────現時点での問題点：MarsEditで保存するとコードが書き変わってしまう。
そのため、下書きをしたらすぐにアップロードする必要有り、
コードをペーストできるのは一回だけ。
──────────以下AppleScriptサンプルスクリプト。参照URLはこことここ
tell application “TextEdit”
set word_count to count words of document 1
set char_count to count characters of document 1
set show_words to (word_count as string) & ” 語 (” & (char_count as string) & ” 文字です)”
set dialog_title to “TextEdit Word Count”
display dialog show_words with icon 1 with title dialog_title buttons {“Ok”} default button “Ok”
end tell
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー
