めずらしきこと。
必要に迫られてHTML編集マクロにルビの部品を追加した。
21 ^OY "Y ruby ^OY"
?. (mb-2)?. ;ルビ対象文字列をブロックして起動
&s
(xc<0)?#B ;ブロックの末尾へ
&?("</rb><rp>(</rp><rt> </rt><rp>)</rp></ruby>") ;書き込む
#B mb-, ;ブロック文字列の先頭に戻って
&?("<ruby><rb>") ;開始タグを書き込む
(-1){ #d (ct<3)?{ #g }} ;ルビ書き込み位置に移動
&d .
;[History]
;2009/01/17 0.10 1st 必要に迫られて
