/*joke-go-rei1.jsee 冗談マクロ「号令一番」 Presented by あくつ (http://homepage3.nifty.com/acts-labo/) このマクロを使用した結果の責任を作者は取りません。 加工はご自由にどうぞ。 カーソル位置に「1」から「10」(←初期値)までを連番で一行ずつ自動記述します。 小説の行数稼ぎ等にどうぞ:p。 「1」 「2」 「3」 「4」 「5」 「6」 「7」 「8」 「9」 「10」 縦書きにならって漢数字にもできます。 「一」 「二」 「三」 「四」 「五」 「六」 「七」 「八」 「九」 「一〇」 */ document.writeln("「" + "番号!" + "」"); //一行目は「番号!」という号令から始まります。 for ( i = 1; //1から開始 i <= 10; //10人で打ち止め i = i+1){ //一つずつ増える document.writeln("「" + i + "」"); //人数である数字をカギ括弧で挟む } if(confirm( "ファイル内の半角数字を漢数字に置換しますか?" )) { //!注意! [OK]を選択すると、同じページ内にある半角の数字は全て漢数字に置換されます! document.selection.Replace( "1", "一", eeFindNext | eeReplaceAll); //半角数字を漢数字に置換します document.selection.Replace( "2", "二", eeFindNext | eeReplaceAll); document.selection.Replace( "3", "三", eeFindNext | eeReplaceAll); document.selection.Replace( "4", "四", eeFindNext | eeReplaceAll); document.selection.Replace( "5", "五", eeFindNext | eeReplaceAll); document.selection.Replace( "6", "六", eeFindNext | eeReplaceAll); document.selection.Replace( "7", "七", eeFindNext | eeReplaceAll); document.selection.Replace( "8", "八", eeFindNext | eeReplaceAll); document.selection.Replace( "9", "九", eeFindNext | eeReplaceAll); document.selection.Replace( "0", "〇", eeFindNext | eeReplaceAll); //「10」は「十」ではなく「一〇」と置換します document.HighlightFind=false; //検索文字列の強調を解除 } else{ document.HighlightFind=false; //検索文字列の強調を解除 }