アウトライン用ノード追加
ナビゲーションに移動
検索に移動
当方プログラムをする身ではないため、不適切な記述があるかもしれません。 訂正・更新あればよろしくお願いします。
#title = "ノード追加"
/***********************************************************************************************************
************************************************************************************************************
**
** 当マクロはhalna氏作成のAndroidアプリ「ハルナアウトライン」
** https://play.google.com/store/apps/details?id=jp.blogspot.halnablue.HalnaOutliner
** とMeryを併用する前提で、Mery側に欲しい機能を私が勝手にマクロで実装したものです。
** 当マクロはhalna氏作成のAndroidアプリ「ハルナアウトライン」と直接の関係はありません。
** 当マクロについてhalna氏への問い合わせはおやめください。
**
** 選択中のノードの末尾(実態は次のノードの手前)に「ノードを示す文字」を持った新規行を追加する。
** 追加されるノードの深さは現在カーソルが存在するノードと同じ深さとする。
** 追加する仮ノード名は"[AddedNode]"とする(仮)。
** ただし……
** ・ハルナアウトラインの.hol形式の階層付きテキストは、先頭ノードの手前に2行のデータ行があるためそれを考慮し、
** 先頭ノードよりも手前にカーソルがある状態では、先頭に深さ1のノードを追加する。
** ・最後尾のノードでは「次のノードの手前」が取得できないため、ファイル末尾を追加位置とする。
**
** ノードを示す記号にはハルナアウトライン用に"."を用いる。
** NdMkrの値を変更すればMarkdownやらにも使えるかもしれません(未検証)。
**
************************************************************************************************************
***********************************************************************************************************/
var NdMkr = ".";
var cntMkr = 0;
var adNodeNm = "[AddedNode]";
with (document.selection) {
//カーソル位置を保持
pos = GetActivePos();
//ノード行先頭にカーソルがある場合、自ノードを取り漏らすためカーソルを移動
EndOfLine(false,mePosLogical);
//先頭ノードより手前でない限り…
if(Find("^\\"+ NdMkr , meFindPrevious | meFindReplaceRegExp) > 0){
//カーソル復帰し、行末にカーソルを移動
//ノード記号をカーソル手前へ検索して、発見した行を選択する。
SetActivePos (pos, false);
EndOfLine(false,mePosLogical);
Find("^\\"+ NdMkr , meFindPrevious | meFindReplaceRegExp);
SelectLine();
//行頭ノード記号の数(ノードの深さ)を取得
reg = new RegExp("^\\" + NdMkr + "+");
cntMkr = Text.match(reg)[0].length;
//次のノードを検索するためカーソルを移動
LineDown(false, 1);
StartOfLine(false,mePosLogical);
//カーソルより後にある行頭ノード記号の存在する行を取得
//末尾ノードでない限り…
if (Find("^\\"+ NdMkr , meFindNext | meFindReplaceRegExp) > 0){
//その1行手前に新ノード用の行を追加する
//一行遡って行末へ移動
LineUp(false, 1);
EndOfLine(false,mePosLogical);
//改行、段落分の自動インデント発生を抑制できないためアンインデント、改行
NewLine(1);
SelectLine();
unindent(1);
NewLine(1);
//ノードの深さに応じたノード記号と、仮ノード名[AddedNode]と、空行を追加
for(step = 0; step < cntMkr; step++){
document.Write(NdMkr);
}
document.Writeln(adNodeNm + "\r\n");
} else {
//末尾ノードの場合、「次ノードの手前」が取得できないため特殊処理
//ファイル末尾に追加する
EndOfDocument(false);
NewLine(2);
StartOfLine(false,mePosLogical);
//ノードの深さに応じたノード記号と、仮ノード名[AddedNode]と、空行を追加
for(step = 0; step < cntMkr; step++){
document.Write(NdMkr);
}
document.Writeln( adNodeNm + "\r\n");
}
} else {
//先頭ノードより手前の時
//「手前のノードのノード記号の数」から深さを取得できないため特殊処理
//先頭に、ハルナアウトライン用の特殊記述行がある前提
StartOfDocument();
LineDown(false, 2);
NewLine();
//ノード記号1つと仮ノード名[AddedNode]と、空行を追加
document.Write(NdMkr);
document.Writeln( adNodeNm + "\r\n");
}
}
document.HighlightFind = false;
スポンサーリンク