「TSV(CSV) ⇒ 固定長」を編集中 (節単位)

== ソースコード ==
<syntaxhighlight lang="javascript" copy>
#title = "固定長に変換"
// tsv2fix.js
// 2013-04-16

var auto_decision = true;   // true | false　　簡易自動判別を利用するか。
var popup_decision = false; // true | false　　ポップアップメニューを利用するか。
var popup_align = false;    // true | false　　ポップアップメニューを利用するか。

var leftmargin  = 1;       // 左マージン
var rightmargin = 1;       // 右マージン
var separator = "";        // 要素の区切り文字（出力時）

var deli = "\t";           // 区切り文字
var align = "left";        // left | right | center　　アラインメントの初期値。
var pad = " ";             // 埋め込む文字

var str = Document.selection.Text;
var len = [];
var output = [];

if ( auto_decision ){
    // --- 簡易自動判別。 ---
    if ( /\t/.test( str ) ){ // タブ区切り
        deli = /\t/
    } else if ( /", *"/.test( str ) ){ // 引用符つきカンマ区切り
        str = str.replace( /^"|"$/gm, "");
        deli = "\", *\"";
    } else if ( /, */.test( str ) ){ // カンマ区切り
        deli = ", *";
    } else {
        Quit();
    }
} else if ( popup_decision ){
    // --- ポップアップメニューで指定する。 ---
    var menu = CreatePopupMenu();
    menu.Add( "タブ区切り", 1, 0 );
    menu.Add( "カンマ区切り", 2, 0 );
    menu.Add( "引用符つきカンマ区切り", 3, 0 );
    menu.Add( "その他", 4, 0 ); 
    var r = menu.Track( mePosMouse );

    switch( r ){ 
    case 0:
        Quit();
    case 1:
        break;
    case 2:
        deli = /, */
        break;
    case 3:
        str = str.replace( /^"|"$/gm, "");
        deli = "\", *\"";
        break;
    case 4:
        deli = prompt( "区切り文字（正規表現・スラッシュ不要）？", "" );
        if ( deli == "" ){ Quit() };
        break;
    default :
    }
}
var delie = new RegExp( deli, "i" );

if ( popup_align ){
    // --- ポップアップメニューでアラインメントを指定する。 ---
    var menu = CreatePopupMenu();
    menu.Add( "左寄せ", 1, 0 );
    menu.Add( "右寄せ", 2, 0 );
    menu.Add( "センタリング", 3, 0 );
    var r = menu.Track( mePosMouse );

    switch( r ){ 
    case 0:
        Quit();
    case 1:
        align = "left";
        break;
    case 2:
        align = "right";
        break;
    case 3:
        align = "center";
        break;
    default :
    }
}

var delix = new RegExp( "(" + deli + ")("+ deli + ")", "ig" );
str = str.replace( delix, "$1 $2" );

var lines = str.replace( /\s+$/, "" ).split ( "\n" );

// 各列の最大長を調べる。
for ( var i = 0; i < lines.length; i++ ){
    var line = lines[ i ].split( delie );
    for ( var j = 0; j < line.length; j++ ){
        var x = ( len[ j ] == undefined )? 0 : len[ j ] ;
        len[ j ] = ( blength( line[ j ] ) > x )? blength( line[ j ] ) : x;
    }
}

// 埋め込み。
for ( var i = 0; i < lines.length; i++ ){
    var line = lines[ i ].split( delie );
//  Alert( line.join( " = " ) );
    var work = [];
    for ( var j = 0; j < len.length; j++ ){
        var s = ( line[ j ] == undefined )? "" : line[ j ];
        work.push( padding( s, len[ j ], align, leftmargin, rightmargin, pad ));
    }
    output.push( work.join( separator ));
}

/*
Editor.ActiveDocument.Selection.EndOfDocument( false );
Editor.ActiveDocument.Write( output.join( "\r\n" ) );
*/

ClipboardData.SetData( output.join( "\r\n" ) + "\r\n");
Alert( "クリップボードにコピーしました。" )

// 指定桁数（半角）になるように spc を埋め込む。
function padding( str, len, align, leftmargin, rightmargin, spc ){
    var x = len - blength( str );
    if ( align == "right" ){
        return repeat( spc, x + leftmargin ) + str + repeat( spc, rightmargin );
    } else if ( align == "center" ){
        return repeat( spc, Math.floor( x / 2 ) + leftmargin ) + str + repeat( spc, x - Math.floor( x / 2 ) + rightmargin );
    } else {
        return repeat( spc, leftmargin ) + str + repeat( spc, x + rightmargin );
    }
}

// 文字列の繰り返し。
function repeat( str, n ){
    var s = "";
    for ( var i = 0; i < n; i++ ){ s += str }
    return s;
}

// 文字列の半角換算長さ。
function blength( str ){
    var blen = 0;
    for ( var i = 0; i < str.length; i++ ){
        ( isHan( str.charAt( i )))? blen += 1 : blen += 2;
    }
    return blen;
}

// 文字が半角のとき true。
function isHan( s ){
    // Shift_JIS: 0x0 ～ 0x80, 0xa0 , 0xa1 ～ 0xdf , 0xfd ～ 0xff
    // Unicode  : 0x0 ～ 0x80, 0xf8f0, 0xff61 ～ 0xff9f, 0xf8f1 ～ 0xf8f3
    var c = s.charCodeAt( 0 );
    return (( c >= 0x0 && c < 0x81 ) || ( c == 0xf8f0 ) || ( c >= 0xff61 && c < 0xffa0 ) || ( c >= 0xf8f1 && c < 0xf8f4 ));
}
</syntaxhighlight>