文字列の順番を逆に書き出す

ソースコード

#title = "文字列の順番を逆に書き出す"
#tooltip = "各行ごとに文字列の並び順を逆に書き出す"
// #icon = "Mery用 マテリアルデザインっぽいアイコン.icl",331

  // e.g. 「あいうえお」 → 「おえういあ」


// ■ 行の並び順も入れ替える？
var invertVertical = true;

  // e.g. 「あいうえお」
  //      「かきくけこ」

  //  →  」こけくきか「
  //      」おえういあ「

var s = editor.ActiveDocument.selection;
if ( s.Text ) {
  var anc = s.GetAnchorPos();
  var act = s.GetActivePos();
  var tp = Math.min( anc, act );

  var a = s.Text.replace( /\n?$/, "" ).split( "\n" );
  for ( var i = 0, len = a.length; i < len; i ++ ) {
    a[i] = a[i].split( "" ).reverse().join( "" );
  }
  if ( invertVertical ) {
    a = a.reverse();
  }
  s.Text = a.join( "\n" ) + RegExp[ "$&" ];
  s.SetAnchorPos( tp );
}