本文中のアンカー箇所（文字）を選んで、註番号を入力していく。
var Anker = app.activeDocument.selection[0];
var AnkerChar = Anker.contents;
var indexStr = prompt("Der Anker ist " + AnkerChar + ".\n Welche Indexnummer?", "");
if (indexStr) {
Anker.rubyFlag = true;
Anker.rubyString = "（" + indexStr + "）";
var cStyle = app.activeDocument.characterStyles.item('註合印');
Anker.applyCharacterStyle(cStyle);
} きょうは「旅の日」だそうだ。
松尾芭蕉が「おくのほそ道」の旅に出立した元禄二年三月二十七日はグレゴリオ暦だと1689年のきょう5月16日であることに因んでのことらしい（NHK R1情報）。
九月六日＝10月18日までの旅だけど、どうしてまた、これから梅雨という時期に出かけたんだろう。夏の盛りの徒も辛かろうに。
和暦と西暦変換はこちらが便利；
https://keisan.casio.jp/menu/system/000000000230
中国のはこちらだな；
https://sinocal.sinica.edu.tw/
%APPDATA%\Microsoft\Windows\Recent\AutomaticDestinations\ %APPDATA%\Microsoft\Windows\Recent\CustomDestinations\
var curSlc = app.activeDocument.selection[0];
var curStr = curSlc.contents;
//var curNom = app.layoutWindows[0].activePage.name;
var curNom = curSlc.parentTextFrames[0].parentPage.name;
var outFile = new File("/Users/tak/Dropbox/索引/writeout.txt");
outFile.encoding = "UTF-8";
outFile.lineFeed = "Unix";
if ( outFile.open("a")) {
outFile.writeln(curNom + "\t" + curStr) ;
outFile.close();
// alert (curNom + "\t" + curStr +" を追加しました。");
} else {
alert("書き出しファイルが開けません");
}#!/usr/bin/perl
use utf8;
binmode STDOUT, ':utf8';
binmode STDERR, ':utf8';
binmode STDIN, ':utf8';
while (<>) {
y/１２３４５６７８９０：/1234567890:/;
s/(\d+):(\d+)/\1時\2分/g;
s/(?<=時)半/30分/g;
s/00分//g;
s/午後0/12/g;
s/午後10/22/g;
s/午後11/23/g;
s/午後12(?=時\d+分)/昼？夜？0/g;
s/午後12(?!時\d+分)/0/g;
s/午後1/13/g;
s/午後2/14/g;
s/午後3/15/g;
s/午後4/16/g;
s/午後5/17/g;
s/午後6/18/g;
s/午後7/19/g;
s/午後8/20/g;
s/午後9/21/g;
s/午前(?=\d+)//g;
print $_;
}var mySel = app.activeDocument.selection;
var myStr = mySel[0].contents;
myStr = myStr.replace(/０/g, "0");
myStr = myStr.replace(/１/g, "1");
myStr = myStr.replace(/２/g, "2");
myStr = myStr.replace(/３/g, "3");
myStr = myStr.replace(/４/g, "4");
myStr = myStr.replace(/５/g, "5");
myStr = myStr.replace(/６/g, "6");
myStr = myStr.replace(/７/g, "7");
myStr = myStr.replace(/８/g, "8");
myStr = myStr.replace(/９/g, "9");
myStr = myStr.replace(/：/g, ":");
myStr = myStr.replace(/(\d+):(\d+)/g, "$1"+"時"+"$2"+"分");
myStr = myStr.replace(/(?<=時)半/g, "30分");
myStr = myStr.replace(/00分/g, "");
myStr = myStr.replace(/午後0/g, "12");
myStr = myStr.replace(/午後10/g, "22");
myStr = myStr.replace(/午後11/g, "23");
myStr = myStr.replace(/午後12(?=時\d+分)/g, "昼？夜？0");
myStr = myStr.replace(/午後12(?!時\d+分)/g, "0");
myStr = myStr.replace(/午後1/g, "13");
myStr = myStr.replace(/午後2/g, "14");
myStr = myStr.replace(/午後3/g, "15");
myStr = myStr.replace(/午後4/g, "16");
myStr = myStr.replace(/午後5/g, "17");
myStr = myStr.replace(/午後6/g, "18");
myStr = myStr.replace(/午後7/g, "19");
myStr = myStr.replace(/午後8/g, "20");
myStr = myStr.replace(/午後9/g, "21");
myStr = myStr.replace(/午前(?=\d+)/g, "");
mySel[0].contents = myStr;//統合したい部分は検索など何らかの方法で選択してあるものとする。
var oyaStr = app.activeDocument.selection[0];
var oyaChars = oyaStr.characters;
var newRuby = "";
var prevcharRuby = "";
//親文字列1文字ずつについてルビを読んでいく。
for ( C = 0; C < oyaChars.length; C++ ) {
//前の親文字のルビと同じだったら何もしない。
//【注意！】同じ読みが連続している場合は一つ消えるので、後で修正が必要。
//そうでなければ、新しいルビ文字列に書き足す。
if ( oyaChars[C].rubyString !== prevcharRuby ) {
newRuby = newRuby + oyaChars[C].rubyString;
}
//現在の親文字のルビを、次の親文字のルビと比較するため、変数prevcharRubyに取っておく。
prevcharRuby = oyaChars[C].rubyString;
//現在の親文字のルビを消し、前後のアキも「自動」に戻す。
oyaChars[C].rubyString = "";
oyaChars[C].rubyFlag = false;
oyaChars[C].leadingAki = -1;
oyaChars[C].trailingAki = -1;
}
//以上の操作で収集したルビ文字列を選択部分のルビとする。
oyaStr.rubyString = newRuby.replace(/\u0020|\u3000/g,"");
//以下は組方の設定。
oyaStr.rubyType = RubyTypes.GROUP_RUBY;
oyaStr.rubyAlignment = RubyAlignments.RUBY_JIS;
oyaStr.rubyParentSpacing = RubyParentSpacing.RUBY_PARENT_121_AKI;
oyaStr.rubyFlag = true;
oyaStr.rubyXOffset = 0;var OyaStr = app.activeDocument.selection[0];
//ルビ文字列から区切りの空白（全角・半角）をトル。
var newRuby = OyaStr.rubyString.replace(/[ ]/, "");
OyaStr.rubyString = newRuby;
//種類をグループルビに。
OyaStr.rubyType = 1249011570;
//揃えを1-2-1(JIS)ルールに。
OyaStr.rubyAlignment = 1249012339 ;