PPxをアウトラインプロセッサに

僕は今まで、PPxとhowmを組み合わせてメモ環境を作っていた（参考:MoE）。
ここにさらに

１．エントリ順序の任意設定
２．レベルの実装

を追加して、PPxをアウトラインプロセッサとして使えるようにする。

実装は以下のようになる。

１．エントリ上で特定のキーを押すことで、エントリ位置の入れ替えやレベルの変更を可能に
２．コメントファイル作成時、エントリ順で記載する。行頭の空白も保存
３．コメントファイルの記載順序で拡張コメントソート

準備

以下の2つのファイルをScriptフォルダに保存。

MakeOutlineComment.js

//!*script
// カレントディレクトリに一行目とファイルパスを対応させたコメントファイル(00_INDEX.txt)を作成
// アウトラインプロセッサ用。行頭の空白を維持し、エントリの順番通りに書き出す

var strLine = "\r\n";
var fs = PPx.CreateObject("Scripting.FileSystemObject");

for (var i = 0; i < PPx.EntryAllCount; i++) {
  // エントリがディレクトリの時の処理
  if (PPx.Entry(i).Attributes & 16) {
    if (PPx.Entry(i).Name == "."){
      strLine += PPx.Entry(i).Name + "\t*\r\n";
    } else if (PPx.Entry(i).Name == "..") {
      strLine += PPx.Entry(i).Name + "\t**\r\n";
    } else if (PPx.Entry(i).Comment=="") {
      strLine += PPx.Entry(i).Name + "\t" + PPx.Entry(i).Name + "\r\n";
    } else {
      strLine += PPx.Entry(i).Name + "\t" + PPx.Entry(i).Comment + "\r\n";
    }
  // エントリがhowmのときの処理
  } else if (PPx.Entry(i).Name.match(/.howm$/i)) {
    // ファイルの一行目を取得
    var f = fs.OpenTextFile(PPx.Entry(i).Name, 1);
    var title = f.ReadLine().slice( 2 );
    // コメントの最初に空白があればそれを反映
    if (PPx.Entry(i).Comment.match(/^　+/)) {
      var heading = PPx.Entry(i).Comment.match(/^　+/);
      strLine += PPx.Entry(i).Name + "\t" + heading + title + "\r\n";
    } else {
      strLine += PPx.Entry(i).Name + "\t" + title + "\r\n";
    }
    f.Close();
  }
}
if (strLine == "\r\n"){
  PPx.Quit();
} else {
  strLine += '00_INDEX.txt\t *** COMMENT FILE ***';
}

// 00_INDEX.txtに書き込み
var f2 = fs.OpenTextFile("00_INDEX.txt", 2, true, -1); // unicodeで書き込み
f2.Write(strLine);
f2.Close();

OutlineSort.js

//!*script
// 拡張コメントソート用。拡張コメント1を利用。
// 00_INDEX.txtの記載順に連番を付ける。

var fs = PPx.CreateObject("Scripting.FileSystemObject");
if (!fs.FileExists("00_INDEX.txt")) {
  PPx.Quit();
}

// ゼロ埋め
function zeroPadding(num,length){
    return ('0000000000' + num).slice(-length);
}

var array = {};

var stream         = new ActiveXObject("ADODB.Stream");
    stream.type    = 2;
stream.charset = "Unicode";
stream.open();
stream.loadFromFile("00_INDEX.txt");

var i = 1;
var firstLine = '';
while(!stream.EOS){
  firstLine = stream.readText('-2').split("\t")[0];
  array[firstLine]=i;
  i +=1;
}
stream.close();

for (var i = 0; i < PPx.EntryAllCount; i++) {
  if (PPx.Entry(i).Name.match(/.howm$/i)) {
    var num = zeroPadding(parseInt(array[PPx.Entry(i).Name]),4);
    PPx.Entry(i).SetComment(1,num);
  }
}

以下を編集して取込。

KC_main = { ; PPcメイン窓
^\LEFT ,*comment "%*regexp("%*comment","s/^\s?(.*)/$1/")"
^\RIGHT ,*comment "　%*comment"
^\DOWN = @DEL @INS @DOWN
^\UP = @UP @DEL @INS
F7 ,*script %0Script\MakeOutlineComment.js
COMMENTEVENT1 ,*script %0Script\OutlineSort.js
}
MC_sort = {
拡張ソート&1 = 24,-1,-1,B11111,1
}
XC_cwrt = 0

対象フォルダでSを押してソートメニューを出し、拡張ソート1を選択する。

やりかた

1.エントリ位置やレベル調整をカーソルキーで行う:

Ctrl+Shift+カーソル上下：エントリ位置変更
Ctrl+Shift+カーソル左右：エントリレベル変更

2.F7を押して現在のエントリ状態を保存する:

COMMENTIVENT1に設定しているMakeOutlineComment.jsが実行され、現在のエントリ状態をコメントファイルに保存する。
それ以降は、フォルダを再読み込み時にOutlineSort.jsが実行され、保存時と同じ並びでソートされる。